# HG changeset patch
# User jwe
# Date 1055514925 0
# Node ID ab82d3a27d96429d3c7805229f169ed3d2e980db
# Parent  961d9767275f17e3d6ef91ca4313c78cca082403
[project @ 2003-06-13 14:35:25 by jwe]

diff -r 961d9767275f -r ab82d3a27d96 scripts/ChangeLog
--- a/scripts/ChangeLog	Wed Jun 04 17:49:50 2003 +0000
+++ b/scripts/ChangeLog	Fri Jun 13 14:35:25 2003 +0000
@@ -1,3 +1,8 @@
+2003-06-13  Alois Schloegl <alois.schloegl@tugraz.at>
+
+	* miscellaneous/fileparts.m: For compatibility with Matlab,
+	return "." with extension.
+
 2003-06-04  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
 	* control/base/__stepimp__.m, control/base/nichols.m,
@@ -69,7 +74,7 @@
 
  	* mkpkgadd: Scan C++ files as well
 
-2003-02-13  Schloegl Alois <alois.schloegl@tugraz.at>
+2003-02-13  Alois Schloegl <alois.schloegl@tugraz.at>
 
 	* strings/findstr.m: Return empty set for zero-length target.
 
diff -r 961d9767275f -r ab82d3a27d96 scripts/miscellaneous/fileparts.m
--- a/scripts/miscellaneous/fileparts.m	Wed Jun 04 17:49:50 2003 +0000
+++ b/scripts/miscellaneous/fileparts.m	Fri Jun 13 14:35:25 2003 +0000
@@ -31,13 +31,13 @@
       es = rindex (filename, ".");
       directory = filename(1:ds-1);
       name = filename(ds+1:es-1);
-      extension = filename(es+1:end);
+      extension = filename(es:end);
       version = "";
     else
-      error ("filesep: expecting filename argument to be a string");
+      error ("fileparts: expecting filename argument to be a string");
     endif
   else
-    usage ("filesep (filename)");
+    usage ("fileparts (filename)");
   endif
 
 endfunction