Mercurial > hg > xemacs-beta
diff lisp/prim/auto-autoloads.el @ 44:8d2a9b52c682 r19-15prefinal
Import from CVS: tag r19-15prefinal
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:55:10 +0200 |
parents | 8b8b7f3559a2 |
children | 05472e90ae02 |
line wrap: on
line diff
--- a/lisp/prim/auto-autoloads.el Mon Aug 13 08:54:52 2007 +0200 +++ b/lisp/prim/auto-autoloads.el Mon Aug 13 08:55:10 2007 +0200 @@ -899,7 +899,7 @@ ;;;*** -;;;### (autoloads (custom-make-dependencies custom-menu-update custom-buffer-create customize-apropos customize-customized customize-face customize-variable customize) "cus-edit" "custom/cus-edit.el") +;;;### (autoloads (custom-make-dependencies custom-menu-update custom-save-all custom-buffer-create customize-apropos customize-customized customize-face customize-variable customize) "cus-edit" "custom/cus-edit.el") (autoload 'customize "cus-edit" "\ Customize SYMBOL, which must be a customization group." t nil) @@ -925,6 +925,9 @@ SYMBOL is a customization option, and WIDGET is a widget for editing that option." nil nil) +(autoload 'custom-save-all "cus-edit" "\ +Save all customizations in `custom-file'." nil nil) + (autoload 'custom-menu-update "cus-edit" "\ Update customize menu." t nil) @@ -1362,11 +1365,15 @@ ;;;*** -;;;### (autoloads nil "efs-cu" "efs/efs-cu.el") +;;;### (autoloads (efs-ftp-path) "efs-cu" "efs/efs-cu.el") (defvar efs-path-root-regexp "^/[^/:]+:" "\ Regexp to match the `/user@host:' root of an efs full path.") +(autoload 'efs-ftp-path "efs-cu" "\ +Parse PATH according to efs-path-regexp. +Returns a list (HOST USER PATH), or nil if PATH does not match the format." nil nil) + ;;;*** ;;;### (autoloads (remote-path-file-handler-function) "efs-dump" "efs/efs-dump.el") @@ -3729,7 +3736,7 @@ ;;;### (autoloads (ksh-mode) "ksh-mode" "modes/ksh-mode.el") (autoload 'ksh-mode "ksh-mode" "\ -ksh-mode $Revision: 1.18 $ - Major mode for editing (Bourne, Korn or Bourne again) +ksh-mode $Revision: 1.19 $ - Major mode for editing (Bourne, Korn or Bourne again) shell scripts. Special key bindings and commands: \\{ksh-mode-map} @@ -5004,7 +5011,7 @@ (autoload 'vhdl-mode "vhdl-mode" "\ Major mode for editing VHDL code. -vhdl-mode $Revision: 1.18 $ +vhdl-mode $Revision: 1.19 $ To submit a problem report, enter `\\[vhdl-submit-bug-report]' from a vhdl-mode buffer. This automatically sets up a mail buffer with version information already added. You just need to add a description of the @@ -5024,6 +5031,10 @@ ;;;### (autoloads (auto-view-mode view-major-mode view-mode view-minor-mode view-buffer-other-window view-file-other-window view-buffer view-file) "view-less" "modes/view-less.el") +(defvar view-minor-mode-map (let ((map (make-keymap))) (set-keymap-name map 'view-minor-mode-map) (suppress-keymap map) (define-key map "-" 'negative-argument) (define-key map " " 'scroll-up) (define-key map "f" 'scroll-up) (define-key map "" 'scroll-down) (define-key map "b" 'scroll-down) (define-key map 'backspace 'scroll-down) (define-key map " " 'view-scroll-lines-up) (define-key map "\n" 'view-scroll-lines-up) (define-key map "e" 'view-scroll-lines-up) (define-key map "j" 'view-scroll-lines-up) (define-key map "y" 'view-scroll-lines-down) (define-key map "k" 'view-scroll-lines-down) (define-key map "d" 'view-scroll-some-lines-up) (define-key map "u" 'view-scroll-some-lines-down) (define-key map "r" 'recenter) (define-key map "t" 'toggle-truncate-lines) (define-key map "N" 'view-buffer) (define-key map "E" 'view-file) (define-key map "P" 'view-buffer) (define-key map "!" 'shell-command) (define-key map "|" 'shell-command-on-region) (define-key map "=" 'what-line) (define-key map "?" 'view-search-backward) (define-key map "h" 'view-mode-describe) (define-key map "s" 'view-repeat-search) (define-key map "n" 'view-repeat-search) (define-key map "/" 'view-search-forward) (define-key map "\\" 'view-search-backward) (define-key map "g" 'view-goto-line) (define-key map "G" 'view-last-windowful) (define-key map "%" 'view-goto-percent) (define-key map "p" 'view-goto-percent) (define-key map "m" 'point-to-register) (define-key map "'" 'register-to-point) (define-key map "C" 'view-cleanup-backspaces) (define-key map "" 'view-quit) (define-key map "" 'view-quit-toggle-ro) (define-key map "q" 'view-quit) map)) + +(defvar view-mode-map (let ((map (copy-keymap view-minor-mode-map))) (set-keymap-name map 'view-mode-map) map)) + (autoload 'view-file "view-less" "\ Find FILE, enter view mode. With prefix arg OTHER-P, use other window." t nil)