Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

comments

  • Loading branch information...
commit 263f384087e39ba7de882cbfc7addf564e0bfea5 1 parent f02d8ff
@aufflick authored
Showing with 2 additions and 2 deletions.
  1. +2 −2 aufflick-shell-hooks.el
View
4 aufflick-shell-hooks.el
@@ -17,13 +17,13 @@
(directory-files (concat cdsrc-completions-prefix dirname)))))))
(cond
((not mode) (cond
- ((and (eq 0 (length completions)) (eq 0 (length filename))) 't)
+ ((and (eq 0 (length completions)) (eq 0 (length filename))) 't) ;; in our case, only report exact match when no nested dirs left
((> (length completions) 1) (concat dirname (or (reduce 'safe-fill-common-string-prefix completions) filename)))
((eq (length completions) 1) (concat dirname (car completions)))
('t nil)))
((eq mode 't) completions)
((eq mode 'lambda) (member (concat filename "/") completions))
- ('t (cons (list 'boundaries slashpos) (length filename))))
+ ('t (cons (list 'boundaries slashpos) (length filename)))) ;; let completion know our completions only apply after the last /
)))
(defun cdsrc (path)
Please sign in to comment.
Something went wrong with that request. Please try again.