Mercurial > emacs
changeset 34166:c073ad4159fd
*** empty log message ***
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Mon, 04 Dec 2000 12:28:37 +0000 |
| parents | 3b3a64fbcb05 |
| children | ce6d3ca84e6d |
| files | etc/NEWS lisp/cus-load.el lisp/loaddefs.el src/ChangeLog |
| diffstat | 4 files changed, 548 insertions(+), 215 deletions(-) [+] |
line wrap: on
line diff
--- a/etc/NEWS Mon Dec 04 12:25:36 2000 +0000 +++ b/etc/NEWS Mon Dec 04 12:28:37 2000 +0000 @@ -2584,8 +2584,10 @@ Then return the value of RESULT, or nil if RESULT is omitted. +++ -** Regular expressions now support Posix character classes such -as [:alpha:], [:space:] and so on. +** Regular expressions now support Posix character classes such as +[:alpha:], [:space:] and so on. These must be used within a character +class--for instance, [-[:digit:].+] matches digits or a period +or a sign. [:digit:] matches 0 through 9 [:cntrl:] matches ASCII control characters
--- a/lisp/cus-load.el Mon Dec 04 12:25:36 2000 +0000 +++ b/lisp/cus-load.el Mon Dec 04 12:28:37 2000 +0000 @@ -60,9 +60,9 @@ (put 'gnus-score-expire 'custom-loads '("gnus-kill" "gnus-score")) (put 'supercite-frames 'custom-loads '("supercite")) (put 'dirtrack 'custom-loads '("dirtrack")) -(put 'ediff-window 'custom-loads '("ediff-wind")) +(put 'ediff-window 'custom-loads '("ediff-help" "ediff-wind")) (put 'bruce 'custom-loads '("bruce")) -(put 'windows 'custom-loads '("window" "follow" "windmove")) +(put 'windows 'custom-loads '("scroll-all" "window" "follow" "windmove")) (put 'gnus-exit 'custom-loads '("gnus-group" "gnus")) (put 'speedbar 'custom-loads '("speedbar")) (put 'etags 'custom-loads '("etags")) @@ -139,7 +139,7 @@ (put 'feedmail-spray 'custom-loads '("feedmail")) (put 'idlwave-external-programs 'custom-loads '("idlwave")) (put 'strokes 'custom-loads '("strokes")) -(put 'mouse 'custom-loads '("faces" "mouse" "menu-bar" "avoid" "mouse-sel" "msb" "mwheel" "strokes" "tooltip" "goto-addr")) +(put 'mouse 'custom-loads '("faces" "mouse" "menu-bar" "avoid" "mouse-sel" "msb" "mwheel" "strokes" "tooltip" "artist" "goto-addr")) (put 'nnmail-various 'custom-loads '("nnmail")) (put 'smiley 'custom-loads '("smiley-ems")) (put 'extensions 'custom-loads '("generic" "time-stamp" "wid-edit" "cust-print" "eldoc" "page-ext")) @@ -181,7 +181,6 @@ (put 'eshell-prompt 'custom-loads '("em-prompt")) (put 'vhdl-sequential-process 'custom-loads '("vhdl-mode")) (put 'simula 'custom-loads '("simula")) -(put 'bs-appearence 'custom-loads '("bs")) (put 'vhdl-comment 'custom-loads '("vhdl-mode")) (put 'message-buffers 'custom-loads '("message")) (put '5x5 'custom-loads '("5x5")) @@ -207,6 +206,7 @@ (put 'forms 'custom-loads '("forms")) (put 'widget-documentation 'custom-loads '("wid-edit")) (put 'eshell-banner 'custom-loads '("em-banner")) +(put 'artist 'custom-loads '("artist")) (put 'gnus-score-various 'custom-loads '("gnus-score" "gnus")) (put 'cperl-faces 'custom-loads '("cperl-mode")) (put 'goto-address 'custom-loads '("goto-addr")) @@ -250,6 +250,7 @@ (put 'idlwave-shell-highlighting-and-faces 'custom-loads '("idlw-shell")) (put 'tcl 'custom-loads '("tcl")) (put 'vhdl-print 'custom-loads '("vhdl-mode")) +(put 'artist-text 'custom-loads '("artist")) (put 'gnus-summary-tree 'custom-loads '("gnus-salt")) (put 'tar 'custom-loads '("tar-mode")) (put 'archive 'custom-loads '("arc-mode")) @@ -265,7 +266,7 @@ (put 'tags 'custom-loads '("speedbar")) (put 'eshell-proc 'custom-loads '("esh-proc")) (put 'custom-browse 'custom-loads '("cus-edit")) -(put 'mime 'custom-loads '("mm-bodies")) +(put 'mime 'custom-loads '("mailcap" "mm-bodies")) (put 'generic-x 'custom-loads '("generic-x")) (put 'partial-completion 'custom-loads '("complete")) (put 'whitespace 'custom-loads '("whitespace")) @@ -386,6 +387,7 @@ (put 'change-log 'custom-loads '("add-log")) (put 'gnus-group-levels 'custom-loads '("gnus-group" "gnus-start" "gnus")) (put 'cperl 'custom-loads '("cperl-mode")) +(put 'bs-appearance 'custom-loads '("bs")) (put 'pcmpl-cvs 'custom-loads '("pcmpl-cvs")) (put 'eshell-mode 'custom-loads '("esh-mode")) (put 'files 'custom-loads '("files" "autoinsert" "autorevert" "cus-edit" "filecache" "recentf" "shadow" "ange-ftp")) @@ -458,7 +460,7 @@ (put 'hl-line 'custom-loads '("hl-line")) (put 'eshell-glob 'custom-loads '("em-glob")) (put 'internal 'custom-loads '("startup" "cus-edit" "delim-col")) -(put 'lisp 'custom-loads '("simple" "lisp" "lisp-mode" "cmuscheme" "ielm" "xscheme" "advice" "bytecomp" "checkdoc" "cl-indent" "cust-print" "edebug" "eldoc" "elp" "find-func" "pp" "re-builder" "shadow" "trace" "scheme")) +(put 'lisp 'custom-loads '("simple" "lisp" "lisp-mode" "ielm" "xscheme" "advice" "bytecomp" "checkdoc" "cl-indent" "cust-print" "edebug" "eldoc" "elp" "find-func" "pp" "re-builder" "shadow" "trace" "scheme")) (put 'local 'custom-loads '("calendar")) (put 'rlogin 'custom-loads '("rlogin")) (put 'debugger 'custom-loads '("debug")) @@ -542,7 +544,7 @@ (put 'hardware 'custom-loads '("battery")) (put 'edebug 'custom-loads '("edebug")) (put 'emerge 'custom-loads '("emerge")) -(put 'scheme 'custom-loads '("scheme")) +(put 'scheme 'custom-loads '("cmuscheme" "scheme")) (put 'gametree 'custom-loads '("gametree")) (put 'gnus-group-foreign 'custom-loads '("gnus-group")) (put 'initialization 'custom-loads '("startup")) @@ -556,6 +558,7 @@ (put 'eshell-unix 'custom-loads '("em-unix")) (put 'hi-lock-faces 'custom-loads '("hi-lock")) (put 'hideshow 'custom-loads '("hideshow")) +(put 'mailcap 'custom-loads '("mailcap")) (put 'viper-search 'custom-loads '("viper-init")) (put 'mule 'custom-loads '("mule-cmds" "kkc")) (put 'glasses 'custom-loads '("glasses")) @@ -577,7 +580,7 @@ (put 'delphi 'custom-loads '("delphi")) (put 're-builder 'custom-loads '("re-builder")) (put 'eshell-io 'custom-loads '("esh-io")) -(put 'killing 'custom-loads '("simple")) +(put 'killing 'custom-loads '("simple" "x-win")) (put 'woman-interface 'custom-loads '("woman")) (put 'gnus-group-various 'custom-loads '("gnus-group" "gnus")) ;;; These are for handling :version. We need to have a minimum of @@ -619,10 +622,14 @@ (custom-put-if-not 'footnote 'group-documentation "Support for footnotes in mail and news messages.") (custom-put-if-not 'pcomplete 'custom-version "21.1") (custom-put-if-not 'pcomplete 'group-documentation "Programmable completion.") +(custom-put-if-not 'gnus-mime-action-alist 'custom-version "21.1") +(custom-put-if-not 'gnus-mime-action-alist 'standard-value t) (custom-put-if-not 'fancy-splash-screen 'custom-version "21.1") (custom-put-if-not 'fancy-splash-screen 'group-documentation "Fancy splash screen when Emacs starts.") (custom-put-if-not 'custom-variable-default-form 'custom-version "20.3") (custom-put-if-not 'custom-variable-default-form 'standard-value t) +(custom-put-if-not 'gnus-agent-synchronize-flags 'custom-version "21.1") +(custom-put-if-not 'gnus-agent-synchronize-flags 'standard-value t) (custom-put-if-not 'mode-line 'custom-version "21.1") (custom-put-if-not 'mode-line 'group-documentation nil) (custom-put-if-not 'find-function-after-hook 'custom-version "20.3") @@ -635,10 +642,16 @@ (custom-put-if-not 'browse-url-lynx-input-field 'standard-value t) (custom-put-if-not 'help-highlight-face 'custom-version "20.3") (custom-put-if-not 'help-highlight-face 'standard-value t) +(custom-put-if-not 'ldap 'custom-version "21.1") +(custom-put-if-not 'ldap 'group-documentation "Lightweight Directory Access Protocol.") (custom-put-if-not 'vc-cvs-header 'custom-version "21.1") (custom-put-if-not 'vc-cvs-header 'standard-value t) (custom-put-if-not 'speedbar 'custom-version "20.3") (custom-put-if-not 'speedbar 'group-documentation "File and tag browser frame.") +(custom-put-if-not 'message-dont-reply-to-names 'custom-version "21.1") +(custom-put-if-not 'message-dont-reply-to-names 'standard-value t) +(custom-put-if-not 'nnmail-expiry-target 'custom-version "21.1") +(custom-put-if-not 'nnmail-expiry-target 'standard-value t) (custom-put-if-not 'custom-button-face 'custom-version "21.1") (custom-put-if-not 'custom-button-face 'group-documentation nil) (custom-put-if-not 'cursor 'custom-version "21.1") @@ -667,6 +680,8 @@ the tasks accomplished by such tools.") (custom-put-if-not 'compilation-scroll-output 'custom-version "20.3") (custom-put-if-not 'compilation-scroll-output 'standard-value t) +(custom-put-if-not 'gnus-unbuttonized-mime-types 'custom-version "21.1") +(custom-put-if-not 'gnus-unbuttonized-mime-types 'standard-value t) (custom-put-if-not 'vc-dired-recurse 'custom-version "20.3") (custom-put-if-not 'vc-dired-recurse 'standard-value t) (custom-put-if-not 'change-log-email-face 'custom-version "21.1") @@ -707,6 +722,8 @@ (custom-put-if-not 'tildify 'group-documentation "Adding missing hard spaces or other text fragments into texts.") (custom-put-if-not 'vc-rcs-checkin-switches 'custom-version "21.1") (custom-put-if-not 'vc-rcs-checkin-switches 'standard-value t) +(custom-put-if-not 'gnus-article-banner-alist 'custom-version "21.1") +(custom-put-if-not 'gnus-article-banner-alist 'standard-value t) (custom-put-if-not 'region 'custom-version "21.1") (custom-put-if-not 'region 'group-documentation nil) (custom-put-if-not 'change-log-version-info-enabled 'custom-version "21.1") @@ -717,6 +734,8 @@ (custom-put-if-not 'change-log-name-face 'group-documentation nil) (custom-put-if-not 'sql-electric-stuff 'custom-version "20.8") (custom-put-if-not 'sql-electric-stuff 'standard-value t) +(custom-put-if-not 'gnus-ignored-from-addresses 'custom-version "21.1") +(custom-put-if-not 'gnus-ignored-from-addresses 'standard-value t) (custom-put-if-not 'ansi-colors 'custom-version "20.7") (custom-put-if-not 'ansi-colors 'group-documentation "Translating SGR control sequences to text-properties. This translation effectively colorizes strings and regions based upon @@ -724,18 +743,30 @@ Rendition) control sequences are defined in section 3.8.117 of the ECMA-48 standard (identical to ISO/IEC 6429), which is freely available as a PDF file <URL:http://www.ecma.ch/ecma1/STAND/ECMA-048.HTM>.") +(custom-put-if-not 'gnus-group-name-charset-method-alist 'custom-version "21.1") +(custom-put-if-not 'gnus-group-name-charset-method-alist 'standard-value t) (custom-put-if-not 'vc-sccs-register-switches 'custom-version "21.1") (custom-put-if-not 'vc-sccs-register-switches 'standard-value t) +(custom-put-if-not 'gnus-article-date-lapsed-new-header 'custom-version "21.1") +(custom-put-if-not 'gnus-article-date-lapsed-new-header 'standard-value t) (custom-put-if-not 'midnight 'custom-version "20.3") (custom-put-if-not 'midnight 'group-documentation "Run something every day at midnight.") +(custom-put-if-not 'gnus-extra-headers 'custom-version "21.1") +(custom-put-if-not 'gnus-extra-headers 'standard-value t) (custom-put-if-not 'speedbar-use-images 'custom-version "21.1") (custom-put-if-not 'speedbar-use-images 'standard-value t) +(custom-put-if-not 'gnus-auto-expirable-marks 'custom-version "21.1") +(custom-put-if-not 'gnus-auto-expirable-marks 'standard-value t) (custom-put-if-not 'automatic-hscrolling 'custom-version "21.1") (custom-put-if-not 'automatic-hscrolling 'standard-value t) (custom-put-if-not 'custom-buffer-done-function 'custom-version "21.1") (custom-put-if-not 'custom-buffer-done-function 'standard-value t) +(custom-put-if-not 'gnus-article-mime-match-handle-function 'custom-version "21.1") +(custom-put-if-not 'gnus-article-mime-match-handle-function 'standard-value t) (custom-put-if-not 'cwarn 'custom-version "21.1") (custom-put-if-not 'cwarn 'group-documentation "Highlight suspicious C and C++ constructions.") +(custom-put-if-not 'message-buffer-naming-style 'custom-version "21.1") +(custom-put-if-not 'message-buffer-naming-style 'standard-value t) (custom-put-if-not 'tags-apropos-additional-actions 'custom-version "21.1") (custom-put-if-not 'tags-apropos-additional-actions 'standard-value t) (custom-put-if-not 'generic-x 'custom-version "20.3") @@ -760,6 +791,8 @@ (custom-put-if-not 'vc-rcs-header 'standard-value t) (custom-put-if-not 'vhdl 'custom-version "20.4") (custom-put-if-not 'vhdl 'group-documentation "Customizations for VHDL Mode.") +(custom-put-if-not 'face-font-registry-alternatives 'custom-version "21.1") +(custom-put-if-not 'face-font-registry-alternatives 'standard-value t) (custom-put-if-not 'show-paren-priority 'custom-version "21.1") (custom-put-if-not 'show-paren-priority 'standard-value t) (custom-put-if-not 'isearch-faces 'custom-version "21.1") @@ -782,6 +815,8 @@ (custom-put-if-not 'diary-mail-days 'standard-value t) (custom-put-if-not 'diary-mail-addr 'custom-version "20.3") (custom-put-if-not 'diary-mail-addr 'standard-value t) +(custom-put-if-not 'nnmail-extra-headers 'custom-version "21.1") +(custom-put-if-not 'nnmail-extra-headers 'standard-value t) (custom-put-if-not 'font-lock-support-mode 'custom-version "21.1") (custom-put-if-not 'font-lock-support-mode 'standard-value t) (custom-put-if-not 'compilation-error-screen-columns 'custom-version "20.4") @@ -790,12 +825,16 @@ (custom-put-if-not 'debugger-record-buffer 'standard-value t) (custom-put-if-not 'query-replace-to-history-variable 'custom-version "20.3") (custom-put-if-not 'query-replace-to-history-variable 'standard-value t) +(custom-put-if-not 'gnus-mime-multipart-functions 'custom-version "21.1") +(custom-put-if-not 'gnus-mime-multipart-functions 'standard-value t) (custom-put-if-not 'which-func 'custom-version "20.3") (custom-put-if-not 'which-func 'group-documentation "Mode to display the current function name in the modeline.") (custom-put-if-not 'read-mail-command 'custom-version "21.1") (custom-put-if-not 'read-mail-command 'standard-value t) (custom-put-if-not 'ange-ftp-try-passive-mode 'custom-version 21.1) (custom-put-if-not 'ange-ftp-try-passive-mode 'standard-value t) +(custom-put-if-not 'rmail-automatic-folder-directives 'custom-version "21.1") +(custom-put-if-not 'rmail-automatic-folder-directives 'standard-value t) (custom-put-if-not 'mouse-buffer-menu-mode-mult 'custom-version "20.3") (custom-put-if-not 'mouse-buffer-menu-mode-mult 'standard-value t) (custom-put-if-not 'eval-expression-print-length 'custom-version "21.1") @@ -811,7 +850,7 @@ (custom-put-if-not 'gnus-charset 'custom-version "21.1") (custom-put-if-not 'gnus-charset 'group-documentation "Group character set issues.") (custom-put-if-not 'calculator 'custom-version "21.1") -(custom-put-if-not 'calculator 'group-documentation "Simple pocket calculator.") +(custom-put-if-not 'calculator 'group-documentation "Simple Emacs calculator.") (custom-put-if-not 'custom-button-pressed-face 'custom-version "21.1") (custom-put-if-not 'custom-button-pressed-face 'group-documentation nil) (custom-put-if-not 'dos-codepage-setup-hook 'custom-version "20.3.3") @@ -834,6 +873,8 @@ (custom-put-if-not 'cperl 'group-documentation "Major mode for editing Perl code.") (custom-put-if-not 'focus-follows-mouse 'custom-version "20.3") (custom-put-if-not 'focus-follows-mouse 'standard-value t) +(custom-put-if-not 'message-forward-as-mime 'custom-version "21.1") +(custom-put-if-not 'message-forward-as-mime 'standard-value t) (custom-put-if-not 'pcl-cvs 'custom-version "21.1") (custom-put-if-not 'pcl-cvs 'group-documentation "Special support for the CVS versioning system.") (custom-put-if-not 'windmove 'custom-version "21.1") @@ -844,6 +885,8 @@ (custom-put-if-not 'vc-cvs-stay-local 'standard-value t) (custom-put-if-not 'fortran-comment-line-start-skip 'custom-version "21.1") (custom-put-if-not 'fortran-comment-line-start-skip 'standard-value t) +(custom-put-if-not 'gnus-list-identifiers 'custom-version "21.1") +(custom-put-if-not 'gnus-list-identifiers 'standard-value t) (custom-put-if-not 'checkdoc 'custom-version "20.3") (custom-put-if-not 'checkdoc 'group-documentation "Support for doc string checking in Emacs Lisp.") (custom-put-if-not 'imap 'custom-version "21.1") @@ -852,6 +895,8 @@ (custom-put-if-not 'change-log-acknowledgement-face 'group-documentation nil) (custom-put-if-not 'mail-abbrevs-mode 'custom-version "20.3") (custom-put-if-not 'mail-abbrevs-mode 'standard-value t) +(custom-put-if-not 'message-forward-ignored-headers 'custom-version "21.1") +(custom-put-if-not 'message-forward-ignored-headers 'standard-value t) (custom-put-if-not 'eudc 'custom-version "21.1") (custom-put-if-not 'eudc 'group-documentation "Emacs Unified Directory Client.") (custom-put-if-not 'scrolling 'custom-version "21.1") @@ -862,6 +907,10 @@ (custom-put-if-not 'temp-buffer-max-height 'standard-value t) (custom-put-if-not 'border 'custom-version "21.1") (custom-put-if-not 'border 'group-documentation nil) +(custom-put-if-not 'nnmail-scan-directory-mail-source-once 'custom-version "21.1") +(custom-put-if-not 'nnmail-scan-directory-mail-source-once 'standard-value t) +(custom-put-if-not 'gnus-preserve-marks 'custom-version "21.1") +(custom-put-if-not 'gnus-preserve-marks 'standard-value t) (custom-put-if-not 'speedbar-indentation-width 'custom-version "21.1") (custom-put-if-not 'speedbar-indentation-width 'standard-value t) (custom-put-if-not 'hl-line 'custom-version "21.1") @@ -872,26 +921,42 @@ (custom-put-if-not 'custom-comment-face 'group-documentation nil) (custom-put-if-not 'custom-raised-buttons 'custom-version "21.1") (custom-put-if-not 'custom-raised-buttons 'standard-value t) +(custom-put-if-not 'gnus-inhibit-user-auto-expire 'custom-version "21.1") +(custom-put-if-not 'gnus-inhibit-user-auto-expire 'standard-value t) (custom-put-if-not 'show-paren-ring-bell-on-mismatch 'custom-version "20.3") (custom-put-if-not 'show-paren-ring-bell-on-mismatch 'standard-value t) (custom-put-if-not 'rmail-default-body-file 'custom-version "20.3") (custom-put-if-not 'rmail-default-body-file 'standard-value t) +(custom-put-if-not 'gnus-emphasize-whitespace-regexp 'custom-version "21.1") +(custom-put-if-not 'gnus-emphasize-whitespace-regexp 'standard-value t) +(custom-put-if-not 'gnus-summary-show-article-charset-alist 'custom-version "21.1") +(custom-put-if-not 'gnus-summary-show-article-charset-alist 'standard-value t) (custom-put-if-not 'vc-dired-listing-switches 'custom-version "21.1") (custom-put-if-not 'vc-dired-listing-switches 'standard-value t) (custom-put-if-not 'rmail-movemail-flags 'custom-version "20.3") (custom-put-if-not 'rmail-movemail-flags 'standard-value t) (custom-put-if-not 'sql-sybase-options 'custom-version "20.8") (custom-put-if-not 'sql-sybase-options 'standard-value t) +(custom-put-if-not 'gnus-read-newsrc-file 'custom-version "21.1") +(custom-put-if-not 'gnus-read-newsrc-file 'standard-value t) (custom-put-if-not 'recentf 'custom-version "21.1") (custom-put-if-not 'recentf 'group-documentation "Maintain a menu of recently opened files.") +(custom-put-if-not 'nnmail-split-header-length-limit 'custom-version "21.1") +(custom-put-if-not 'nnmail-split-header-length-limit 'standard-value t) +(custom-put-if-not 'gnus-ignored-mime-types 'custom-version "21.1") +(custom-put-if-not 'gnus-ignored-mime-types 'standard-value t) (custom-put-if-not 'fortune 'custom-version "21.1") (custom-put-if-not 'fortune 'group-documentation "Settings for fortune.") +(custom-put-if-not 'gnus-agent-confirmation-function 'custom-version "21.1") +(custom-put-if-not 'gnus-agent-confirmation-function 'standard-value t) (custom-put-if-not 'dired-at-point-require-prefix 'custom-version "20.3") (custom-put-if-not 'dired-at-point-require-prefix 'standard-value t) (custom-put-if-not 'diff-mode 'custom-version "21.1") (custom-put-if-not 'diff-mode 'group-documentation "Major mode for viewing/editing diffs") (custom-put-if-not 'sql-mysql-options 'custom-version "20.8") (custom-put-if-not 'sql-mysql-options 'standard-value t) +(custom-put-if-not 'gnus-group-highlight-words-alist 'custom-version "21.1") +(custom-put-if-not 'gnus-group-highlight-words-alist 'standard-value t) (custom-put-if-not 'dabbrev-ignored-buffer-names 'custom-version "20.3") (custom-put-if-not 'dabbrev-ignored-buffer-names 'standard-value t) (custom-put-if-not 'change-log-file-face 'custom-version "21.1") @@ -902,6 +967,10 @@ (custom-put-if-not 'browse-url-lynx-emacs-args 'standard-value t) (custom-put-if-not 'tooltip 'custom-version "21.1") (custom-put-if-not 'tooltip 'group-documentation "Customization group for the `tooltip' package.") +(custom-put-if-not 'gnus-newsgroup-ignored-charsets 'custom-version "21.1") +(custom-put-if-not 'gnus-newsgroup-ignored-charsets 'standard-value t) +(custom-put-if-not 'message-send-mail-partially-limit 'custom-version "21.1") +(custom-put-if-not 'message-send-mail-partially-limit 'standard-value t) (custom-put-if-not 'quickurl 'custom-version "21.1") (custom-put-if-not 'quickurl 'group-documentation "Insert an URL based on text at point in buffer.") (custom-put-if-not 'tool-bar 'custom-version "21.1") @@ -914,10 +983,14 @@ (custom-put-if-not 'change-log-function-face 'group-documentation nil) (custom-put-if-not 'hscroll-global-mode 'custom-version "20.3") (custom-put-if-not 'hscroll-global-mode 'standard-value t) +(custom-put-if-not 'message-default-charset 'custom-version "21.1") +(custom-put-if-not 'message-default-charset 'standard-value t) (custom-put-if-not 'auto-save-file-name-transforms 'custom-version "21.1") (custom-put-if-not 'auto-save-file-name-transforms 'standard-value t) (custom-put-if-not 'tags-apropos-verbose 'custom-version "21.1") (custom-put-if-not 'tags-apropos-verbose 'standard-value t) +(custom-put-if-not 'mailcap 'custom-version "21.1") +(custom-put-if-not 'mailcap 'group-documentation "Definition of viewers for MIME types.") (custom-put-if-not 'dabbrev-ignored-regexps 'custom-version "21.1") (custom-put-if-not 'dabbrev-ignored-regexps 'standard-value t) (custom-put-if-not 'find-variable-regexp 'custom-version "21.1") @@ -943,7 +1016,7 @@ (custom-put-if-not 'eval-expression-print-level 'custom-version "21.1") (custom-put-if-not 'eval-expression-print-level 'standard-value t) -(defvar custom-versions-load-alist '(("20.3.3" "dos-vars") (21.1 "ange-ftp") ("20.4" "files" "help" "sh-script" "compile") ("20.3" "desktop" "easymenu" "hscroll" "dabbrev" "ffap" "rmail" "paren" "mailabbrev" "frame" "uce" "mouse" "diary-lib" "sendmail" "debug" "hexl" "vcursor" "vc" "compile" "etags" "help" "browse-url" "add-log" "find-func" "cus-edit" "replace") ("21.1" "server" "debug" "dabbrev" "vc" "paths" "sgml-mode" "net-utils" "font-lock" "gnus-nocem" "vc-hooks" "paren" "fortran" "etags" "cus-edit" "frame" "vc-sccs" "files" "add-log" "find-func" "wid-edit" "vc-rcs" "vc-cvs" "simple" "browse-url" "speedbar") ("20.8" "ansi-color" "sql")) +(defvar custom-versions-load-alist '(("20.3.3" "dos-vars") (21.1 "ange-ftp") ("20.4" "files" "help" "sh-script" "compile") ("20.3" "desktop" "easymenu" "hscroll" "dabbrev" "ffap" "rmail" "paren" "mailabbrev" "frame" "uce" "mouse" "diary-lib" "sendmail" "debug" "hexl" "vcursor" "vc" "compile" "etags" "help" "browse-url" "add-log" "find-func" "cus-edit" "replace") ("21.1" "server" "debug" "dabbrev" "gnus-start" "vc" "paths" "sgml-mode" "net-utils" "rmail" "font-lock" "gnus-nocem" "vc-hooks" "paren" "faces" "fortran" "etags" "cus-edit" "frame" "vc-sccs" "gnus-group" "gnus-sum" "files" "add-log" "find-func" "wid-edit" "vc-rcs" "nnmail" "message" "vc-cvs" "simple" "gnus-agent" "gnus-art" "browse-url" "speedbar") ("20.8" "ansi-color" "sql")) "For internal use by custom.") (provide 'cus-load)
--- a/lisp/loaddefs.el Mon Dec 04 12:25:36 2000 +0000 +++ b/lisp/loaddefs.el Mon Dec 04 12:28:37 2000 +0000 @@ -4,7 +4,7 @@ ;;;### (autoloads (5x5-crack 5x5-crack-xor-mutate 5x5-crack-mutating-best ;;;;;; 5x5-crack-mutating-current 5x5-crack-randomly 5x5) "5x5" -;;;;;; "play/5x5.el" (14247 4566)) +;;;;;; "play/5x5.el" (14885 9098)) ;;; Generated autoloads from play/5x5.el (autoload (quote 5x5) "5x5" "\ @@ -52,7 +52,7 @@ ;;;*** ;;;### (autoloads (ada-mode ada-add-extensions) "ada-mode" "progmodes/ada-mode.el" -;;;;;; (14821 31351)) +;;;;;; (14876 60332)) ;;; Generated autoloads from progmodes/ada-mode.el (autoload (quote ada-add-extensions) "ada-mode" "\ @@ -108,7 +108,7 @@ ;;;*** ;;;### (autoloads (ada-header) "ada-stmt" "progmodes/ada-stmt.el" -;;;;;; (14821 31351)) +;;;;;; (14877 36787)) ;;; Generated autoloads from progmodes/ada-stmt.el (autoload (quote ada-header) "ada-stmt" "\ @@ -217,8 +217,8 @@ ;;;*** ;;;### (autoloads (defadvice ad-add-advice ad-default-compilation-action -;;;;;; ad-redefinition-action) "advice" "emacs-lisp/advice.el" (14660 -;;;;;; 49405)) +;;;;;; ad-redefinition-action) "advice" "emacs-lisp/advice.el" (14874 +;;;;;; 16519)) ;;; Generated autoloads from emacs-lisp/advice.el (defvar ad-redefinition-action (quote warn) "\ @@ -385,7 +385,7 @@ ;;;*** ;;;### (autoloads (ange-ftp-hook-function ange-ftp-reread-dir) "ange-ftp" -;;;;;; "net/ange-ftp.el" (14729 20675)) +;;;;;; "net/ange-ftp.el" (14868 1431)) ;;; Generated autoloads from net/ange-ftp.el (defalias 'ange-ftp-re-read-dir 'ange-ftp-reread-dir) @@ -404,10 +404,27 @@ ;;;*** -;;;### (autoloads (antlr-set-tabs antlr-mode) "antlr-mode" "progmodes/antlr-mode.el" -;;;;;; (14642 37233)) +;;;### (autoloads (antlr-set-tabs antlr-mode antlr-show-makefile-rules) +;;;;;; "antlr-mode" "progmodes/antlr-mode.el" (14885 13467)) ;;; Generated autoloads from progmodes/antlr-mode.el +(autoload (quote antlr-show-makefile-rules) "antlr-mode" "\ +Show Makefile rules for all grammar files in the current directory. +If the `major-mode' of the current buffer has the value `makefile-mode', +the rules are directory inserted at point. Otherwise, a *Help* buffer +is shown with the rules which are also put into the `kill-ring' for +\\[yank]. + +This command considers import/export vocabularies and grammar +inheritance and provides a value for the \"-glib\" option if necessary. +Customize variable `antlr-makefile-specification' for the appearance of +the rules. + +If the file for a super-grammar cannot be determined, special file names +are used according to variable `antlr-unknown-file-formats' and a +commentary with value `antlr-help-unknown-file-text' is added. The +*Help* buffer always starts with the text in `antlr-help-rules-intro'." t nil) + (autoload (quote antlr-mode) "antlr-mode" "\ Major mode for editing ANTLR grammar files. \\{antlr-mode-map}" t nil) @@ -473,8 +490,8 @@ ;;;*** ;;;### (autoloads (apropos-documentation apropos-value apropos apropos-command -;;;;;; apropos-variable apropos-mode) "apropos" "apropos.el" (14812 -;;;;;; 23964)) +;;;;;; apropos-variable apropos-mode) "apropos" "apropos.el" (14883 +;;;;;; 29489)) ;;; Generated autoloads from apropos.el (autoload (quote apropos-mode) "apropos" "\ @@ -606,6 +623,210 @@ ;;;*** +;;;### (autoloads (artist-mode) "artist" "textmodes/artist.el" (14873 +;;;;;; 31240)) +;;; Generated autoloads from textmodes/artist.el + +(autoload (quote artist-mode) "artist" "\ +Toggle artist mode. With arg, turn artist mode on if arg is positive. +Artist lets you draw lines, squares, rectangles and poly-lines, ellipses +and circles with your mouse and/or keyboard. + +How to quit artist mode + + Type \\[artist-mode-off] to quit artist-mode. + + +How to submit a bug report + + Type \\[artist-submit-bug-report] to submit a bug report. + + +Drawing with the mouse: + + mouse-2 + shift mouse-2 Pops up a menu where you can select what to draw with + mouse-1, and where you can do some settings (described + below). + + mouse-1 + shift mouse-1 Draws lines, rectangles or poly-lines, erases, cuts, copies + or pastes: + + Operation Not shifted Shifted + -------------------------------------------------------------- + Pen fill-char at point line from last point + to new point + -------------------------------------------------------------- + Line Line in any direction Straight line + -------------------------------------------------------------- + Rectangle Rectangle Square + -------------------------------------------------------------- + Poly-line Poly-line in any dir Straight poly-lines + -------------------------------------------------------------- + Ellipses Ellipses Circles + -------------------------------------------------------------- + Text Text (see thru) Text (overwrite) + -------------------------------------------------------------- + Spray-can Spray-can Set size for spray + -------------------------------------------------------------- + Erase Erase character Erase rectangle + -------------------------------------------------------------- + Vaporize Erase single line Erase connected + lines + -------------------------------------------------------------- + Cut Cut rectangle Cut square + -------------------------------------------------------------- + Copy Copy rectangle Copy square + -------------------------------------------------------------- + Paste Paste Paste + -------------------------------------------------------------- + Flood-fill Flood-fill Flood-fill + -------------------------------------------------------------- + + * Straight lines can only go horiziontally, vertically + or diagonally. + + * Poly-lines are drawn while holding mouse-1 down. When you + release the button, the point is set. If you want a segment + to be straight, hold down shift before pressing the + mouse-1 button. Click mouse-2 or mouse-3 to stop drawing + poly-lines. + + * See thru for text means that text already in the buffer + will be visible through blanks in the text rendered, while + overwrite means the opposite. + + * Vaporizing connected lines only vaporizes lines whose + _endpoints_ are connected. See also the variable + `artist-vaporize-fuzziness'. + + * Cut copies, then clears the rectangle/square. + + * When drawing lines or poly-lines, you can set arrows. + See below under ``Arrows'' for more info. + + * The mode line shows the currently selected drawing operation. + In addition, if it has an asterisk (*) at the end, you + are currently drawing something. + + * Be patient when flood-filling -- large areas take quite + some time to fill. + + + mouse-3 Erases character under pointer + shift mouse-3 Erases rectangle + + +Settings + + Set fill Sets the character used when filling rectangles/squares + + Set line Sets the character used when drawing lines + + Erase char Sets the character used when erasing + + Rubber-banding Toggles rubber-banding + + Trimming Toggles trimming of line-endings (that is: when the shape + is drawn, extraneous white-space at end of lines is removed) + + Borders Toggles the drawing of line borders around filled shapes. + + +Drawing with keys + + \\[artist-key-set-point] Does one of the following: + For lines/rectangles/squares: sets the first/second endpoint + For poly-lines: sets a point (use C-u \\[artist-key-set-point] to set last point) + When erase characters: toggles erasing + When cutting/copying: Sets first/last endpoint of rect/square + When pasting: Pastes + + \\[artist-select-operation] Selects what to draw + + Move around with \\[artist-next-line], \\[artist-previous-line], \\[artist-forward-char] and \\[artist-backward-char]. + + \\[artist-select-fill-char] Sets the charater to use when filling + \\[artist-select-line-char] Sets the charater to use when drawing + \\[artist-select-erase-char] Sets the charater to use when erasing + \\[artist-toggle-rubber-banding] Toggles rubber-banding + \\[artist-toggle-trim-line-endings] Toggles trimming of line-endings + \\[artist-toggle-borderless-shapes] Toggles borders on drawn shapes + + +Arrows + + \\[artist-toggle-first-arrow] Sets/unsets an arrow at the beginning + of the line/poly-line + + \\[artist-toggle-second-arrow] Sets/unsets an arrow at the end + of the line/poly-line + + +Selecting operation + + There are some keys for quickly selecting drawing operations: + + \\[artist-select-op-line] Selects drawing lines + \\[artist-select-op-straight-line] Selects drawing straight lines + \\[artist-select-op-rectangle] Selects drawing rectangles + \\[artist-select-op-square] Selects drawing squares + \\[artist-select-op-poly-line] Selects drawing poly-lines + \\[artist-select-op-straight-poly-line] Selects drawing straight poly-lines + \\[artist-select-op-ellipse] Selects drawing ellipses + \\[artist-select-op-circle] Selects drawing circles + \\[artist-select-op-text-see-thru] Selects rendering text (see thru) + \\[artist-select-op-text-overwrite] Selects rendering text (overwrite) + \\[artist-select-op-spray-can] Spray with spray-can + \\[artist-select-op-spray-set-size] Set size for the spray-can + \\[artist-select-op-erase-char] Selects erasing characters + \\[artist-select-op-erase-rectangle] Selects erasing rectangles + \\[artist-select-op-vaporize-line] Selects vaporizing single lines + \\[artist-select-op-vaporize-lines] Selects vaporizing connected lines + \\[artist-select-op-cut-rectangle] Selects cutting rectangles + \\[artist-select-op-copy-rectangle] Selects copying rectangles + \\[artist-select-op-paste] Selects pasting + \\[artist-select-op-flood-fill] Selects flood-filling + + +Variables + + This is a brief overview of the different varaibles. For more info, + see the documentation for the variables (type \\[describe-variable] <variable> RET). + + artist-rubber-banding Interactively do rubber-banding or not + artist-first-char What to set at first/second point... + artist-second-char ...when not rubber-banding + artist-interface-with-rect If cut/copy/paste should interface with rect + artist-arrows The arrows to use when drawing arrows + artist-aspect-ratio Character height-to-width for squares + artist-trim-line-endings Trimming of line endings + artist-flood-fill-right-border Right border when flood-filling + artist-flood-fill-show-incrementally Update display while filling + artist-pointer-shape Pointer shape to use while drawing + artist-ellipse-left-char Character to use for narrow ellipses + artist-ellipse-right-char Character to use for narrow ellipses + artist-borderless-shapes If shapes should have borders + artist-picture-compatibility Whether or not to be picture mode compatible + artist-vaporize-fuzziness Tolerance when recognizing lines + artist-spray-interval Seconds between repeated sprayings + artist-spray-radius Size of the spray-area + artist-spray-chars The spray-``color'' + artist-spray-new-chars Initial spray-``color'' + +Hooks + + When entering artist-mode, the hook `artist-mode-init-hook' is called. + When quitting artist-mode, the hook `artist-mode-exit-hook' is called. + + +Keymap summary + +\\{artist-mode-map}" t nil) + +;;;*** + ;;;### (autoloads (asm-mode) "asm-mode" "progmodes/asm-mode.el" (14807 ;;;;;; 56561)) ;;; Generated autoloads from progmodes/asm-mode.el @@ -633,24 +854,6 @@ ;;;*** -;;;### (autoloads (batch-update-authors authors) "authors" "emacs-lisp/authors.el" -;;;;;; (14849 35128)) -;;; Generated autoloads from emacs-lisp/authors.el - -(autoload (quote authors) "authors" "\ -Extract author information from change logs and Lisp source files. -ROOT is the root directory under which to find the files. If called -interactively, ROOT is read from the minibuffer. Result is a -buffer *Authors* containing authorship information." t nil) - -(autoload (quote batch-update-authors) "authors" "\ -Produce an AUTHORS file. -Call this function in batch mode with two command line arguments FILE -and ROOT. FILE is the file to write, ROOT is the root directory of -the Emacs source tree, from which to build the file." nil nil) - -;;;*** - ;;;### (autoloads (auto-show-mode auto-show-mode) "auto-show" "auto-show.el" ;;;;;; (14777 22130)) ;;; Generated autoloads from auto-show.el @@ -728,7 +931,7 @@ ;;;*** ;;;### (autoloads (auto-insert-mode define-auto-insert auto-insert) -;;;;;; "autoinsert" "autoinsert.el" (14855 56552)) +;;;;;; "autoinsert" "autoinsert.el" (14876 60331)) ;;; Generated autoloads from autoinsert.el (autoload (quote auto-insert) "autoinsert" "\ @@ -823,7 +1026,7 @@ ;;;*** ;;;### (autoloads (mouse-avoidance-mode mouse-avoidance-mode) "avoid" -;;;;;; "avoid.el" (14777 22132)) +;;;;;; "avoid.el" (14877 9921)) ;;; Generated autoloads from avoid.el (defvar mouse-avoidance-mode nil "\ @@ -1413,7 +1616,7 @@ ;;;;;; browse-url-of-dired-file browse-url-of-buffer browse-url-of-file ;;;;;; browse-url-generic-program browse-url-save-file browse-url-netscape-display ;;;;;; browse-url-new-window-p browse-url-browser-function) "browse-url" -;;;;;; "net/browse-url.el" (14821 31351)) +;;;;;; "net/browse-url.el" (14862 37898)) ;;; Generated autoloads from net/browse-url.el (defvar browse-url-browser-function (if (eq system-type (quote windows-nt)) (quote browse-url-default-windows-browser) (quote browse-url-netscape)) "\ @@ -1626,7 +1829,7 @@ ;;;*** ;;;### (autoloads (bs-show bs-customize bs-cycle-previous bs-cycle-next) -;;;;;; "bs" "bs.el" (14777 22138)) +;;;;;; "bs" "bs.el" (14886 21309)) ;;; Generated autoloads from bs.el (autoload (quote bs-cycle-next) "bs" "\ @@ -1661,7 +1864,7 @@ ;;;### (autoloads (batch-byte-recompile-directory batch-byte-compile ;;;;;; display-call-tree byte-compile compile-defun byte-compile-file ;;;;;; byte-recompile-directory byte-force-recompile) "bytecomp" -;;;;;; "emacs-lisp/bytecomp.el" (14859 7672)) +;;;;;; "emacs-lisp/bytecomp.el" (14859 11531)) ;;; Generated autoloads from emacs-lisp/bytecomp.el (autoload (quote byte-force-recompile) "bytecomp" "\ @@ -1747,12 +1950,12 @@ ;;;*** -;;;### (autoloads (calculator) "calculator" "calculator.el" (14777 -;;;;;; 22140)) +;;;### (autoloads (calculator) "calculator" "calculator.el" (14873 +;;;;;; 6783)) ;;; Generated autoloads from calculator.el (autoload (quote calculator) "calculator" "\ -Run the pocket calculator. +Run the Emacs calculator. See the documentation for `calculator-mode' for more information." t nil) ;;;*** @@ -1773,7 +1976,7 @@ ;;;;;; calendar-remove-frame-by-deleting mark-diary-entries-in-calendar ;;;;;; number-of-diary-entries view-diary-entries-initially calendar-offset ;;;;;; calendar-week-start-day) "calendar" "calendar/calendar.el" -;;;;;; (14854 32222)) +;;;;;; (14875 40521)) ;;; Generated autoloads from calendar/calendar.el (defvar calendar-week-start-day 0 "\ @@ -2665,7 +2868,7 @@ ;;;;;; checkdoc-continue checkdoc-start checkdoc-current-buffer ;;;;;; checkdoc-eval-current-buffer checkdoc-message-interactive ;;;;;; checkdoc-interactive checkdoc) "checkdoc" "emacs-lisp/checkdoc.el" -;;;;;; (14482 54417)) +;;;;;; (14866 25750)) ;;; Generated autoloads from emacs-lisp/checkdoc.el (autoload (quote checkdoc) "checkdoc" "\ @@ -2790,10 +2993,10 @@ With prefix ARG, turn Checkdoc minor mode on iff ARG is positive. In Checkdoc minor mode, the usual bindings for `eval-defun' which is -bound to \\<checkdoc-minor-keymap> \\[checkdoc-eval-defun] and `checkdoc-eval-current-buffer' are overridden to include +bound to \\<checkdoc-minor-mode-map> \\[checkdoc-eval-defun] and `checkdoc-eval-current-buffer' are overridden to include checking of documentation strings. -\\{checkdoc-minor-keymap}" t nil) +\\{checkdoc-minor-mode-map}" t nil) ;;;*** @@ -2819,7 +3022,7 @@ ;;;*** ;;;### (autoloads (command-history list-command-history repeat-matching-complex-command) -;;;;;; "chistory" "chistory.el" (14821 31343)) +;;;;;; "chistory" "chistory.el" (14883 31697)) ;;; Generated autoloads from chistory.el (autoload (quote repeat-matching-complex-command) "chistory" "\ @@ -2852,7 +3055,7 @@ ;;;*** -;;;### (autoloads nil "cl" "emacs-lisp/cl.el" (14753 19207)) +;;;### (autoloads nil "cl" "emacs-lisp/cl.el" (14886 9525)) ;;; Generated autoloads from emacs-lisp/cl.el (defvar custom-print-functions nil "\ @@ -2893,15 +3096,15 @@ ;;;*** -;;;### (autoloads (run-scheme) "cmuscheme" "cmuscheme.el" (14831 -;;;;;; 12714)) +;;;### (autoloads (run-scheme) "cmuscheme" "cmuscheme.el" (14865 +;;;;;; 26959)) ;;; Generated autoloads from cmuscheme.el (autoload (quote run-scheme) "cmuscheme" "\ Run an inferior Scheme process, input and output via buffer *scheme*. If there is a process already running in `*scheme*', switch to that buffer. With argument, allows you to edit the command line (default is value -of `cmuscheme-program-name'). Runs the hooks `inferior-scheme-mode-hook' +of `scheme-program-name'). Runs the hooks `inferior-scheme-mode-hook' \(after the `comint-mode-hook' is run). \(Type \\[describe-mode] in the process buffer for a list of commands.)" t nil) (add-hook 'same-window-buffer-names "*scheme*") @@ -3037,7 +3240,7 @@ ;;;### (autoloads (next-error compilation-minor-mode compilation-shell-minor-mode ;;;;;; compilation-mode grep-find grep compile compilation-search-path ;;;;;; compilation-ask-about-save compilation-window-height compilation-mode-hook) -;;;;;; "compile" "progmodes/compile.el" (14813 40531)) +;;;;;; "compile" "progmodes/compile.el" (14866 25750)) ;;; Generated autoloads from progmodes/compile.el (defvar compilation-mode-hook nil "\ @@ -3688,7 +3891,7 @@ ;;;;;; customize-option-other-window customize-changed-options customize-option ;;;;;; customize-group-other-window customize-group customize customize-save-variable ;;;;;; customize-set-variable customize-set-value) "cus-edit" "cus-edit.el" -;;;;;; (14847 14322)) +;;;;;; (14886 20133)) ;;; Generated autoloads from cus-edit.el (add-hook 'same-window-regexps "\\`\\*Customiz.*\\*\\'") @@ -3847,7 +4050,7 @@ ;;;*** ;;;### (autoloads (custom-set-faces custom-declare-face) "cus-face" -;;;;;; "cus-face.el" (14777 22155)) +;;;;;; "cus-face.el" (14883 29489)) ;;; Generated autoloads from cus-face.el (autoload (quote custom-declare-face) "cus-face" "\ @@ -4245,10 +4448,41 @@ ;;;*** -;;;### (autoloads (derived-mode-init-mode-variables) "derived" "derived.el" -;;;;;; (14777 22160)) +;;;### (autoloads (derived-mode-init-mode-variables define-derived-mode) +;;;;;; "derived" "derived.el" (14891 28342)) ;;; Generated autoloads from derived.el +(autoload (quote define-derived-mode) "derived" "\ +Create a new mode as a variant of an existing mode. + +The arguments to this command are as follow: + +CHILD: the name of the command for the derived mode. +PARENT: the name of the command for the parent mode (e.g. `text-mode'). +NAME: a string which will appear in the status line (e.g. \"Hypertext\") +DOCSTRING: an optional documentation string--if you do not supply one, + the function will attempt to invent something useful. +BODY: forms to execute just before running the + hooks for the new mode. + +Here is how you could define LaTeX-Thesis mode as a variant of LaTeX mode: + + (define-derived-mode LaTeX-thesis-mode LaTeX-mode \"LaTeX-Thesis\") + +You could then make new key bindings for `LaTeX-thesis-mode-map' +without changing regular LaTeX mode. In this example, BODY is empty, +and DOCSTRING is generated by default. + +On a more complicated level, the following command uses `sgml-mode' as +the parent, and then sets the variable `case-fold-search' to nil: + + (define-derived-mode article-mode sgml-mode \"Article\" + \"Major mode for editing technical articles.\" + (setq case-fold-search nil)) + +Note that if the documentation string had been left out, it would have +been generated automatically, with a reference to the keymap." nil (quote macro)) + (autoload (quote derived-mode-init-mode-variables) "derived" "\ Initialise variables for a new MODE. Right now, if they don't already exist, set up a blank keymap, an @@ -4333,7 +4567,7 @@ ;;;*** ;;;### (autoloads (diary-mail-entries diary) "diary-lib" "calendar/diary-lib.el" -;;;;;; (14821 46405)) +;;;;;; (14886 18220)) ;;; Generated autoloads from calendar/diary-lib.el (autoload (quote diary) "diary-lib" "\ @@ -4392,7 +4626,7 @@ ;;;*** ;;;### (autoloads (diff-minor-mode diff-mode) "diff-mode" "diff-mode.el" -;;;;;; (14832 4348)) +;;;;;; (14866 25750)) ;;; Generated autoloads from diff-mode.el (autoload (quote diff-mode) "diff-mode" "\ @@ -4412,7 +4646,7 @@ ;;;;;; dired dired-copy-preserve-time dired-dwim-target dired-keep-marker-symlink ;;;;;; dired-keep-marker-hardlink dired-keep-marker-copy dired-keep-marker-rename ;;;;;; dired-trivial-filenames dired-ls-F-marks-symlinks dired-listing-switches) -;;;;;; "dired" "dired.el" (14856 13563)) +;;;;;; "dired" "dired.el" (14883 29489)) ;;; Generated autoloads from dired.el (defvar dired-listing-switches "-al" "\ @@ -4516,7 +4750,7 @@ ;;;;;; dired-do-compress dired-compress-file dired-do-kill-lines ;;;;;; dired-do-shell-command dired-do-print dired-do-chown dired-do-chgrp ;;;;;; dired-do-chmod dired-backup-diff dired-diff) "dired-aux" -;;;;;; "dired-aux.el" (14812 23964)) +;;;;;; "dired-aux.el" (14883 57152)) ;;; Generated autoloads from dired-aux.el (autoload (quote dired-diff) "dired-aux" "\ @@ -4918,9 +5152,9 @@ ;;;*** -;;;### (autoloads (define-derived-mode easy-mmode-defsyntax easy-mmode-defmap -;;;;;; easy-mmode-define-keymap easy-mmode-define-global-mode define-minor-mode) -;;;;;; "easy-mmode" "emacs-lisp/easy-mmode.el" (14850 36349)) +;;;### (autoloads (easy-mmode-defsyntax easy-mmode-defmap easy-mmode-define-keymap +;;;;;; easy-mmode-define-global-mode define-minor-mode) "easy-mmode" +;;;;;; "emacs-lisp/easy-mmode.el" (14891 28342)) ;;; Generated autoloads from emacs-lisp/easy-mmode.el (defalias (quote easy-mmode-define-minor-mode) (quote define-minor-mode)) @@ -4963,7 +5197,7 @@ KEY and BINDINGS are suitable for `define-key'. Optional NAME is passed to `make-sparse-keymap'. Optional map M can be used to modify an existing map. -ARGS is a list of additional arguments." nil nil) +ARGS is a list of additional keyword arguments." nil nil) (autoload (quote easy-mmode-defmap) "easy-mmode" nil nil (quote macro)) @@ -4972,37 +5206,6 @@ CSS contains a list of syntax specifications of the form (CHAR . SYNTAX). " nil (quote macro)) -(autoload (quote define-derived-mode) "easy-mmode" "\ -Create a new mode as a variant of an existing mode. - -The arguments to this command are as follow: - -CHILD: the name of the command for the derived mode. -PARENT: the name of the command for the parent mode (e.g. `text-mode'). -NAME: a string which will appear in the status line (e.g. \"Hypertext\") -DOCSTRING: an optional documentation string--if you do not supply one, - the function will attempt to invent something useful. -BODY: forms to execute just before running the - hooks for the new mode. - -Here is how you could define LaTeX-Thesis mode as a variant of LaTeX mode: - - (define-derived-mode LaTeX-thesis-mode LaTeX-mode \"LaTeX-Thesis\") - -You could then make new key bindings for `LaTeX-thesis-mode-map' -without changing regular LaTeX mode. In this example, BODY is empty, -and DOCSTRING is generated by default. - -On a more complicated level, the following command uses `sgml-mode' as -the parent, and then sets the variable `case-fold-search' to nil: - - (define-derived-mode article-mode sgml-mode \"Article\" - \"Major mode for editing technical articles.\" - (setq case-fold-search nil)) - -Note that if the documentation string had been left out, it would have -been generated automatically, with a reference to the keymap." nil (quote macro)) - ;;;*** ;;;### (autoloads (easy-menu-change easy-menu-create-menu easy-menu-do-define @@ -5321,7 +5524,7 @@ ;;;*** ;;;### (autoloads (edebug-eval-top-level-form def-edebug-spec edebug-all-forms -;;;;;; edebug-all-defs) "edebug" "emacs-lisp/edebug.el" (14821 31350)) +;;;;;; edebug-all-defs) "edebug" "emacs-lisp/edebug.el" (14875 62936)) ;;; Generated autoloads from emacs-lisp/edebug.el (defvar edebug-all-defs nil "\ @@ -5364,7 +5567,7 @@ ;;;;;; ediff-merge-directory-revisions ediff-merge-directories-with-ancestor ;;;;;; ediff-merge-directories ediff-directories3 ediff-directory-revisions ;;;;;; ediff-directories ediff-buffers3 ediff-buffers ediff-files3 -;;;;;; ediff-files) "ediff" "ediff.el" (14845 20843)) +;;;;;; ediff-files) "ediff" "ediff.el" (14862 37894)) ;;; Generated autoloads from ediff.el (autoload (quote ediff-files) "ediff" "\ @@ -5528,7 +5731,7 @@ ;;;*** ;;;### (autoloads (ediff-customize) "ediff-help" "ediff-help.el" -;;;;;; (14777 22188)) +;;;;;; (14878 17055)) ;;; Generated autoloads from ediff-help.el (autoload (quote ediff-customize) "ediff-help" nil t nil) @@ -5558,7 +5761,7 @@ ;;;*** ;;;### (autoloads (ediff-toggle-use-toolbar ediff-toggle-multiframe) -;;;;;; "ediff-util" "ediff-util.el" (14845 20843)) +;;;;;; "ediff-util" "ediff-util.el" (14875 62935)) ;;; Generated autoloads from ediff-util.el (autoload (quote ediff-toggle-multiframe) "ediff-util" "\ @@ -5661,7 +5864,7 @@ ;;;*** ;;;### (autoloads (turn-on-eldoc-mode eldoc-mode eldoc-minor-mode-string -;;;;;; eldoc-mode) "eldoc" "emacs-lisp/eldoc.el" (14716 17385)) +;;;;;; eldoc-mode) "eldoc" "emacs-lisp/eldoc.el" (14890 7814)) ;;; Generated autoloads from emacs-lisp/eldoc.el (defvar eldoc-mode nil "\ @@ -5831,7 +6034,7 @@ ;;;*** ;;;### (autoloads (enriched-decode enriched-encode enriched-mode) -;;;;;; "enriched" "enriched.el" (14777 22210)) +;;;;;; "enriched" "enriched.el" (14885 14624)) ;;; Generated autoloads from enriched.el (autoload (quote enriched-mode) "enriched" "\ @@ -5908,8 +6111,8 @@ ;;;;;; pop-tag-mark find-tag-regexp find-tag-other-frame find-tag-other-window ;;;;;; find-tag find-tag-noselect tags-table-files visit-tags-table ;;;;;; find-tag-default-function find-tag-hook tags-add-tables tags-table-list -;;;;;; tags-case-fold-search) "etags" "progmodes/etags.el" (14821 -;;;;;; 31354)) +;;;;;; tags-case-fold-search) "etags" "progmodes/etags.el" (14862 +;;;;;; 37898)) ;;; Generated autoloads from progmodes/etags.el (defvar tags-file-name nil "\ @@ -6339,7 +6542,7 @@ ;;;### (autoloads (eudc-display-jpeg-as-button eudc-display-jpeg-inline ;;;;;; eudc-display-sound eudc-display-url eudc-display-generic-binary) -;;;;;; "eudc-bob" "net/eudc-bob.el" (14461 55579)) +;;;;;; "eudc-bob" "net/eudc-bob.el" (14867 31700)) ;;; Generated autoloads from net/eudc-bob.el (autoload (quote eudc-display-generic-binary) "eudc-bob" "\ @@ -6680,10 +6883,18 @@ ;;;*** ;;;### (autoloads (feedmail-queue-reminder feedmail-run-the-queue -;;;;;; feedmail-run-the-queue-global-prompt feedmail-run-the-queue-no-prompts) -;;;;;; "feedmail" "mail/feedmail.el" (14415 51114)) +;;;;;; feedmail-run-the-queue-global-prompt feedmail-run-the-queue-no-prompts +;;;;;; feedmail-send-it) "feedmail" "mail/feedmail.el" (14885 3818)) ;;; Generated autoloads from mail/feedmail.el +(autoload (quote feedmail-send-it) "feedmail" "\ +A function which is a suitable value for `send-mail-function'. +To use it, you probably want something like this in your .emacs or +similar place: + + (setq send-mail-function 'feedmail-send-it) + (autoload 'feedmail-send-it \"feedmail\")" nil nil) + (autoload (quote feedmail-run-the-queue-no-prompts) "feedmail" "\ Like feedmail-run-the-queue, but suppress confirmation prompts." t nil) @@ -6763,7 +6974,7 @@ ;;;*** ;;;### (autoloads (file-cache-minibuffer-complete) "filecache" "filecache.el" -;;;;;; (14767 36637)) +;;;;;; (14887 28113)) ;;; Generated autoloads from filecache.el (autoload (quote file-cache-minibuffer-complete) "filecache" "\ @@ -6982,7 +7193,7 @@ ;;;*** ;;;### (autoloads (finder-by-keyword finder-commentary finder-list-keywords) -;;;;;; "finder" "finder.el" (14747 44772)) +;;;;;; "finder" "finder.el" (14862 37894)) ;;; Generated autoloads from finder.el (autoload (quote finder-list-keywords) "finder" "\ @@ -7017,7 +7228,7 @@ ;;;### (autoloads (flyspell-mode-off flyspell-mode flyspell-prog-mode ;;;;;; flyspell-mode-line-string) "flyspell" "textmodes/flyspell.el" -;;;;;; (14845 20876)) +;;;;;; (14876 60333)) ;;; Generated autoloads from textmodes/flyspell.el (defvar flyspell-mode-line-string " Fly" "\ @@ -7135,14 +7346,11 @@ ;;;### (autoloads (font-lock-fontify-buffer global-font-lock-mode ;;;;;; font-lock-remove-keywords font-lock-add-keywords turn-on-font-lock -;;;;;; font-lock-mode) "font-lock" "font-lock.el" (14850 36349)) +;;;;;; font-lock-mode) "font-lock" "font-lock.el" (14873 20026)) ;;; Generated autoloads from font-lock.el (make-variable-buffer-local (quote font-lock-defaults)) -(defvar font-lock-mode-hook nil "\ -Function or functions to run on entry to Font Lock mode.") - (autoload (quote font-lock-mode) "font-lock" "\ Toggle Font Lock mode. With arg, turn Font Lock mode on if and only if arg is positive. @@ -7198,8 +7406,7 @@ buffer local value for `font-lock-defaults', via its mode hook." t nil) (autoload (quote turn-on-font-lock) "font-lock" "\ -Turn on Font Lock mode conditionally. -Turn on only if the terminal can display it." nil nil) +Turn on Font Lock mode (only if the terminal can display it)." nil nil) (autoload (quote font-lock-add-keywords) "font-lock" "\ Add highlighting KEYWORDS for MODE. @@ -7252,7 +7459,7 @@ ;;;*** ;;;### (autoloads (create-fontset-from-fontset-spec) "fontset" "international/fontset.el" -;;;;;; (14845 20876)) +;;;;;; (14891 28342)) ;;; Generated autoloads from international/fontset.el (autoload (quote create-fontset-from-fontset-spec) "fontset" "\ @@ -7324,7 +7531,7 @@ ;;;*** ;;;### (autoloads (fortran-mode fortran-tab-mode-default) "fortran" -;;;;;; "progmodes/fortran.el" (14799 2695)) +;;;;;; "progmodes/fortran.el" (14884 1390)) ;;; Generated autoloads from progmodes/fortran.el (defvar fortran-tab-mode-default nil "\ @@ -7462,7 +7669,7 @@ ;;;*** ;;;### (autoloads (gnus gnus-other-frame gnus-slave gnus-no-server -;;;;;; gnus-slave-no-server) "gnus" "gnus/gnus.el" (14845 20875)) +;;;;;; gnus-slave-no-server) "gnus" "gnus/gnus.el" (14859 52340)) ;;; Generated autoloads from gnus/gnus.el (autoload (quote gnus-slave-no-server) "gnus" "\ @@ -7492,7 +7699,7 @@ ;;;### (autoloads (gnus-agent-batch gnus-agent-batch-fetch gnus-agentize ;;;;;; gnus-plugged gnus-unplugged) "gnus-agent" "gnus/gnus-agent.el" -;;;;;; (14845 20874)) +;;;;;; (14862 37895)) ;;; Generated autoloads from gnus/gnus-agent.el (autoload (quote gnus-unplugged) "gnus-agent" "\ @@ -7520,7 +7727,7 @@ ;;;*** ;;;### (autoloads (gnus-article-prepare-display) "gnus-art" "gnus/gnus-art.el" -;;;;;; (14846 39264)) +;;;;;; (14875 40522)) ;;; Generated autoloads from gnus/gnus-art.el (autoload (quote gnus-article-prepare-display) "gnus-art" "\ @@ -7538,8 +7745,8 @@ ;;;*** ;;;### (autoloads (gnus-cache-generate-nov-databases gnus-cache-generate-active -;;;;;; gnus-jog-cache) "gnus-cache" "gnus/gnus-cache.el" (14792 -;;;;;; 2675)) +;;;;;; gnus-jog-cache) "gnus-cache" "gnus/gnus-cache.el" (14862 +;;;;;; 37896)) ;;; Generated autoloads from gnus/gnus-cache.el (autoload (quote gnus-jog-cache) "gnus-cache" "\ @@ -7557,7 +7764,7 @@ ;;;*** ;;;### (autoloads (gnus-fetch-group-other-frame gnus-fetch-group) -;;;;;; "gnus-group" "gnus/gnus-group.el" (14858 32484)) +;;;;;; "gnus-group" "gnus/gnus-group.el" (14875 56701)) ;;; Generated autoloads from gnus/gnus-group.el (autoload (quote gnus-fetch-group) "gnus-group" "\ @@ -7596,7 +7803,7 @@ ;;;### (autoloads (gnus-group-split-fancy gnus-group-split gnus-group-split-update ;;;;;; gnus-group-split-setup) "gnus-mlspl" "gnus/gnus-mlspl.el" -;;;;;; (14855 56553)) +;;;;;; (14862 37897)) ;;; Generated autoloads from gnus/gnus-mlspl.el (autoload (quote gnus-group-split-setup) "gnus-mlspl" "\ @@ -7608,19 +7815,30 @@ If AUTO-UPDATE is non-nil (prefix argument accepted, if called interactively), it makes sure nnmail-split-fancy is re-computed before getting new mail, by adding gnus-group-split-update to -nnmail-pre-get-new-mail-hook." t nil) +nnmail-pre-get-new-mail-hook. + +A non-nil CATCH-ALL replaces the current value of +gnus-group-split-default-catch-all-group. This variable is only used +by gnus-group-split-update, and only when its CATCH-ALL argument is +nil. This argument may contain any fancy split, that will be added as +the last split in a `|' split produced by gnus-group-split-fancy, +unless overridden by any group marked as a catch-all group. Typical +uses are as simple as the name of a default mail group, but more +elaborate fancy splits may also be useful to split mail that doesn't +match any of the group-specified splitting rules. See +gnus-group-split-fancy for details." t nil) (autoload (quote gnus-group-split-update) "gnus-mlspl" "\ -Computes nnmail-split-fancy from group params. -It does this by calling (gnus-group-split-fancy nil CROSSPOST DEFAULTGROUP)." t nil) +Computes nnmail-split-fancy from group params and CATCH-ALL, by +calling (gnus-group-split-fancy nil nil CATCH-ALL). + +If CATCH-ALL is nil, gnus-group-split-default-catch-all-group is used +instead. This variable is set by gnus-group-split-setup." t nil) (autoload (quote gnus-group-split) "gnus-mlspl" "\ Uses information from group parameters in order to split mail. See gnus-group-split-fancy for more information. -If no group is defined as catch-all, the value of -gnus-group-split-default-catch-all-group is used. - gnus-group-split is a valid value for nnmail-split-methods." nil nil) (autoload (quote gnus-group-split-fancy) "gnus-mlspl" "\ @@ -7637,11 +7855,6 @@ otherwise, a | split, that does not allow crossposting, will be returned. -if CATCH-ALL is not nil, and there is no selected group whose -SPLIT-REGEXP matches the empty string, nor is there a selected group -whose SPLIT-SPEC is 'catch-all, this group name will be appended to -the returned SPLIT list, as the last element in a '| SPLIT. - For each selected group, a SPLIT is composed like this: if SPLIT-SPEC is specified, this split is returned as-is (unless it is nil: in this case, the group is ignored). Otherwise, if TO-ADDRESS, TO-LIST and/or @@ -7651,6 +7864,13 @@ matches this regexp too, and if SPLIT-EXCLUDE is specified, RESTRICT clauses will be generated. +If CATCH-ALL is nil, no catch-all handling is performed, regardless of +catch-all marks in group parameters. Otherwise, if there is no +selected group whose SPLIT-REGEXP matches the empty string, nor is +there a selected group whose SPLIT-SPEC is 'catch-all, this fancy +split (say, a group name) will be appended to the returned SPLIT list, +as the last element of a '| SPLIT. + For example, given the following group parameters: nnml:mail.bar: @@ -7684,8 +7904,8 @@ ;;;*** -;;;### (autoloads (gnus-msg-mail) "gnus-msg" "gnus/gnus-msg.el" (14858 -;;;;;; 32484)) +;;;### (autoloads (gnus-msg-mail) "gnus-msg" "gnus/gnus-msg.el" (14859 +;;;;;; 52340)) ;;; Generated autoloads from gnus/gnus-msg.el (define-mail-user-agent (quote gnus-user-agent) (quote gnus-msg-mail) (quote message-send-and-exit) (quote message-kill-buffer) (quote message-send-hook)) @@ -7732,7 +7952,7 @@ ;;;*** ;;;### (autoloads (gnus-update-format) "gnus-spec" "gnus/gnus-spec.el" -;;;;;; (14792 2677)) +;;;;;; (14862 37897)) ;;; Generated autoloads from gnus/gnus-spec.el (autoload (quote gnus-update-format) "gnus-spec" "\ @@ -7741,7 +7961,7 @@ ;;;*** ;;;### (autoloads (gnus-declare-backend gnus-unload) "gnus-start" -;;;;;; "gnus/gnus-start.el" (14858 32484)) +;;;;;; "gnus/gnus-start.el" (14862 37897)) ;;; Generated autoloads from gnus/gnus-start.el (autoload (quote gnus-unload) "gnus-start" "\ @@ -7756,7 +7976,7 @@ ;;;*** ;;;### (autoloads (gnus-add-configuration) "gnus-win" "gnus/gnus-win.el" -;;;;;; (14792 2682)) +;;;;;; (14875 40522)) ;;; Generated autoloads from gnus/gnus-win.el (autoload (quote gnus-add-configuration) "gnus-win" "\ @@ -7822,7 +8042,7 @@ ;;;*** ;;;### (autoloads (jdb pdb perldb xdb dbx sdb gdb) "gud" "gud.el" -;;;;;; (14750 26818)) +;;;;;; (14863 49547)) ;;; Generated autoloads from gud.el (autoload (quote gdb) "gud" "\ @@ -8020,7 +8240,7 @@ ;;;### (autoloads (hi-lock-write-interactive-patterns hi-lock-unface-buffer ;;;;;; hi-lock-face-buffer hi-lock-line-face-buffer hi-lock-mode -;;;;;; hi-lock-mode) "hi-lock" "hi-lock.el" (14792 36880)) +;;;;;; hi-lock-mode) "hi-lock" "hi-lock.el" (14884 12791)) ;;; Generated autoloads from hi-lock.el (defgroup hi-lock-interactive-text-highlighting nil "Interactively add and remove font-lock patterns for highlighting text." :group (quote faces)) @@ -8409,17 +8629,23 @@ ;;;*** ;;;### (autoloads (hscroll-global-mode hscroll-mode turn-on-hscroll) -;;;;;; "hscroll" "hscroll.el" (14671 47520)) +;;;;;; "hscroll" "hscroll.el" (14883 57782)) ;;; Generated autoloads from hscroll.el (autoload (quote turn-on-hscroll) "hscroll" "\ -This function is obsolete." nil nil) +This function is obsolete. +Emacs now does hscrolling automatically, if `truncate-lines' is non-nil. +Also see `automatic-hscrolling'." nil nil) (autoload (quote hscroll-mode) "hscroll" "\ -This function is absolete." t nil) +This function is obsolete. +Emacs now does hscrolling automatically, if `truncate-lines' is non-nil. +Also see `automatic-hscrolling'." t nil) (autoload (quote hscroll-global-mode) "hscroll" "\ -This function is absolete." t nil) +This function is obsolete. +Emacs now does hscrolling automatically, if `truncate-lines' is non-nil. +Also see `automatic-hscrolling'." t nil) ;;;*** @@ -8725,7 +8951,7 @@ ;;;### (autoloads (auto-image-file-mode insert-image-file image-file-name-regexp ;;;;;; image-file-name-regexps image-file-name-extensions) "image-file" -;;;;;; "image-file.el" (14854 32221)) +;;;;;; "image-file.el" (14887 28113)) ;;; Generated autoloads from image-file.el (defvar image-file-name-extensions (quote ("png" "jpeg" "jpg" "gif" "tiff" "xbm" "xpm" "pbm")) "\ @@ -8976,7 +9202,7 @@ ;;;### (autoloads (Info-speedbar-browser Info-goto-emacs-key-command-node ;;;;;; Info-goto-emacs-command-node Info-directory info-standalone -;;;;;; info info-other-window) "info" "info.el" (14854 32221)) +;;;;;; info info-other-window) "info" "info.el" (14872 20396)) ;;; Generated autoloads from info.el (autoload (quote info-other-window) "info" "\ @@ -9222,7 +9448,7 @@ ;;;;;; ispell-region ispell-change-dictionary ispell-kill-ispell ;;;;;; ispell-help ispell-word ispell-dictionary-alist ispell-local-dictionary-alist ;;;;;; ispell-personal-dictionary) "ispell" "textmodes/ispell.el" -;;;;;; (14859 5489)) +;;;;;; (14890 7814)) ;;; Generated autoloads from textmodes/ispell.el (defconst xemacsp (string-match "Lucid\\|XEmacs" emacs-version) "\ @@ -9466,7 +9692,7 @@ ;;;### (autoloads (iswitchb-mode iswitchb-buffer-other-frame iswitchb-display-buffer ;;;;;; iswitchb-buffer-other-window iswitchb-buffer iswitchb-default-keybindings ;;;;;; iswitchb-read-buffer iswitchb-mode) "iswitchb" "iswitchb.el" -;;;;;; (14821 31349)) +;;;;;; (14877 36786)) ;;; Generated autoloads from iswitchb.el (defvar iswitchb-mode nil "\ @@ -9734,7 +9960,7 @@ ;;;*** ;;;### (autoloads (latin1-display latin1-display) "latin1-disp" "international/latin1-disp.el" -;;;;;; (14845 20876)) +;;;;;; (14862 37898)) ;;; Generated autoloads from international/latin1-disp.el (defvar latin1-display nil "\ @@ -9762,7 +9988,7 @@ ;;;*** ;;;### (autoloads (turn-on-lazy-lock lazy-lock-mode) "lazy-lock" -;;;;;; "lazy-lock.el" (14477 53252)) +;;;;;; "lazy-lock.el" (14862 37894)) ;;; Generated autoloads from lazy-lock.el (autoload (quote lazy-lock-mode) "lazy-lock" "\ @@ -10363,7 +10589,7 @@ ;;;;;; message-signature message-indent-citation-function message-cite-function ;;;;;; message-yank-prefix message-citation-line-function message-send-mail-function ;;;;;; message-user-organization-file message-signature-separator -;;;;;; message-from-style) "message" "gnus/message.el" (14858 32485)) +;;;;;; message-from-style) "message" "gnus/message.el" (14887 28114)) ;;; Generated autoloads from gnus/message.el (defvar message-from-style (quote default) "\ @@ -10541,7 +10767,7 @@ ;;;### (autoloads (metamail-region metamail-buffer metamail-interpret-body ;;;;;; metamail-interpret-header) "metamail" "mail/metamail.el" -;;;;;; (14345 52966)) +;;;;;; (14862 37898)) ;;; Generated autoloads from mail/metamail.el (autoload (quote metamail-interpret-header) "metamail" "\ @@ -10831,7 +11057,7 @@ ;;;;;; list-coding-systems describe-current-coding-system describe-current-coding-system-briefly ;;;;;; describe-coding-system describe-char-after describe-character-set ;;;;;; list-charset-chars read-charset list-character-sets) "mule-diag" -;;;;;; "international/mule-diag.el" (14763 35975)) +;;;;;; "international/mule-diag.el" (14887 28114)) ;;; Generated autoloads from international/mule-diag.el (autoload (quote list-character-sets) "mule-diag" "\ @@ -11139,7 +11365,7 @@ ;;;;;; uncomment-region comment-kill comment-set-column comment-indent ;;;;;; comment-indent-default comment-multi-line comment-padding ;;;;;; comment-style comment-column) "newcomment" "newcomment.el" -;;;;;; (14821 31349)) +;;;;;; (14884 54601)) ;;; Generated autoloads from newcomment.el (defalias (quote indent-for-comment) (quote comment-indent)) @@ -11281,7 +11507,7 @@ ;;;*** ;;;### (autoloads (nnkiboze-generate-groups) "nnkiboze" "gnus/nnkiboze.el" -;;;;;; (14845 20875)) +;;;;;; (14859 52340)) ;;; Generated autoloads from gnus/nnkiboze.el (autoload (quote nnkiboze-generate-groups) "nnkiboze" "\ @@ -11498,7 +11724,7 @@ ;;;*** ;;;### (autoloads (outline-minor-mode outline-mode) "outline" "textmodes/outline.el" -;;;;;; (14807 56561)) +;;;;;; (14876 60333)) ;;; Generated autoloads from textmodes/outline.el (autoload (quote outline-mode) "outline" "\ @@ -11838,7 +12064,7 @@ ;;;### (autoloads (cvs-dired-use-hook cvs-dired-action cvs-status ;;;;;; cvs-update cvs-examine cvs-quickdir cvs-checkout) "pcvs" -;;;;;; "pcvs.el" (14854 32222)) +;;;;;; "pcvs.el" (14875 40521)) ;;; Generated autoloads from pcvs.el (autoload (quote cvs-checkout) "pcvs" "\ @@ -11959,7 +12185,7 @@ ;;;*** ;;;### (autoloads (picture-mode) "picture" "textmodes/picture.el" -;;;;;; (14348 33291)) +;;;;;; (14883 29490)) ;;; Generated autoloads from textmodes/picture.el (autoload (quote picture-mode) "picture" "\ @@ -12091,8 +12317,8 @@ ;;;*** -;;;### (autoloads (ps-mode) "ps-mode" "progmodes/ps-mode.el" (14380 -;;;;;; 3920)) +;;;### (autoloads (ps-mode) "ps-mode" "progmodes/ps-mode.el" (14884 +;;;;;; 1390)) ;;; Generated autoloads from progmodes/ps-mode.el (autoload (quote ps-mode) "ps-mode" "\ @@ -12237,7 +12463,7 @@ ;;;;;; ps-spool-region ps-spool-buffer-with-faces ps-spool-buffer ;;;;;; ps-print-region-with-faces ps-print-region ps-print-buffer-with-faces ;;;;;; ps-print-buffer ps-print-customize ps-paper-type) "ps-print" -;;;;;; "ps-print.el" (14858 37543)) +;;;;;; "ps-print.el" (14887 28113)) ;;; Generated autoloads from ps-print.el (defvar ps-paper-type (quote letter) "\ @@ -12375,7 +12601,7 @@ ;;;;;; quail-defrule quail-install-decode-map quail-install-map ;;;;;; quail-define-rules quail-show-keyboard-layout quail-set-keyboard-layout ;;;;;; quail-define-package quail-use-package) "quail" "international/quail.el" -;;;;;; (14845 20876)) +;;;;;; (14868 1431)) ;;; Generated autoloads from international/quail.el (autoload (quote quail-use-package) "quail" "\ @@ -12655,7 +12881,7 @@ ;;;### (autoloads (recentf-mode recentf-open-more-files recentf-open-files ;;;;;; recentf-cleanup recentf-edit-list recentf-save-list) "recentf" -;;;;;; "recentf.el" (14854 32222)) +;;;;;; "recentf.el" (14875 64576)) ;;; Generated autoloads from recentf.el (autoload (quote recentf-save-list) "recentf" "\ @@ -12699,8 +12925,8 @@ ;;;### (autoloads (clear-rectangle replace-rectangle string-rectangle ;;;;;; delete-whitespace-rectangle open-rectangle insert-rectangle ;;;;;; yank-rectangle kill-rectangle extract-rectangle delete-extract-rectangle -;;;;;; delete-rectangle move-to-column-force) "rect" "rect.el" (14710 -;;;;;; 21251)) +;;;;;; delete-rectangle move-to-column-force) "rect" "rect.el" (14877 +;;;;;; 36786)) ;;; Generated autoloads from rect.el (autoload (quote move-to-column-force) "rect" "\ @@ -12793,8 +13019,8 @@ ;;;*** -;;;### (autoloads (refill-mode) "refill" "textmodes/refill.el" (14845 -;;;;;; 20876)) +;;;### (autoloads (refill-mode) "refill" "textmodes/refill.el" (14875 +;;;;;; 62936)) ;;; Generated autoloads from textmodes/refill.el (autoload (quote refill-mode) "refill" "\ @@ -13070,7 +13296,7 @@ ;;;;;; rmail-mail-new-frame rmail-primary-inbox-list rmail-delete-after-output ;;;;;; rmail-highlight-face rmail-highlighted-headers rmail-retry-ignored-headers ;;;;;; rmail-displayed-headers rmail-ignored-headers rmail-dont-reply-to-names) -;;;;;; "rmail" "mail/rmail.el" (14726 41837)) +;;;;;; "rmail" "mail/rmail.el" (14886 32019)) ;;; Generated autoloads from mail/rmail.el (defvar rmail-dont-reply-to-names nil "\ @@ -13128,7 +13354,7 @@ (defvar rmail-secondary-file-regexp "\\.xmail$" "\ *Regexp for which files are secondary Rmail files.") -(defvar rmail-confirm-expunge (quote yes-or-no-p) "\ +(defvar rmail-confirm-expunge (quote y-or-n-p) "\ *Whether and how to ask for confirmation before expunging deleted messages.") (defvar rmail-mode-hook nil "\ @@ -13516,7 +13742,7 @@ ;;;*** ;;;### (autoloads (dsssl-mode scheme-mode) "scheme" "progmodes/scheme.el" -;;;;;; (14821 46406)) +;;;;;; (14866 25750)) ;;; Generated autoloads from progmodes/scheme.el (autoload (quote scheme-mode) "scheme" "\ @@ -13588,11 +13814,30 @@ ;;;*** +;;;### (autoloads (scroll-all-mode scroll-all-mode) "scroll-all" +;;;;;; "scroll-all.el" (14862 37894)) +;;; Generated autoloads from scroll-all.el + +(defvar scroll-all-mode nil "\ +Control/track scroll locking. + +Setting this variable directly does not take effect; +use either M-x customize or the function `scroll-all-mode'.") + +(custom-add-to-group (quote windows) (quote scroll-all-mode) (quote custom-variable)) + +(custom-add-load (quote scroll-all-mode) (quote scroll-all)) + +(autoload (quote scroll-all-mode) "scroll-all" "\ +Toggle Scroll-All minor mode." t nil) + +;;;*** + ;;;### (autoloads (mail-other-frame mail-other-window mail mail-mode ;;;;;; mail-signature mail-personal-alias-file mail-alias-file mail-default-reply-to ;;;;;; mail-archive-file-name mail-header-separator mail-yank-ignored-headers ;;;;;; mail-interactive mail-self-blind mail-specify-envelope-from -;;;;;; mail-from-style) "sendmail" "mail/sendmail.el" (14821 31351)) +;;;;;; mail-from-style) "sendmail" "mail/sendmail.el" (14862 37898)) ;;; Generated autoloads from mail/sendmail.el (defvar mail-from-style (quote angles) "\ @@ -13829,7 +14074,7 @@ ;;;*** ;;;### (autoloads (sh-mode) "sh-script" "progmodes/sh-script.el" -;;;;;; (14834 55789)) +;;;;;; (14863 49548)) ;;; Generated autoloads from progmodes/sh-script.el (put (quote sh-mode) (quote mode-class) (quote special)) @@ -13938,7 +14183,7 @@ ;;;*** ;;;### (autoloads (shell shell-dumb-shell-regexp) "shell" "shell.el" -;;;;;; (14841 20034)) +;;;;;; (14875 40521)) ;;; Generated autoloads from shell.el (defvar shell-dumb-shell-regexp "cmd\\(proxy\\)?\\.exe" "\ @@ -14352,7 +14597,7 @@ ;;;### (autoloads (reverse-region sort-columns sort-regexp-fields ;;;;;; sort-fields sort-numeric-fields sort-pages sort-paragraphs -;;;;;; sort-lines sort-subr) "sort" "sort.el" (14481 36842)) +;;;;;; sort-lines sort-subr) "sort" "sort.el" (14886 9525)) ;;; Generated autoloads from sort.el (autoload (quote sort-subr) "sort" "\ @@ -14455,10 +14700,10 @@ (autoload (quote sort-columns) "sort" "\ Sort lines in region alphabetically by a certain range of columns. -For the purpose of this command, the region includes +For the purpose of this command, the region BEG...END includes the entire line that point is in and the entire line the mark is in. The column positions of point and mark bound the range of columns to sort on. -A prefix argument means sort into reverse order. +A prefix argument means sort into REVERSE order. The variable `sort-fold-case' determines whether alphabetic case affects the sort order. @@ -15132,7 +15377,7 @@ ;;;;;; tex-start-options-string slitex-run-command latex-run-command ;;;;;; tex-run-command tex-offer-save tex-main-file tex-first-line-header-regexp ;;;;;; tex-directory tex-shell-file-name) "tex-mode" "textmodes/tex-mode.el" -;;;;;; (14849 20131)) +;;;;;; (14890 7814)) ;;; Generated autoloads from textmodes/tex-mode.el (defvar tex-shell-file-name nil "\ @@ -15413,10 +15658,16 @@ ;;;*** -;;;### (autoloads (texinfo-mode) "texinfo" "textmodes/texinfo.el" -;;;;;; (14855 56553)) +;;;### (autoloads (texinfo-mode texinfo-close-quote texinfo-open-quote) +;;;;;; "texinfo" "textmodes/texinfo.el" (14890 7814)) ;;; Generated autoloads from textmodes/texinfo.el +(defvar texinfo-open-quote "``" "\ +*String inserted by typing \\[texinfo-insert-quote] to open a quotation.") + +(defvar texinfo-close-quote "''" "\ +*String inserted by typing \\[texinfo-insert-quote] to close a quotation.") + (autoload (quote texinfo-mode) "texinfo" "\ Major mode for editing Texinfo files. @@ -15605,7 +15856,7 @@ ;;;*** ;;;### (autoloads (tildify-buffer tildify-region) "tildify" "textmodes/tildify.el" -;;;;;; (14780 47087)) +;;;;;; (14883 35658)) ;;; Generated autoloads from textmodes/tildify.el (autoload (quote tildify-region) "tildify" "\ @@ -15660,7 +15911,7 @@ ;;;*** ;;;### (autoloads (safe-date-to-time date-to-time) "time-date" "gnus/time-date.el" -;;;;;; (14791 27442)) +;;;;;; (14862 37897)) ;;; Generated autoloads from gnus/time-date.el (autoload (quote date-to-time) "time-date" "\ @@ -15860,7 +16111,7 @@ ;;;*** ;;;### (autoloads (tmm-prompt tmm-menubar-mouse tmm-menubar) "tmm" -;;;;;; "tmm.el" (14789 57836)) +;;;;;; "tmm.el" (14890 7814)) ;;; Generated autoloads from tmm.el (define-key global-map "\M-`" 'tmm-menubar) (define-key global-map [f10] 'tmm-menubar) @@ -15894,7 +16145,7 @@ ;;;*** ;;;### (autoloads (todo-print todo-save-top-priorities todo-top-priorities) -;;;;;; "todo-mode" "calendar/todo-mode.el" (14690 14754)) +;;;;;; "todo-mode" "calendar/todo-mode.el" (14876 60332)) ;;; Generated autoloads from calendar/todo-mode.el (autoload (quote todo-top-priorities) "todo-mode" "\ @@ -15922,7 +16173,7 @@ ;;;*** ;;;### (autoloads (tool-bar-add-item-from-menu tool-bar-add-item -;;;;;; tool-bar-mode) "tool-bar" "toolbar/tool-bar.el" (14854 32223)) +;;;;;; tool-bar-mode) "tool-bar" "toolbar/tool-bar.el" (14885 15496)) ;;; Generated autoloads from toolbar/tool-bar.el (defvar tool-bar-mode nil "\ @@ -15937,7 +16188,7 @@ (autoload (quote tool-bar-mode) "tool-bar" "\ Toggle use of the tool bar. -With ARG, display the tool bar if and only if ARG is positive. +With numeric ARG, display the tool bar if and only if ARG is positive. See `tool-bar-add-item' and `tool-bar-add-item-from-menu' for conveniently adding tool bar items." t nil) @@ -15972,7 +16223,7 @@ ;;;*** ;;;### (autoloads (tooltip-mode tooltip-mode) "tooltip" "tooltip.el" -;;;;;; (14849 20130)) +;;;;;; (14883 29489)) ;;; Generated autoloads from tooltip.el (autoload (quote tooltip-mode) "tooltip" "\ @@ -15990,8 +16241,8 @@ ;;;*** -;;;### (autoloads (tpu-edt-on) "tpu-edt" "emulation/tpu-edt.el" (14299 -;;;;;; 63726)) +;;;### (autoloads (tpu-edt-on) "tpu-edt" "emulation/tpu-edt.el" (14886 +;;;;;; 17544)) ;;; Generated autoloads from emulation/tpu-edt.el (fset (quote tpu-edt-mode) (quote tpu-edt-on)) @@ -16004,7 +16255,7 @@ ;;;*** ;;;### (autoloads (tpu-set-cursor-bound tpu-set-cursor-free tpu-set-scroll-margins) -;;;;;; "tpu-extras" "emulation/tpu-extras.el" (13623 36919)) +;;;;;; "tpu-extras" "emulation/tpu-extras.el" (14886 17615)) ;;; Generated autoloads from emulation/tpu-extras.el (autoload (quote tpu-set-scroll-margins) "tpu-extras" "\ @@ -16056,7 +16307,7 @@ ;;;*** ;;;### (autoloads (2C-split 2C-associate-buffer 2C-two-columns) "two-column" -;;;;;; "textmodes/two-column.el" (13940 33924)) +;;;;;; "textmodes/two-column.el" (14876 60333)) ;;; Generated autoloads from textmodes/two-column.el (autoload '2C-command "two-column" () t 'keymap) (global-set-key "\C-x6" '2C-command) @@ -16100,7 +16351,7 @@ ;;;### (autoloads (type-break-guesstimate-keystroke-threshold type-break-statistics ;;;;;; type-break type-break-mode type-break-keystroke-threshold ;;;;;; type-break-good-rest-interval type-break-interval type-break-mode) -;;;;;; "type-break" "type-break.el" (14716 17385)) +;;;;;; "type-break" "type-break.el" (14891 28342)) ;;; Generated autoloads from type-break.el (defvar type-break-mode nil "\ @@ -16320,16 +16571,16 @@ ;;;*** ;;;### (autoloads (uudecode-decode-region uudecode-decode-region-external) -;;;;;; "uudecode" "gnus/uudecode.el" (14858 32485)) +;;;;;; "uudecode" "gnus/uudecode.el" (14877 36787)) ;;; Generated autoloads from gnus/uudecode.el (autoload (quote uudecode-decode-region-external) "uudecode" "\ -Uudecode region between START and END with external decoder. - -If FILE-NAME is non-nil, save the result to FILE-NAME." t nil) +Uudecode region between START and END using external program. +If FILE-NAME is non-nil, save the result to FILE-NAME. The program +used is specified by `uudecode-decoder-program'." t nil) (autoload (quote uudecode-decode-region) "uudecode" "\ -Uudecode region between START and END. +Uudecode region between START and END without using an external program. If FILE-NAME is non-nil, save the result to FILE-NAME." t nil) ;;;*** @@ -16339,7 +16590,7 @@ ;;;;;; vc-create-snapshot vc-directory vc-resolve-conflicts vc-merge ;;;;;; vc-insert-headers vc-version-other-window vc-diff vc-register ;;;;;; vc-next-action edit-vc-file with-vc-file vc-before-checkin-hook -;;;;;; vc-checkin-hook) "vc" "vc.el" (14845 20872)) +;;;;;; vc-checkin-hook) "vc" "vc.el" (14874 16518)) ;;; Generated autoloads from vc.el (defvar vc-checkin-hook nil "\ @@ -16501,8 +16752,9 @@ (autoload (quote vc-annotate) "vc" "\ Display the result of the \"Annotate\" command using colors. \"Annotate\" is defined by `vc-BACKEND-annotate-command'. New lines -are displayed in red, old in blue. A prefix argument specifies a -factor for stretching the time scale. +are displayed in red, old in blue. When given a prefix argument, asks +for a version to annotate from, and a factor for stretching the time +scale. `vc-annotate-menu-elements' customizes the menu elements of the mode-specific menu. `vc-annotate-color-map' and @@ -16511,7 +16763,7 @@ ;;;*** -;;;### (autoloads nil "vc-cvs" "vc-cvs.el" (14845 20872)) +;;;### (autoloads nil "vc-cvs" "vc-cvs.el" (14874 16518)) ;;; Generated autoloads from vc-cvs.el (defun vc-cvs-registered (f) (when (file-readable-p (expand-file-name @@ -16522,7 +16774,7 @@ ;;;*** ;;;### (autoloads (vc-rcs-master-templates) "vc-rcs" "vc-rcs.el" -;;;;;; (14810 62717)) +;;;;;; (14874 16518)) ;;; Generated autoloads from vc-rcs.el (defvar vc-rcs-master-templates (quote ("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")) "\ @@ -16534,7 +16786,7 @@ ;;;*** ;;;### (autoloads (vc-sccs-master-templates) "vc-sccs" "vc-sccs.el" -;;;;;; (14777 64827)) +;;;;;; (14869 5816)) ;;; Generated autoloads from vc-sccs.el (defvar vc-sccs-master-templates (quote ("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)) "\ @@ -16909,8 +17161,8 @@ ;;;### (autoloads (View-exit-and-edit view-mode-enter view-mode view-buffer-other-frame ;;;;;; view-buffer-other-window view-buffer view-file-other-frame -;;;;;; view-file-other-window view-file) "view" "view.el" (14789 -;;;;;; 57836)) +;;;;;; view-file-other-window view-file) "view" "view.el" (14862 +;;;;;; 37894)) ;;; Generated autoloads from view.el (defvar view-mode nil "\ @@ -17106,7 +17358,7 @@ ;;;*** ;;;### (autoloads (viper-mode toggle-viper-mode) "viper" "emulation/viper.el" -;;;;;; (14845 20873)) +;;;;;; (14878 17056)) ;;; Generated autoloads from emulation/viper.el (autoload (quote toggle-viper-mode) "viper" "\ @@ -17133,7 +17385,7 @@ ;;;*** ;;;### (autoloads (which-func-mode which-func-mode-global) "which-func" -;;;;;; "which-func.el" (14813 40531)) +;;;;;; "which-func.el" (14875 40521)) ;;; Generated autoloads from which-func.el (defvar which-func-mode-global nil "\ @@ -17273,7 +17525,7 @@ ;;;*** ;;;### (autoloads (widget-delete widget-create widget-prompt-value) -;;;;;; "wid-edit" "wid-edit.el" (14854 32222)) +;;;;;; "wid-edit" "wid-edit.el" (14883 29489)) ;;; Generated autoloads from wid-edit.el (autoload (quote widget-prompt-value) "wid-edit" "\
--- a/src/ChangeLog Mon Dec 04 12:25:36 2000 +0000 +++ b/src/ChangeLog Mon Dec 04 12:28:37 2000 +0000 @@ -1,3 +1,9 @@ +2000-12-04 Gerd Moellmann <gerd@gnu.org> + + * keyboard.c (record_char): Record `help-echo' input events + in recent_keys only if they display some help. Don't record + `help-echo' events as macro char. + 2000-12-04 Kenichi Handa <handa@etl.go.jp> * xfaces.c (struct font_name): New member registry_priority.