From eccec8c3f5976260f77f0d65942bd4320ab14ec4 Mon Sep 17 00:00:00 2001 From: Viktor Szakats Date: Sat, 19 Feb 2011 09:16:25 +0000 Subject: [PATCH] 2011-02-19 10:16 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) * utils/hbmk2/hbmk2.prg ! Deleted local version of HB_FNAMEDIR(). --- harbour/ChangeLog | 4 ++++ harbour/utils/hbmk2/hbmk2.prg | 7 ------- 2 files changed, 4 insertions(+), 7 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 1ec59aa2ec..cf047f70e6 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,10 @@ The license applies to all entries newer than 2009-04-28. */ +2011-02-19 10:16 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) + * utils/hbmk2/hbmk2.prg + ! Deleted local version of HB_FNAMEDIR(). + 2011-02-19 09:27 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) * src/rtl/Makefile + src/rtl/hbfilehc.c diff --git a/harbour/utils/hbmk2/hbmk2.prg b/harbour/utils/hbmk2/hbmk2.prg index db4eac6402..28334e446b 100644 --- a/harbour/utils/hbmk2/hbmk2.prg +++ b/harbour/utils/hbmk2/hbmk2.prg @@ -8668,13 +8668,6 @@ STATIC FUNCTION FNameEscape( cFileName, nEscapeMode, nFNNotation ) RETURN cFileName -STATIC FUNCTION hb_FNameDir( cFileName ) - LOCAL cDir - - hb_FNameSplit( cFileName, @cDir ) - - RETURN cDir - /* Remove all extensions from name */ STATIC FUNCTION FNameNameGetNoExt( cFileName ) LOCAL cName := cFileName