Mercurial > hg > octave-nkf

diff scripts/plot/uigetdir.m @ 11289:f44c47959256

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
uifilefun fixes
author Kai Habel <kai.habel@gmx.de>
date Mon, 22 Nov 2010 21:13:15 +0100
parents 58f175d39a7a
children 75ff3db6a687
line wrap: on
line diff
--- a/scripts/plot/uigetdir.m
+++ b/scripts/plot/uigetdir.m
@@ -38,7 +38,9 @@
   endif
 
   if (any (cellfun(@(x)strcmp (x, "fltk"), available_backends)))
-      init_path = fileparts (init_path);
+      if (!isdir (init_path))
+        init_path = fileparts (init_path);
+      endif
       retdir = __fltk_uigetfile__ ("", name, init_path, [240, 120], "dir");
   else
     error ("uigetdir requires fltk backend.");