martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix 2012-09-11T14:06:33Z!bastien1@free.fr.

Browse Source
This commit is contained in:
Bastien Guerry
2012-09-11 19:43:21 +02:00
parent c4c9756b17
commit 9011078f9d
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/minibuffer.el
View File

@@ -213,8 +213,8 @@ case sensitive instead."
(defun completion-table-subvert (table s1 s2)
"Return a completion table from TABLE with S1 replaced by S2.
The result is a completion table which completes strings of the
form (concat S2 S) in the same way as TABLE completes strings of
the form (concat S1 S)."
form (concat S1 S) in the same way as TABLE completes strings of
the form (concat S2 S)."
(lambda (string pred action)
(let* ((str (if (eq t (compare-strings string 0 (length s1) s1 nil nil
completion-ignore-case))