/[emacs]/emacs/lisp/emulation/viper.el
ViewVC logotype

Diff of /emacs/lisp/emulation/viper.el

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

revision 1.71 by kifer, Wed Jan 9 17:33:15 2002 UTC revision 1.72 by kifer, Sun Feb 10 06:46:12 2002 UTC
# Line 982  remains buffer-local." Line 982  remains buffer-local."
982    
983    (defadvice describe-key (before viper-read-keyseq-ad protect activate)    (defadvice describe-key (before viper-read-keyseq-ad protect activate)
984      "Force to read key via `viper-read-key-sequence'."      "Force to read key via `viper-read-key-sequence'."
985      (interactive (list (viper-events-to-keys      (interactive (list (viper-read-key-sequence "Describe key: "))))
                         (viper-read-key-sequence "Describe key: ")))))  
986        
987    (defadvice describe-key-briefly    (defadvice describe-key-briefly
988      (before viper-read-keyseq-ad protect activate)      (before viper-read-keyseq-ad protect activate)
989      "Force to read key via `viper-read-key-sequence'."      "Force to read key via `viper-read-key-sequence'."
990      (interactive (list (viper-events-to-keys      (interactive (list (viper-read-key-sequence "Describe key briefly: "))))
                         (viper-read-key-sequence "Describe key briefly: ")))))  
991        
992        
993    (defadvice find-file (before viper-add-suffix-advice activate)    (defadvice find-file (before viper-add-suffix-advice activate)

Legend:
Removed from v.1.71  
changed lines
  Added in v.1.72

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