/[emacs]/emacs/lisp/ido.el
ViewVC logotype

Diff of /emacs/lisp/ido.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.66 by kfstorm, Fri Jul 8 10:07:39 2005 UTC revision 1.67 by kfstorm, Fri Jul 15 09:19:53 2005 UTC
# Line 1405  This function also adds a hook to the mi Line 1405  This function also adds a hook to the mi
1405      (define-key map "\C-s" 'ido-next-match)      (define-key map "\C-s" 'ido-next-match)
1406      (define-key map "\C-t" 'ido-toggle-regexp)      (define-key map "\C-t" 'ido-toggle-regexp)
1407      (define-key map "\C-z" 'ido-undo-merge-work-directory)      (define-key map "\C-z" 'ido-undo-merge-work-directory)
1408      (define-key map [(control ? )] 'ido-restrict-to-matches)      (define-key map [(control ?\s)] 'ido-restrict-to-matches)
1409      (define-key map [(control ?@)] 'ido-restrict-to-matches)      (define-key map [(control ?@)] 'ido-restrict-to-matches)
1410      (define-key map [right] 'ido-next-match)      (define-key map [right] 'ido-next-match)
1411      (define-key map [left] 'ido-prev-match)      (define-key map [left] 'ido-prev-match)
# Line 1436  This function also adds a hook to the mi Line 1436  This function also adds a hook to the mi
1436        (define-key map [(meta ?m)] 'ido-make-directory)        (define-key map [(meta ?m)] 'ido-make-directory)
1437        (define-key map [(meta ?n)] 'ido-next-work-directory)        (define-key map [(meta ?n)] 'ido-next-work-directory)
1438        (define-key map [(meta ?o)] 'ido-prev-work-file)        (define-key map [(meta ?o)] 'ido-prev-work-file)
1439        (define-key map [(meta ?O)] 'ido-next-work-file)        (define-key map [(meta control ?o)] 'ido-next-work-file)
1440        (define-key map [(meta ?p)] 'ido-prev-work-directory)        (define-key map [(meta ?p)] 'ido-prev-work-directory)
1441        (define-key map [(meta ?s)] 'ido-merge-work-directories)        (define-key map [(meta ?s)] 'ido-merge-work-directories)
1442        )        )
# Line 2056  If INITIAL is non-nil, it specifies the Line 2056  If INITIAL is non-nil, it specifies the
2056    
2057           ((and ido-use-filename-at-point           ((and ido-use-filename-at-point
2058                 (setq fn (if (eq ido-use-filename-at-point 'guess)                 (setq fn (if (eq ido-use-filename-at-point 'guess)
2059                              (ffap-guesser)                              (with-no-warnings (ffap-guesser))
2060                            (ffap-string-at-point)))                            (ffap-string-at-point)))
2061                 (not (string-match "^http:/" fn))                 (not (string-match "^http:/" fn))
2062                 (setq d (file-name-directory fn))                 (setq d (file-name-directory fn))

Legend:
Removed from v.1.66  
changed lines
  Added in v.1.67

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26