[jed] minor patch for filelist.sl

[<Lechee.Lai@xxxxxxxxxxxx>]

Hi,

 There is minor patch for filelist.sl easy bind filelist_list_dir for file and directory

 I also make my light list_directory() http://www.geocities.com/lecheel/jedmode/ledir.sl.txt not good enough but enough for me

 

--- filelist172.sl     2007-04-30 17:02:07.000000000 +0800

+++ filelist.sl         2007-04-30 17:01:37.000000000 +0800

@@ -502,7 +503,13 @@

    variable calling_dir = buffer_dirname();

 

    if (dir == NULL)

-     dir = read_with_completion("Open directory:", "", "", 'f');

+     dir = read_with_completion("Open (file or directory):", "", "", 'f');

+   % if dir could be a real file name do it :-)

+   if (file_status (dir) == 1)

+     {

+        find_file(dir);

+        return;

+     }   

    % make sure there is a trailing directory separator

    dir = path_concat(dir, "");

    % expand relative paths

 

-- Lechee