diff options
| author | Leo Liu | 2012-09-28 21:38:26 +0800 |
|---|---|---|
| committer | Leo Liu | 2012-09-28 21:38:26 +0800 |
| commit | 9c1228c32346c2b4ccb3dbb5b3b6eb5673c8dd6a (patch) | |
| tree | 9cb1de98ad5988047839f1c272735a6ae0e62cc2 | |
| parent | 03922966f3556f32db4786e1d7fdc3de1ef4d739 (diff) | |
| download | emacs-9c1228c32346c2b4ccb3dbb5b3b6eb5673c8dd6a.tar.gz emacs-9c1228c32346c2b4ccb3dbb5b3b6eb5673c8dd6a.zip | |
ido.el (ido-set-matches-1): Fix 2012-09-11 change
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/ido.el | 8 |
2 files changed, 8 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0fae89f1e01..4878f5eb467 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2012-09-28 Leo Liu <sdl.web@gmail.com> | ||
| 2 | |||
| 3 | * ido.el (ido-set-matches-1): Fix 2012-09-11 change. | ||
| 4 | |||
| 1 | 2012-09-16 Leo Liu <sdl.web@gmail.com> | 5 | 2012-09-16 Leo Liu <sdl.web@gmail.com> |
| 2 | 6 | ||
| 3 | IDO: Disable match re-ordering for buffer switching. | 7 | IDO: Disable match re-ordering for buffer switching. |
diff --git a/lisp/ido.el b/lisp/ido.el index a2712db804d..53533142e30 100644 --- a/lisp/ido.el +++ b/lisp/ido.el | |||
| @@ -3701,14 +3701,14 @@ This is to make them appear as if they were \"virtual buffers\"." | |||
| 3701 | (rexq (concat rex0 (if slash ".*/" ""))) | 3701 | (rexq (concat rex0 (if slash ".*/" ""))) |
| 3702 | (re (if ido-enable-prefix (concat "\\`" rexq) rexq)) | 3702 | (re (if ido-enable-prefix (concat "\\`" rexq) rexq)) |
| 3703 | (full-re (and do-full | 3703 | (full-re (and do-full |
| 3704 | (and (eq ido-cur-item 'buffer) | 3704 | (not (and (eq ido-cur-item 'buffer) |
| 3705 | (not ido-buffer-disable-smart-matches)) | 3705 | ido-buffer-disable-smart-matches)) |
| 3706 | (not ido-enable-regexp) | 3706 | (not ido-enable-regexp) |
| 3707 | (not (string-match "\$\\'" rex0)) | 3707 | (not (string-match "\$\\'" rex0)) |
| 3708 | (concat "\\`" rex0 (if slash "/" "") "\\'"))) | 3708 | (concat "\\`" rex0 (if slash "/" "") "\\'"))) |
| 3709 | (suffix-re (and do-full slash | 3709 | (suffix-re (and do-full slash |
| 3710 | (and (eq ido-cur-item 'buffer) | 3710 | (not (and (eq ido-cur-item 'buffer) |
| 3711 | (not ido-buffer-disable-smart-matches)) | 3711 | ido-buffer-disable-smart-matches)) |
| 3712 | (not ido-enable-regexp) | 3712 | (not ido-enable-regexp) |
| 3713 | (not (string-match "\$\\'" rex0)) | 3713 | (not (string-match "\$\\'" rex0)) |
| 3714 | (concat rex0 "/\\'"))) | 3714 | (concat rex0 "/\\'"))) |