Present completions for "cd" with a final /

2005-09-12 13:42:21 +00:00 · 2005-09-12 13:42:21 +00:00 · 4320c730db
parent d7598a29f3
commit 4320c730db
1 changed files with 2 additions and 1 deletions
--- a/scheme/std-command.scm
+++ b/scheme/std-command.scm
@ -208,7 +208,8 @@
 		 (esc #f)
 		 (more)))
 	   (lambda ()
-	     (and (file-directory? file) file))))))
+	     (and (file-directory? file)
+                  (file-name-as-directory file)))))))
     (or (to-complete-prefix to-complete) (cwd))))
  (lambda (command args)
    (chdir (resolve-file-name (if (null? args)