Mercurial > emacs
changeset 64336:8b29b8961758
(ido-define-mode-map): Move ido-next-work-file to C-M-o.
Use with-no-warnings around ffap-guesser.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Fri, 15 Jul 2005 09:19:53 +0000 |
| parents | 0cb952e11674 |
| children | a8184636c021 |
| files | lisp/ido.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ido.el Fri Jul 15 09:19:40 2005 +0000 +++ b/lisp/ido.el Fri Jul 15 09:19:53 2005 +0000 @@ -1405,7 +1405,7 @@ (define-key map "\C-s" 'ido-next-match) (define-key map "\C-t" 'ido-toggle-regexp) (define-key map "\C-z" 'ido-undo-merge-work-directory) - (define-key map [(control ? )] 'ido-restrict-to-matches) + (define-key map [(control ?\s)] 'ido-restrict-to-matches) (define-key map [(control ?@)] 'ido-restrict-to-matches) (define-key map [right] 'ido-next-match) (define-key map [left] 'ido-prev-match) @@ -1436,7 +1436,7 @@ (define-key map [(meta ?m)] 'ido-make-directory) (define-key map [(meta ?n)] 'ido-next-work-directory) (define-key map [(meta ?o)] 'ido-prev-work-file) - (define-key map [(meta ?O)] 'ido-next-work-file) + (define-key map [(meta control ?o)] 'ido-next-work-file) (define-key map [(meta ?p)] 'ido-prev-work-directory) (define-key map [(meta ?s)] 'ido-merge-work-directories) ) @@ -2056,7 +2056,7 @@ ((and ido-use-filename-at-point (setq fn (if (eq ido-use-filename-at-point 'guess) - (ffap-guesser) + (with-no-warnings (ffap-guesser)) (ffap-string-at-point))) (not (string-match "^http:/" fn)) (setq d (file-name-directory fn))