From 4ec0cf9c4c29758bd46eec39313984434d455656 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 30 Apr 2014 21:08:08 -0400 Subject: [PATCH 01/20] * lisp/mpc.el (mpc-volume-mouse-set): Don't burp at the boundaries. --- lisp/ChangeLog | 4 ++++ lisp/mpc.el | 11 ++++++++--- 2 files changed, 12 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 769d06028b4..669467687d2 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2014-05-01 Stefan Monnier + + * mpc.el (mpc-volume-mouse-set): Don't burp at the boundaries. + 2014-04-30 Eli Zaretskii * dired.el (dired-initial-position-hook, dired-initial-position): diff --git a/lisp/mpc.el b/lisp/mpc.el index d89231e81b9..d569610a615 100644 --- a/lisp/mpc.el +++ b/lisp/mpc.el @@ -1811,9 +1811,14 @@ A value of t means the main playlist.") (char-after (posn-point posn)))) '(?◁ ?<)) (- mpc-volume-step) mpc-volume-step)) - (newvol (+ (string-to-number (cdr (assq 'volume mpc-status))) diff))) - (mpc-proc-cmd (list "setvol" newvol) 'mpc-status-refresh) - (message "Set MPD volume to %s%%" newvol))) + (curvol (string-to-number (cdr (assq 'volume mpc-status)))) + (newvol (max 0 (min 100 (+ curvol diff))))) + (if (= newvol curvol) + (progn + (message "MPD volume already at %s%%" newvol) + (ding)) + (mpc-proc-cmd (list "setvol" newvol) 'mpc-status-refresh) + (message "Set MPD volume to %s%%" newvol)))) (defun mpc-volume-widget (vol &optional size) (unless size (setq size 12.5)) From f40c5041bb429029ef066552d0768fe61bd1f163 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 1 May 2014 07:18:18 -0400 Subject: [PATCH 02/20] Auto-commit of loaddefs files. --- lisp/ldefs-boot.el | 1862 ++++++++++++++++++++++---------------------- 1 file changed, 913 insertions(+), 949 deletions(-) diff --git a/lisp/ldefs-boot.el b/lisp/ldefs-boot.el index e696268d9ee..0e4e937c6ed 100644 --- a/lisp/ldefs-boot.el +++ b/lisp/ldefs-boot.el @@ -3,7 +3,7 @@ ;;; Code: -;;;### (autoloads nil "5x5" "play/5x5.el" (21291 53104 431149 0)) +;;;### (autoloads nil "5x5" "play/5x5.el" (21291 9464 291241 0)) ;;; Generated autoloads from play/5x5.el (autoload '5x5 "5x5" "\ @@ -65,8 +65,8 @@ should return a grid vector array that is the new solution. ;;;*** -;;;### (autoloads nil "ada-mode" "progmodes/ada-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ada-mode" "progmodes/ada-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/ada-mode.el (autoload 'ada-add-extensions "ada-mode" "\ @@ -85,8 +85,8 @@ Ada mode is the major mode for editing Ada code. ;;;*** -;;;### (autoloads nil "ada-stmt" "progmodes/ada-stmt.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ada-stmt" "progmodes/ada-stmt.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/ada-stmt.el (autoload 'ada-header "ada-stmt" "\ @@ -96,8 +96,8 @@ Insert a descriptive header at the top of the file. ;;;*** -;;;### (autoloads nil "ada-xref" "progmodes/ada-xref.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ada-xref" "progmodes/ada-xref.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/ada-xref.el (autoload 'ada-find-file "ada-xref" "\ @@ -108,7 +108,7 @@ Completion is available. ;;;*** -;;;### (autoloads nil "add-log" "vc/add-log.el" (21291 53104 431149 +;;;### (autoloads nil "add-log" "vc/add-log.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/add-log.el @@ -238,8 +238,8 @@ old-style time formats for entries are supported. ;;;*** -;;;### (autoloads nil "advice" "emacs-lisp/advice.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "advice" "emacs-lisp/advice.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emacs-lisp/advice.el (defvar ad-redefinition-action 'warn "\ @@ -374,7 +374,7 @@ usage: (defadvice FUNCTION (CLASS NAME [POSITION] [ARGLIST] FLAG...) ;;;*** -;;;### (autoloads nil "align" "align.el" (21298 17013 555424 0)) +;;;### (autoloads nil "align" "align.el" (21297 26037 89426 0)) ;;; Generated autoloads from align.el (autoload 'align "align" "\ @@ -477,7 +477,7 @@ A replacement function for `newline-and-indent', aligning as it goes. ;;;*** -;;;### (autoloads nil "allout" "allout.el" (21291 53104 431149 0)) +;;;### (autoloads nil "allout" "allout.el" (21291 9464 291241 0)) ;;; Generated autoloads from allout.el (push (purecopy '(allout 2 3)) package--builtin-versions) @@ -838,7 +838,7 @@ for details on preparing Emacs for automatic allout activation. ;;;*** ;;;### (autoloads nil "allout-widgets" "allout-widgets.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from allout-widgets.el (push (purecopy '(allout-widgets 1 0)) package--builtin-versions) @@ -896,7 +896,7 @@ outline hot-spot navigation (see `allout-mode'). ;;;*** -;;;### (autoloads nil "ange-ftp" "net/ange-ftp.el" (21291 53104 431149 +;;;### (autoloads nil "ange-ftp" "net/ange-ftp.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from net/ange-ftp.el @@ -918,7 +918,7 @@ directory, so that Emacs will know its current contents. ;;;*** -;;;### (autoloads nil "animate" "play/animate.el" (21291 53104 431149 +;;;### (autoloads nil "animate" "play/animate.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/animate.el @@ -951,7 +951,7 @@ the buffer *Birthday-Present-for-Name*. ;;;*** -;;;### (autoloads nil "ansi-color" "ansi-color.el" (21291 53104 431149 +;;;### (autoloads nil "ansi-color" "ansi-color.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from ansi-color.el (push (purecopy '(ansi-color 3 4 2)) package--builtin-versions) @@ -979,7 +979,7 @@ This is a good function to put in `comint-output-filter-functions'. ;;;*** ;;;### (autoloads nil "antlr-mode" "progmodes/antlr-mode.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/antlr-mode.el (push (purecopy '(antlr-mode 2 2 3)) package--builtin-versions) @@ -1015,7 +1015,7 @@ Used in `antlr-mode'. Also a useful function in `java-mode-hook'. ;;;*** -;;;### (autoloads nil "appt" "calendar/appt.el" (21291 53104 431149 +;;;### (autoloads nil "appt" "calendar/appt.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from calendar/appt.el @@ -1037,8 +1037,7 @@ ARG is positive, otherwise off. ;;;*** -;;;### (autoloads nil "apropos" "apropos.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "apropos" "apropos.el" (21291 9464 291241 0)) ;;; Generated autoloads from apropos.el (autoload 'apropos-read-pattern "apropos" "\ @@ -1153,7 +1152,7 @@ Returns list of symbols and documentation found. ;;;*** -;;;### (autoloads nil "arc-mode" "arc-mode.el" (21291 53104 431149 +;;;### (autoloads nil "arc-mode" "arc-mode.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from arc-mode.el @@ -1174,7 +1173,7 @@ archive. ;;;*** -;;;### (autoloads nil "array" "array.el" (21291 53104 431149 0)) +;;;### (autoloads nil "array" "array.el" (21291 9464 291241 0)) ;;; Generated autoloads from array.el (autoload 'array-mode "array" "\ @@ -1245,8 +1244,8 @@ Entering array mode calls the function `array-mode-hook'. ;;;*** -;;;### (autoloads nil "artist" "textmodes/artist.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "artist" "textmodes/artist.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/artist.el (push (purecopy '(artist 1 2 6)) package--builtin-versions) @@ -1452,8 +1451,8 @@ Keymap summary ;;;*** -;;;### (autoloads nil "asm-mode" "progmodes/asm-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "asm-mode" "progmodes/asm-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/asm-mode.el (autoload 'asm-mode "asm-mode" "\ @@ -1481,7 +1480,7 @@ Special commands: ;;;*** ;;;### (autoloads nil "auth-source" "gnus/auth-source.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from gnus/auth-source.el (defvar auth-source-cache-expiry 7200 "\ @@ -1493,8 +1492,7 @@ let-binding.") ;;;*** -;;;### (autoloads nil "autoarg" "autoarg.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "autoarg" "autoarg.el" (21291 9464 291241 0)) ;;; Generated autoloads from autoarg.el (defvar autoarg-mode nil "\ @@ -1554,8 +1552,8 @@ This is similar to `autoarg-mode' but rebinds the keypad keys ;;;*** -;;;### (autoloads nil "autoconf" "progmodes/autoconf.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "autoconf" "progmodes/autoconf.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/autoconf.el (autoload 'autoconf-mode "autoconf" "\ @@ -1565,7 +1563,7 @@ Major mode for editing Autoconf configure.ac files. ;;;*** -;;;### (autoloads nil "autoinsert" "autoinsert.el" (21291 53104 431149 +;;;### (autoloads nil "autoinsert" "autoinsert.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from autoinsert.el @@ -1605,7 +1603,7 @@ insert a template for the file depending on the mode of the buffer. ;;;*** ;;;### (autoloads nil "autoload" "emacs-lisp/autoload.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/autoload.el (put 'generated-autoload-file 'safe-local-variable 'stringp) @@ -1654,8 +1652,8 @@ should be non-nil). ;;;*** -;;;### (autoloads nil "autorevert" "autorevert.el" (21310 8261 281810 -;;;;;; 0)) +;;;### (autoloads nil "autorevert" "autorevert.el" (21310 5108 914397 +;;;;;; 372000)) ;;; Generated autoloads from autorevert.el (autoload 'auto-revert-mode "autorevert" "\ @@ -1743,7 +1741,7 @@ specifies in the mode line. ;;;*** -;;;### (autoloads nil "avoid" "avoid.el" (21291 53104 431149 0)) +;;;### (autoloads nil "avoid" "avoid.el" (21291 9464 291241 0)) ;;; Generated autoloads from avoid.el (defvar mouse-avoidance-mode nil "\ @@ -1783,8 +1781,8 @@ definition of \"random distance\".) ;;;*** -;;;### (autoloads nil "bat-mode" "progmodes/bat-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "bat-mode" "progmodes/bat-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/bat-mode.el (add-to-list 'auto-mode-alist '("\\.\\(bat\\|cmd\\)\\'" . bat-mode)) @@ -1802,7 +1800,8 @@ Run script using `bat-run' and `bat-run-args'. ;;;*** -;;;### (autoloads nil "battery" "battery.el" (21294 9760 745628 0)) +;;;### (autoloads nil "battery" "battery.el" (21339 38332 466140 +;;;;;; 0)) ;;; Generated autoloads from battery.el (put 'battery-mode-line-string 'risky-local-variable t) @@ -1838,7 +1837,7 @@ seconds. ;;;*** ;;;### (autoloads nil "benchmark" "emacs-lisp/benchmark.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/benchmark.el (autoload 'benchmark-run "benchmark" "\ @@ -1874,8 +1873,8 @@ For non-interactive use see also `benchmark-run' and ;;;*** -;;;### (autoloads nil "bibtex" "textmodes/bibtex.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "bibtex" "textmodes/bibtex.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/bibtex.el (autoload 'bibtex-initialize "bibtex" "\ @@ -1967,7 +1966,7 @@ A prefix arg negates the value of `bibtex-search-entry-globally'. ;;;*** ;;;### (autoloads nil "bibtex-style" "textmodes/bibtex-style.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from textmodes/bibtex-style.el (autoload 'bibtex-style-mode "bibtex-style" "\ @@ -1977,7 +1976,7 @@ Major mode for editing BibTeX style files. ;;;*** -;;;### (autoloads nil "binhex" "mail/binhex.el" (21291 53104 431149 +;;;### (autoloads nil "binhex" "mail/binhex.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from mail/binhex.el @@ -2002,8 +2001,8 @@ Binhex decode region between START and END. ;;;*** -;;;### (autoloads nil "blackbox" "play/blackbox.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "blackbox" "play/blackbox.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from play/blackbox.el (autoload 'blackbox "blackbox" "\ @@ -2122,7 +2121,7 @@ a reflection. ;;;*** -;;;### (autoloads nil "bookmark" "bookmark.el" (21291 53104 431149 +;;;### (autoloads nil "bookmark" "bookmark.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from bookmark.el (define-key ctl-x-r-map "b" 'bookmark-jump) @@ -2316,8 +2315,8 @@ Incremental search of bookmarks, hiding the non-matches as we go. ;;;*** -;;;### (autoloads nil "browse-url" "net/browse-url.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "browse-url" "net/browse-url.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from net/browse-url.el (defvar browse-url-browser-function 'browse-url-default-browser "\ @@ -2632,7 +2631,7 @@ from `browse-url-elinks-wrapper'. ;;;*** -;;;### (autoloads nil "bs" "bs.el" (21291 53104 431149 0)) +;;;### (autoloads nil "bs" "bs.el" (21291 9464 291241 0)) ;;; Generated autoloads from bs.el (push (purecopy '(bs 1 17)) package--builtin-versions) @@ -2673,7 +2672,7 @@ name of buffer configuration. ;;;*** -;;;### (autoloads nil "bubbles" "play/bubbles.el" (21291 53104 431149 +;;;### (autoloads nil "bubbles" "play/bubbles.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/bubbles.el @@ -2696,7 +2695,7 @@ columns on its right towards the left. ;;;*** ;;;### (autoloads nil "bug-reference" "progmodes/bug-reference.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from progmodes/bug-reference.el (put 'bug-reference-url-format 'safe-local-variable (lambda (s) (or (stringp s) (and (symbolp s) (get s 'bug-reference-url-format))))) @@ -2717,7 +2716,7 @@ Like `bug-reference-mode', but only buttonize in comments and strings. ;;;*** ;;;### (autoloads nil "bytecomp" "emacs-lisp/bytecomp.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/bytecomp.el (put 'byte-compile-dynamic 'safe-local-variable 'booleanp) (put 'byte-compile-disable-print-circle 'safe-local-variable 'booleanp) @@ -2838,7 +2837,7 @@ and corresponding effects. ;;;*** ;;;### (autoloads nil "cal-china" "calendar/cal-china.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from calendar/cal-china.el (put 'calendar-chinese-time-zone 'risky-local-variable t) @@ -2847,8 +2846,8 @@ and corresponding effects. ;;;*** -;;;### (autoloads nil "cal-dst" "calendar/cal-dst.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "cal-dst" "calendar/cal-dst.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from calendar/cal-dst.el (put 'calendar-daylight-savings-starts 'risky-local-variable t) @@ -2860,7 +2859,7 @@ and corresponding effects. ;;;*** ;;;### (autoloads nil "cal-hebrew" "calendar/cal-hebrew.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from calendar/cal-hebrew.el (autoload 'calendar-hebrew-list-yahrzeits "cal-hebrew" "\ @@ -2874,7 +2873,7 @@ from the cursor position. ;;;*** -;;;### (autoloads nil "calc" "calc/calc.el" (21291 53104 431149 0)) +;;;### (autoloads nil "calc" "calc/calc.el" (21291 9464 291241 0)) ;;; Generated autoloads from calc/calc.el (define-key ctl-x-map "*" 'calc-dispatch) @@ -2958,8 +2957,8 @@ See Info node `(calc)Defining Functions'. ;;;*** -;;;### (autoloads nil "calc-undo" "calc/calc-undo.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "calc-undo" "calc/calc-undo.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from calc/calc-undo.el (autoload 'calc-undo "calc-undo" "\ @@ -2969,7 +2968,7 @@ See Info node `(calc)Defining Functions'. ;;;*** -;;;### (autoloads nil "calculator" "calculator.el" (21291 53104 431149 +;;;### (autoloads nil "calculator" "calculator.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from calculator.el @@ -2981,8 +2980,8 @@ See the documentation for `calculator-mode' for more information. ;;;*** -;;;### (autoloads nil "calendar" "calendar/calendar.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "calendar" "calendar/calendar.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from calendar/calendar.el (autoload 'calendar "calendar" "\ @@ -3025,7 +3024,7 @@ This function is suitable for execution in an init file. ;;;*** -;;;### (autoloads nil "canlock" "gnus/canlock.el" (21291 53104 431149 +;;;### (autoloads nil "canlock" "gnus/canlock.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from gnus/canlock.el @@ -3044,7 +3043,7 @@ it fails. ;;;*** ;;;### (autoloads nil "cap-words" "progmodes/cap-words.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/cap-words.el (autoload 'capitalized-words-mode "cap-words" "\ @@ -3084,14 +3083,14 @@ Obsoletes `c-forward-into-nomenclature'. ;;;*** ;;;### (autoloads nil "cc-compat" "progmodes/cc-compat.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/cc-compat.el (put 'c-indent-level 'safe-local-variable 'integerp) ;;;*** ;;;### (autoloads nil "cc-engine" "progmodes/cc-engine.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/cc-engine.el (autoload 'c-guess-basic-syntax "cc-engine" "\ @@ -3101,8 +3100,8 @@ Return the syntactic context of the current line. ;;;*** -;;;### (autoloads nil "cc-guess" "progmodes/cc-guess.el" (21307 46976 -;;;;;; 832220 0)) +;;;### (autoloads nil "cc-guess" "progmodes/cc-guess.el" (21305 47864 +;;;;;; 651560 808000)) ;;; Generated autoloads from progmodes/cc-guess.el (defvar c-guess-guessed-offsets-alist nil "\ @@ -3200,8 +3199,8 @@ the absolute file name of the file if STYLE-NAME is nil. ;;;*** -;;;### (autoloads nil "cc-mode" "progmodes/cc-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "cc-mode" "progmodes/cc-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/cc-mode.el (autoload 'c-initialize-cc-mode "cc-mode" "\ @@ -3359,7 +3358,7 @@ Key bindings: ;;;*** ;;;### (autoloads nil "cc-styles" "progmodes/cc-styles.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/cc-styles.el (autoload 'c-set-style "cc-styles" "\ @@ -3410,8 +3409,8 @@ and exists only for compatibility reasons. ;;;*** -;;;### (autoloads nil "cc-vars" "progmodes/cc-vars.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "cc-vars" "progmodes/cc-vars.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/cc-vars.el (put 'c-basic-offset 'safe-local-variable 'integerp) (put 'c-backslash-column 'safe-local-variable 'integerp) @@ -3419,7 +3418,7 @@ and exists only for compatibility reasons. ;;;*** -;;;### (autoloads nil "ccl" "international/ccl.el" (21291 53104 431149 +;;;### (autoloads nil "ccl" "international/ccl.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from international/ccl.el @@ -3680,8 +3679,8 @@ See the documentation of `define-ccl-program' for the detail of CCL program. ;;;*** -;;;### (autoloads nil "cconv" "emacs-lisp/cconv.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "cconv" "emacs-lisp/cconv.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/cconv.el (autoload 'cconv-closure-convert "cconv" "\ @@ -3700,15 +3699,15 @@ Add the warnings that closure conversion would encounter. ;;;*** -;;;### (autoloads nil "cedet" "cedet/cedet.el" (21291 53104 431149 +;;;### (autoloads nil "cedet" "cedet/cedet.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from cedet/cedet.el (push (purecopy '(cedet 2 0)) package--builtin-versions) ;;;*** -;;;### (autoloads nil "cfengine" "progmodes/cfengine.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "cfengine" "progmodes/cfengine.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/cfengine.el (push (purecopy '(cfengine 1 3)) package--builtin-versions) @@ -3738,15 +3737,15 @@ on the buffer contents ;;;*** -;;;### (autoloads nil "chart" "emacs-lisp/chart.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "chart" "emacs-lisp/chart.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/chart.el (push (purecopy '(chart 0 2)) package--builtin-versions) ;;;*** ;;;### (autoloads nil "check-declare" "emacs-lisp/check-declare.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/check-declare.el (autoload 'check-declare-file "check-declare" "\ @@ -3764,7 +3763,7 @@ Returns non-nil if any false statements are found. ;;;*** ;;;### (autoloads nil "checkdoc" "emacs-lisp/checkdoc.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/checkdoc.el (push (purecopy '(checkdoc 0 6 2)) package--builtin-versions) (put 'checkdoc-force-docstrings-flag 'safe-local-variable #'booleanp) @@ -3965,7 +3964,7 @@ checking of documentation strings. ;;;*** ;;;### (autoloads nil "china-util" "language/china-util.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from language/china-util.el (autoload 'decode-hz-region "china-util" "\ @@ -4002,7 +4001,7 @@ Encode the text in the current buffer to HZ. ;;;*** -;;;### (autoloads nil "chistory" "chistory.el" (21291 53104 431149 +;;;### (autoloads nil "chistory" "chistory.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from chistory.el @@ -4043,7 +4042,7 @@ and runs the normal hook `command-history-hook'. ;;;*** ;;;### (autoloads nil "cl-indent" "emacs-lisp/cl-indent.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/cl-indent.el (autoload 'common-lisp-indent-function "cl-indent" "\ @@ -4121,8 +4120,8 @@ For example, the function `case' has an indent property ;;;*** -;;;### (autoloads nil "cl-lib" "emacs-lisp/cl-lib.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "cl-lib" "emacs-lisp/cl-lib.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emacs-lisp/cl-lib.el (push (purecopy '(cl-lib 1 0)) package--builtin-versions) @@ -4152,8 +4151,8 @@ a future Emacs interpreter will be able to use it.") ;;;*** -;;;### (autoloads nil "cmacexp" "progmodes/cmacexp.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "cmacexp" "progmodes/cmacexp.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/cmacexp.el (autoload 'c-macro-expand "cmacexp" "\ @@ -4173,7 +4172,7 @@ For use inside Lisp programs, see also `c-macro-expansion'. ;;;*** -;;;### (autoloads nil "cmuscheme" "cmuscheme.el" (21291 53104 431149 +;;;### (autoloads nil "cmuscheme" "cmuscheme.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from cmuscheme.el @@ -4194,7 +4193,7 @@ is run). ;;;*** -;;;### (autoloads nil "color" "color.el" (21291 53104 431149 0)) +;;;### (autoloads nil "color" "color.el" (21291 9464 291241 0)) ;;; Generated autoloads from color.el (autoload 'color-name-to-rgb "color" "\ @@ -4213,7 +4212,7 @@ If FRAME cannot display COLOR, return nil. ;;;*** -;;;### (autoloads nil "comint" "comint.el" (21291 53104 431149 0)) +;;;### (autoloads nil "comint" "comint.el" (21335 41274 440541 0)) ;;; Generated autoloads from comint.el (defvar comint-output-filter-functions '(ansi-color-process-output comint-postoutput-scroll-to-bottom comint-watch-for-password-prompt) "\ @@ -4312,8 +4311,8 @@ REGEXP-GROUP is the regular expression group in REGEXP to use. ;;;*** -;;;### (autoloads nil "compare-w" "vc/compare-w.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "compare-w" "vc/compare-w.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from vc/compare-w.el (autoload 'compare-windows "compare-w" "\ @@ -4346,8 +4345,8 @@ on third call it again advances points to the next difference and so on. ;;;*** -;;;### (autoloads nil "compile" "progmodes/compile.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "compile" "progmodes/compile.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/compile.el (defvar compilation-mode-hook nil "\ @@ -4528,7 +4527,7 @@ This is the value of `next-error-function' in Compilation buffers. ;;;*** -;;;### (autoloads nil "completion" "completion.el" (21291 53104 431149 +;;;### (autoloads nil "completion" "completion.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from completion.el @@ -4552,7 +4551,7 @@ if ARG is omitted or nil. ;;;*** ;;;### (autoloads nil "conf-mode" "textmodes/conf-mode.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from textmodes/conf-mode.el (autoload 'conf-mode "conf-mode" "\ @@ -4707,7 +4706,7 @@ For details see `conf-mode'. Example: ;;;*** -;;;### (autoloads nil "cookie1" "play/cookie1.el" (21291 53104 431149 +;;;### (autoloads nil "cookie1" "play/cookie1.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/cookie1.el @@ -4737,7 +4736,7 @@ and subsequent calls on the same file won't go to disk. ;;;*** ;;;### (autoloads nil "copyright" "emacs-lisp/copyright.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/copyright.el (put 'copyright-at-end-flag 'safe-local-variable 'booleanp) (put 'copyright-names-regexp 'safe-local-variable 'stringp) @@ -4776,7 +4775,7 @@ If FIX is non-nil, run `copyright-fix-years' instead. ;;;*** ;;;### (autoloads nil "cperl-mode" "progmodes/cperl-mode.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/cperl-mode.el (put 'cperl-indent-level 'safe-local-variable 'integerp) (put 'cperl-brace-offset 'safe-local-variable 'integerp) @@ -4974,7 +4973,7 @@ Run a `perldoc' on the word around point. ;;;*** -;;;### (autoloads nil "cpp" "progmodes/cpp.el" (21291 53104 431149 +;;;### (autoloads nil "cpp" "progmodes/cpp.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from progmodes/cpp.el @@ -4993,7 +4992,7 @@ Edit display information for cpp conditionals. ;;;*** -;;;### (autoloads nil "crisp" "emulation/crisp.el" (21291 53104 431149 +;;;### (autoloads nil "crisp" "emulation/crisp.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emulation/crisp.el @@ -5019,7 +5018,7 @@ if ARG is omitted or nil. ;;;*** -;;;### (autoloads nil "crm" "emacs-lisp/crm.el" (21291 53104 431149 +;;;### (autoloads nil "crm" "emacs-lisp/crm.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/crm.el @@ -5046,8 +5045,8 @@ with empty strings removed. ;;;*** -;;;### (autoloads nil "css-mode" "textmodes/css-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "css-mode" "textmodes/css-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/css-mode.el (autoload 'css-mode "css-mode" "\ @@ -5057,8 +5056,8 @@ Major mode to edit Cascading Style Sheets. ;;;*** -;;;### (autoloads nil "cua-base" "emulation/cua-base.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "cua-base" "emulation/cua-base.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emulation/cua-base.el (defvar cua-mode nil "\ @@ -5103,8 +5102,8 @@ Enable CUA selection mode without the C-z/C-x/C-c/C-v bindings. ;;;*** -;;;### (autoloads nil "cua-rect" "emulation/cua-rect.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "cua-rect" "emulation/cua-rect.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emulation/cua-rect.el (autoload 'cua-rectangle-mark-mode "cua-rect" "\ @@ -5115,7 +5114,7 @@ Activates the region if needed. Only lasts until the region is deactivated. ;;;*** -;;;### (autoloads nil "cus-edit" "cus-edit.el" (21291 53104 431149 +;;;### (autoloads nil "cus-edit" "cus-edit.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from cus-edit.el @@ -5428,7 +5427,7 @@ The format is suitable for use with `easy-menu-define'. ;;;*** -;;;### (autoloads nil "cus-theme" "cus-theme.el" (21291 53104 431149 +;;;### (autoloads nil "cus-theme" "cus-theme.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from cus-theme.el @@ -5462,8 +5461,8 @@ omitted, a buffer named *Custom Themes* is used. ;;;*** -;;;### (autoloads nil "cvs-status" "vc/cvs-status.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "cvs-status" "vc/cvs-status.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from vc/cvs-status.el (autoload 'cvs-status-mode "cvs-status" "\ @@ -5473,7 +5472,7 @@ Mode used for cvs status output. ;;;*** -;;;### (autoloads nil "cwarn" "progmodes/cwarn.el" (21291 53104 431149 +;;;### (autoloads nil "cwarn" "progmodes/cwarn.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from progmodes/cwarn.el (push (purecopy '(cwarn 1 3 1)) package--builtin-versions) @@ -5519,7 +5518,7 @@ See `cwarn-mode' for more information on Cwarn mode. ;;;*** ;;;### (autoloads nil "cyril-util" "language/cyril-util.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from language/cyril-util.el (autoload 'cyrillic-encode-koi8-r-char "cyril-util" "\ @@ -5547,8 +5546,7 @@ If the argument is nil, we return the display table to its standard state. ;;;*** -;;;### (autoloads nil "dabbrev" "dabbrev.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "dabbrev" "dabbrev.el" (21291 9464 291241 0)) ;;; Generated autoloads from dabbrev.el (put 'dabbrev-case-fold-search 'risky-local-variable t) (put 'dabbrev-case-replace 'risky-local-variable t) @@ -5594,8 +5592,8 @@ See also `dabbrev-abbrev-char-regexp' and \\[dabbrev-completion]. ;;;*** -;;;### (autoloads nil "data-debug" "cedet/data-debug.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "data-debug" "cedet/data-debug.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from cedet/data-debug.el (autoload 'data-debug-new-buffer "data-debug" "\ @@ -5605,7 +5603,7 @@ Create a new data-debug buffer with NAME. ;;;*** -;;;### (autoloads nil "dbus" "net/dbus.el" (21291 53104 431149 0)) +;;;### (autoloads nil "dbus" "net/dbus.el" (21291 9464 291241 0)) ;;; Generated autoloads from net/dbus.el (autoload 'dbus-handle-event "dbus" "\ @@ -5618,8 +5616,8 @@ If the HANDLER returns a `dbus-error', it is propagated as return message. ;;;*** -;;;### (autoloads nil "dcl-mode" "progmodes/dcl-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "dcl-mode" "progmodes/dcl-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/dcl-mode.el (autoload 'dcl-mode "dcl-mode" "\ @@ -5745,8 +5743,8 @@ There is some minimal font-lock support (see vars ;;;*** -;;;### (autoloads nil "debug" "emacs-lisp/debug.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "debug" "emacs-lisp/debug.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/debug.el (setq debugger 'debug) @@ -5789,8 +5787,8 @@ To specify a nil argument interactively, exit with an empty minibuffer. ;;;*** -;;;### (autoloads nil "decipher" "play/decipher.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "decipher" "play/decipher.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from play/decipher.el (autoload 'decipher "decipher" "\ @@ -5818,7 +5816,7 @@ The most useful commands are: ;;;*** -;;;### (autoloads nil "delim-col" "delim-col.el" (21291 53104 431149 +;;;### (autoloads nil "delim-col" "delim-col.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from delim-col.el (push (purecopy '(delim-col 2 1)) package--builtin-versions) @@ -5844,7 +5842,7 @@ START and END delimits the corners of text rectangle. ;;;*** -;;;### (autoloads nil "delsel" "delsel.el" (21291 53104 431149 0)) +;;;### (autoloads nil "delsel" "delsel.el" (21291 9464 291241 0)) ;;; Generated autoloads from delsel.el (defalias 'pending-delete-mode 'delete-selection-mode) @@ -5872,8 +5870,8 @@ point regardless of any selection. ;;;*** -;;;### (autoloads nil "derived" "emacs-lisp/derived.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "derived" "emacs-lisp/derived.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emacs-lisp/derived.el (autoload 'define-derived-mode "derived" "\ @@ -5939,7 +5937,7 @@ the first time the mode is used. ;;;*** -;;;### (autoloads nil "descr-text" "descr-text.el" (21291 53104 431149 +;;;### (autoloads nil "descr-text" "descr-text.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from descr-text.el @@ -5974,7 +5972,7 @@ relevant to POS. ;;;*** -;;;### (autoloads nil "desktop" "desktop.el" (21291 53104 431149 +;;;### (autoloads nil "desktop" "desktop.el" (21340 59193 235574 ;;;;;; 0)) ;;; Generated autoloads from desktop.el @@ -6179,8 +6177,8 @@ Revert to the last loaded desktop. ;;;*** -;;;### (autoloads nil "deuglify" "gnus/deuglify.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "deuglify" "gnus/deuglify.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from gnus/deuglify.el (autoload 'gnus-article-outlook-unwrap-lines "deuglify" "\ @@ -6213,7 +6211,7 @@ Deuglify broken Outlook (Express) articles and redisplay. ;;;*** ;;;### (autoloads nil "diary-lib" "calendar/diary-lib.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from calendar/diary-lib.el (autoload 'diary "diary-lib" "\ @@ -6255,7 +6253,7 @@ Major mode for editing the diary file. ;;;*** -;;;### (autoloads nil "diff" "vc/diff.el" (21291 53104 431149 0)) +;;;### (autoloads nil "diff" "vc/diff.el" (21291 9464 291241 0)) ;;; Generated autoloads from vc/diff.el (defvar diff-switches (purecopy "-c") "\ @@ -6303,8 +6301,8 @@ This requires the external program `diff' to be in your `exec-path'. ;;;*** -;;;### (autoloads nil "diff-mode" "vc/diff-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "diff-mode" "vc/diff-mode.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from vc/diff-mode.el (autoload 'diff-mode "diff-mode" "\ @@ -6336,7 +6334,7 @@ the mode if ARG is omitted or nil. ;;;*** -;;;### (autoloads nil "dig" "net/dig.el" (21291 53104 431149 0)) +;;;### (autoloads nil "dig" "net/dig.el" (21291 9464 291241 0)) ;;; Generated autoloads from net/dig.el (autoload 'dig "dig" "\ @@ -6347,7 +6345,7 @@ Optional arguments are passed to `dig-invoke'. ;;;*** -;;;### (autoloads nil "dired" "dired.el" (21307 46976 832220 0)) +;;;### (autoloads nil "dired" "dired.el" (21346 11577 511879 0)) ;;; Generated autoloads from dired.el (defvar dired-listing-switches (purecopy "-al") "\ @@ -6467,7 +6465,7 @@ Keybindings: ;;;*** -;;;### (autoloads nil "dirtrack" "dirtrack.el" (21291 53104 431149 +;;;### (autoloads nil "dirtrack" "dirtrack.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from dirtrack.el @@ -6498,8 +6496,8 @@ from `default-directory'. ;;;*** -;;;### (autoloads nil "disass" "emacs-lisp/disass.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "disass" "emacs-lisp/disass.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emacs-lisp/disass.el (autoload 'disassemble "disass" "\ @@ -6513,7 +6511,7 @@ redefine OBJECT if it is a symbol. ;;;*** -;;;### (autoloads nil "disp-table" "disp-table.el" (21291 53104 431149 +;;;### (autoloads nil "disp-table" "disp-table.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from disp-table.el @@ -6635,8 +6633,8 @@ in `.emacs'. ;;;*** -;;;### (autoloads nil "dissociate" "play/dissociate.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "dissociate" "play/dissociate.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from play/dissociate.el (autoload 'dissociated-press "dissociate" "\ @@ -6652,7 +6650,7 @@ Default is 2. ;;;*** -;;;### (autoloads nil "dnd" "dnd.el" (21291 53104 431149 0)) +;;;### (autoloads nil "dnd" "dnd.el" (21291 9464 291241 0)) ;;; Generated autoloads from dnd.el (defvar dnd-protocol-alist `((,(purecopy "^file:///") . dnd-open-local-file) (,(purecopy "^file://") . dnd-open-file) (,(purecopy "^file:") . dnd-open-local-file) (,(purecopy "^\\(https?\\|ftp\\|file\\|nfs\\)://") . dnd-open-file)) "\ @@ -6672,8 +6670,8 @@ if some action was made, or nil if the URL is ignored.") ;;;*** -;;;### (autoloads nil "dns-mode" "textmodes/dns-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "dns-mode" "textmodes/dns-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/dns-mode.el (autoload 'dns-mode "dns-mode" "\ @@ -6696,7 +6694,7 @@ Locate SOA record and increment the serial field. ;;;*** -;;;### (autoloads nil "doc-view" "doc-view.el" (21312 16713 303543 +;;;### (autoloads nil "doc-view" "doc-view.el" (21311 58933 456815 ;;;;;; 0)) ;;; Generated autoloads from doc-view.el @@ -6743,7 +6741,7 @@ See the command `doc-view-mode' for more information on this mode. ;;;*** -;;;### (autoloads nil "doctor" "play/doctor.el" (21291 53104 431149 +;;;### (autoloads nil "doctor" "play/doctor.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/doctor.el @@ -6754,7 +6752,7 @@ Switch to *doctor* buffer and start giving psychotherapy. ;;;*** -;;;### (autoloads nil "double" "double.el" (21291 53104 431149 0)) +;;;### (autoloads nil "double" "double.el" (21291 9464 291241 0)) ;;; Generated autoloads from double.el (autoload 'double-mode "double" "\ @@ -6770,7 +6768,7 @@ strings when pressed twice. See `double-map' for details. ;;;*** -;;;### (autoloads nil "dunnet" "play/dunnet.el" (21291 53104 431149 +;;;### (autoloads nil "dunnet" "play/dunnet.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/dunnet.el (push (purecopy '(dunnet 2 1)) package--builtin-versions) @@ -6783,7 +6781,7 @@ Switch to *dungeon* buffer and start game. ;;;*** ;;;### (autoloads nil "easy-mmode" "emacs-lisp/easy-mmode.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/easy-mmode.el (defalias 'easy-mmode-define-minor-mode 'define-minor-mode) @@ -6923,7 +6921,7 @@ CSS contains a list of syntax specifications of the form (CHAR . SYNTAX). ;;;*** ;;;### (autoloads nil "easymenu" "emacs-lisp/easymenu.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/easymenu.el (autoload 'easy-menu-define "easymenu" "\ @@ -7061,8 +7059,8 @@ To implement dynamic menus, either call this from ;;;*** -;;;### (autoloads nil "ebnf2ps" "progmodes/ebnf2ps.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ebnf2ps" "progmodes/ebnf2ps.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/ebnf2ps.el (push (purecopy '(ebnf2ps 4 4)) package--builtin-versions) @@ -7327,8 +7325,8 @@ See `ebnf-style-database' documentation. ;;;*** -;;;### (autoloads nil "ebrowse" "progmodes/ebrowse.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ebrowse" "progmodes/ebrowse.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/ebrowse.el (autoload 'ebrowse-tree-mode "ebrowse" "\ @@ -7476,7 +7474,7 @@ Display statistics for a class tree. ;;;*** -;;;### (autoloads nil "ebuff-menu" "ebuff-menu.el" (21291 53104 431149 +;;;### (autoloads nil "ebuff-menu" "ebuff-menu.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from ebuff-menu.el @@ -7509,7 +7507,7 @@ Run hooks in `electric-buffer-menu-mode-hook' on entry. ;;;*** -;;;### (autoloads nil "echistory" "echistory.el" (21291 53104 431149 +;;;### (autoloads nil "echistory" "echistory.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from echistory.el @@ -7521,8 +7519,8 @@ With prefix arg NOCONFIRM, execute current line as-is without editing. ;;;*** -;;;### (autoloads nil "ecomplete" "gnus/ecomplete.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ecomplete" "gnus/ecomplete.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/ecomplete.el (autoload 'ecomplete-setup "ecomplete" "\ @@ -7532,7 +7530,7 @@ With prefix arg NOCONFIRM, execute current line as-is without editing. ;;;*** -;;;### (autoloads nil "ede" "cedet/ede.el" (21291 53104 431149 0)) +;;;### (autoloads nil "ede" "cedet/ede.el" (21291 9464 291241 0)) ;;; Generated autoloads from cedet/ede.el (push (purecopy '(ede 1 2)) package--builtin-versions) @@ -7558,8 +7556,8 @@ an EDE controlled project. ;;;*** -;;;### (autoloads nil "edebug" "emacs-lisp/edebug.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "edebug" "emacs-lisp/edebug.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emacs-lisp/edebug.el (defvar edebug-all-defs nil "\ @@ -7623,7 +7621,7 @@ Toggle edebugging of all forms. ;;;*** -;;;### (autoloads nil "ediff" "vc/ediff.el" (21307 46976 832220 0)) +;;;### (autoloads nil "ediff" "vc/ediff.el" (21307 61883 88841 0)) ;;; Generated autoloads from vc/ediff.el (push (purecopy '(ediff 2 81 4)) package--builtin-versions) @@ -7895,8 +7893,8 @@ With optional NODE, goes to that node. ;;;*** -;;;### (autoloads nil "ediff-help" "vc/ediff-help.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ediff-help" "vc/ediff-help.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from vc/ediff-help.el (autoload 'ediff-customize "ediff-help" "\ @@ -7906,8 +7904,8 @@ With optional NODE, goes to that node. ;;;*** -;;;### (autoloads nil "ediff-mult" "vc/ediff-mult.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ediff-mult" "vc/ediff-mult.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from vc/ediff-mult.el (autoload 'ediff-show-registry "ediff-mult" "\ @@ -7919,8 +7917,8 @@ Display Ediff's registry. ;;;*** -;;;### (autoloads nil "ediff-util" "vc/ediff-util.el" (21319 19378 -;;;;;; 69506 0)) +;;;### (autoloads nil "ediff-util" "vc/ediff-util.el" (21319 15673 +;;;;;; 174 0)) ;;; Generated autoloads from vc/ediff-util.el (autoload 'ediff-toggle-multiframe "ediff-util" "\ @@ -7939,8 +7937,7 @@ To change the default, set the variable `ediff-use-toolbar-p', which see. ;;;*** -;;;### (autoloads nil "edmacro" "edmacro.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "edmacro" "edmacro.el" (21291 9464 291241 0)) ;;; Generated autoloads from edmacro.el (push (purecopy '(edmacro 2 1)) package--builtin-versions) @@ -7989,7 +7986,7 @@ or nil, use a compact 80-column format. ;;;*** -;;;### (autoloads nil "edt" "emulation/edt.el" (21291 53104 431149 +;;;### (autoloads nil "edt" "emulation/edt.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emulation/edt.el @@ -8007,7 +8004,7 @@ Turn on EDT Emulation. ;;;*** -;;;### (autoloads nil "ehelp" "ehelp.el" (21291 53104 431149 0)) +;;;### (autoloads nil "ehelp" "ehelp.el" (21291 9464 291241 0)) ;;; Generated autoloads from ehelp.el (autoload 'with-electric-help "ehelp" "\ @@ -8043,15 +8040,15 @@ BUFFER is put back into its original major mode. ;;;*** -;;;### (autoloads nil "eieio" "emacs-lisp/eieio.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "eieio" "emacs-lisp/eieio.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/eieio.el (push (purecopy '(eieio 1 4)) package--builtin-versions) ;;;*** ;;;### (autoloads nil "eieio-core" "emacs-lisp/eieio-core.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/eieio-core.el (push (purecopy '(eieio-core 1 4)) package--builtin-versions) @@ -8067,8 +8064,8 @@ It creates an autoload function for CNAME's constructor. ;;;*** -;;;### (autoloads nil "eldoc" "emacs-lisp/eldoc.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "eldoc" "emacs-lisp/eldoc.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/eldoc.el (defvar eldoc-minor-mode-string (purecopy " ElDoc") "\ @@ -8111,7 +8108,7 @@ Emacs Lisp mode) that support ElDoc.") ;;;*** -;;;### (autoloads nil "elec-pair" "elec-pair.el" (21319 19378 69506 +;;;### (autoloads nil "elec-pair" "elec-pair.el" (21322 29240 319302 ;;;;;; 0)) ;;; Generated autoloads from elec-pair.el @@ -8147,7 +8144,7 @@ closing parenthesis. (Likewise for brackets, etc.). ;;;*** -;;;### (autoloads nil "elide-head" "elide-head.el" (21291 53104 431149 +;;;### (autoloads nil "elide-head" "elide-head.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from elide-head.el @@ -8163,8 +8160,8 @@ This is suitable as an entry on `find-file-hook' or appropriate mode hooks. ;;;*** -;;;### (autoloads nil "elint" "emacs-lisp/elint.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "elint" "emacs-lisp/elint.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/elint.el (autoload 'elint-file "elint" "\ @@ -8199,7 +8196,7 @@ optional prefix argument REINIT is non-nil. ;;;*** -;;;### (autoloads nil "elp" "emacs-lisp/elp.el" (21291 53104 431149 +;;;### (autoloads nil "elp" "emacs-lisp/elp.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/elp.el @@ -8234,7 +8231,7 @@ displayed. ;;;*** -;;;### (autoloads nil "emacs-lock" "emacs-lock.el" (21291 53104 431149 +;;;### (autoloads nil "emacs-lock" "emacs-lock.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emacs-lock.el @@ -8262,8 +8259,8 @@ Other values are interpreted as usual. ;;;*** -;;;### (autoloads nil "emacsbug" "mail/emacsbug.el" (21295 7741 571176 -;;;;;; 0)) +;;;### (autoloads nil "emacsbug" "mail/emacsbug.el" (21294 49847 +;;;;;; 664915 0)) ;;; Generated autoloads from mail/emacsbug.el (autoload 'report-emacs-bug "emacsbug" "\ @@ -8274,7 +8271,7 @@ Prompts for bug subject. Leaves you in a mail buffer. ;;;*** -;;;### (autoloads nil "emerge" "vc/emerge.el" (21291 53104 431149 +;;;### (autoloads nil "emerge" "vc/emerge.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/emerge.el @@ -8335,8 +8332,8 @@ Emerge two RCS revisions of a file, with another revision as ancestor. ;;;*** -;;;### (autoloads nil "enriched" "textmodes/enriched.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "enriched" "textmodes/enriched.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/enriched.el (autoload 'enriched-mode "enriched" "\ @@ -8371,7 +8368,7 @@ Commands: ;;;*** -;;;### (autoloads nil "epa" "epa.el" (21291 53104 431149 0)) +;;;### (autoloads nil "epa" "epa.el" (21291 9464 291241 0)) ;;; Generated autoloads from epa.el (autoload 'epa-list-keys "epa" "\ @@ -8549,7 +8546,7 @@ Insert selected KEYS after the point. ;;;*** -;;;### (autoloads nil "epa-dired" "epa-dired.el" (21291 53104 431149 +;;;### (autoloads nil "epa-dired" "epa-dired.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from epa-dired.el @@ -8575,7 +8572,7 @@ Encrypt marked files. ;;;*** -;;;### (autoloads nil "epa-file" "epa-file.el" (21291 53104 431149 +;;;### (autoloads nil "epa-file" "epa-file.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from epa-file.el @@ -8596,7 +8593,7 @@ Encrypt marked files. ;;;*** -;;;### (autoloads nil "epa-mail" "epa-mail.el" (21291 53104 431149 +;;;### (autoloads nil "epa-mail" "epa-mail.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from epa-mail.el @@ -8674,7 +8671,7 @@ if ARG is omitted or nil. ;;;*** -;;;### (autoloads nil "epg" "epg.el" (21291 53104 431149 0)) +;;;### (autoloads nil "epg" "epg.el" (21291 9464 291241 0)) ;;; Generated autoloads from epg.el (push (purecopy '(epg 1 0 0)) package--builtin-versions) @@ -8685,7 +8682,7 @@ Return a context object. ;;;*** -;;;### (autoloads nil "epg-config" "epg-config.el" (21291 53104 431149 +;;;### (autoloads nil "epg-config" "epg-config.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from epg-config.el @@ -8706,7 +8703,7 @@ Look at CONFIG and try to expand GROUP. ;;;*** -;;;### (autoloads nil "erc" "erc/erc.el" (21291 53104 431149 0)) +;;;### (autoloads nil "erc" "erc/erc.el" (21291 9464 291241 0)) ;;; Generated autoloads from erc/erc.el (push (purecopy '(erc 5 3)) package--builtin-versions) @@ -8756,34 +8753,34 @@ Otherwise, connect to HOST:PORT as USER and /join CHANNEL. ;;;*** ;;;### (autoloads nil "erc-autoaway" "erc/erc-autoaway.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from erc/erc-autoaway.el (autoload 'erc-autoaway-mode "erc-autoaway") ;;;*** -;;;### (autoloads nil "erc-button" "erc/erc-button.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "erc-button" "erc/erc-button.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from erc/erc-button.el (autoload 'erc-button-mode "erc-button" nil t) ;;;*** -;;;### (autoloads nil "erc-capab" "erc/erc-capab.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "erc-capab" "erc/erc-capab.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from erc/erc-capab.el (autoload 'erc-capab-identify-mode "erc-capab" nil t) ;;;*** -;;;### (autoloads nil "erc-compat" "erc/erc-compat.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "erc-compat" "erc/erc-compat.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from erc/erc-compat.el (autoload 'erc-define-minor-mode "erc-compat") ;;;*** -;;;### (autoloads nil "erc-dcc" "erc/erc-dcc.el" (21291 53104 431149 +;;;### (autoloads nil "erc-dcc" "erc/erc-dcc.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from erc/erc-dcc.el (autoload 'erc-dcc-mode "erc-dcc") @@ -8814,14 +8811,14 @@ that subcommand. ;;;*** ;;;### (autoloads nil "erc-desktop-notifications" "erc/erc-desktop-notifications.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from erc/erc-desktop-notifications.el (autoload 'erc-notifications-mode "erc-desktop-notifications" "" t) ;;;*** ;;;### (autoloads nil "erc-ezbounce" "erc/erc-ezbounce.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from erc/erc-ezbounce.el (autoload 'erc-cmd-ezb "erc-ezbounce" "\ @@ -8883,7 +8880,7 @@ Add EZBouncer convenience functions to ERC. ;;;*** -;;;### (autoloads nil "erc-fill" "erc/erc-fill.el" (21291 53104 431149 +;;;### (autoloads nil "erc-fill" "erc/erc-fill.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from erc/erc-fill.el (autoload 'erc-fill-mode "erc-fill" nil t) @@ -8896,8 +8893,8 @@ You can put this on `erc-insert-modify-hook' and/or `erc-send-modify-hook'. ;;;*** -;;;### (autoloads nil "erc-identd" "erc/erc-identd.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "erc-identd" "erc/erc-identd.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from erc/erc-identd.el (autoload 'erc-identd-mode "erc-identd") @@ -8918,8 +8915,8 @@ system. ;;;*** -;;;### (autoloads nil "erc-imenu" "erc/erc-imenu.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "erc-imenu" "erc/erc-imenu.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from erc/erc-imenu.el (autoload 'erc-create-imenu-index "erc-imenu" "\ @@ -8929,21 +8926,21 @@ system. ;;;*** -;;;### (autoloads nil "erc-join" "erc/erc-join.el" (21291 53104 431149 +;;;### (autoloads nil "erc-join" "erc/erc-join.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from erc/erc-join.el (autoload 'erc-autojoin-mode "erc-join" nil t) ;;;*** -;;;### (autoloads nil "erc-list" "erc/erc-list.el" (21307 46976 832220 -;;;;;; 0)) +;;;### (autoloads nil "erc-list" "erc/erc-list.el" (21305 47942 151957 +;;;;;; 944000)) ;;; Generated autoloads from erc/erc-list.el (autoload 'erc-list-mode "erc-list") ;;;*** -;;;### (autoloads nil "erc-log" "erc/erc-log.el" (21291 53104 431149 +;;;### (autoloads nil "erc-log" "erc/erc-log.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from erc/erc-log.el (autoload 'erc-log-mode "erc-log" nil t) @@ -8973,8 +8970,8 @@ You can save every individual message by putting this function on ;;;*** -;;;### (autoloads nil "erc-match" "erc/erc-match.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "erc-match" "erc/erc-match.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from erc/erc-match.el (autoload 'erc-match-mode "erc-match") @@ -9020,7 +9017,7 @@ Delete dangerous-host interactively to `erc-dangerous-hosts'. ;;;*** -;;;### (autoloads nil "erc-menu" "erc/erc-menu.el" (21291 53104 431149 +;;;### (autoloads nil "erc-menu" "erc/erc-menu.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from erc/erc-menu.el (autoload 'erc-menu-mode "erc-menu" nil t) @@ -9028,7 +9025,7 @@ Delete dangerous-host interactively to `erc-dangerous-hosts'. ;;;*** ;;;### (autoloads nil "erc-netsplit" "erc/erc-netsplit.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from erc/erc-netsplit.el (autoload 'erc-netsplit-mode "erc-netsplit") @@ -9040,7 +9037,7 @@ Show who's gone. ;;;*** ;;;### (autoloads nil "erc-networks" "erc/erc-networks.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from erc/erc-networks.el (autoload 'erc-determine-network "erc-networks" "\ @@ -9057,8 +9054,8 @@ Interactively select a server to connect to using `erc-server-alist'. ;;;*** -;;;### (autoloads nil "erc-notify" "erc/erc-notify.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "erc-notify" "erc/erc-notify.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from erc/erc-notify.el (autoload 'erc-notify-mode "erc-notify" nil t) @@ -9076,7 +9073,7 @@ with args, toggle notify status of people. ;;;*** -;;;### (autoloads nil "erc-page" "erc/erc-page.el" (21291 53104 431149 +;;;### (autoloads nil "erc-page" "erc/erc-page.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from erc/erc-page.el (autoload 'erc-page-mode "erc-page") @@ -9084,20 +9081,20 @@ with args, toggle notify status of people. ;;;*** ;;;### (autoloads nil "erc-pcomplete" "erc/erc-pcomplete.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from erc/erc-pcomplete.el (autoload 'erc-completion-mode "erc-pcomplete" nil t) ;;;*** -;;;### (autoloads nil "erc-replace" "erc/erc-replace.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "erc-replace" "erc/erc-replace.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from erc/erc-replace.el (autoload 'erc-replace-mode "erc-replace") ;;;*** -;;;### (autoloads nil "erc-ring" "erc/erc-ring.el" (21291 53104 431149 +;;;### (autoloads nil "erc-ring" "erc/erc-ring.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from erc/erc-ring.el (autoload 'erc-ring-mode "erc-ring" nil t) @@ -9105,7 +9102,7 @@ with args, toggle notify status of people. ;;;*** ;;;### (autoloads nil "erc-services" "erc/erc-services.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from erc/erc-services.el (autoload 'erc-services-mode "erc-services" nil t) @@ -9122,15 +9119,15 @@ When called interactively, read the password using `read-passwd'. ;;;*** -;;;### (autoloads nil "erc-sound" "erc/erc-sound.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "erc-sound" "erc/erc-sound.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from erc/erc-sound.el (autoload 'erc-sound-mode "erc-sound") ;;;*** ;;;### (autoloads nil "erc-speedbar" "erc/erc-speedbar.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from erc/erc-speedbar.el (autoload 'erc-speedbar-browser "erc-speedbar" "\ @@ -9142,21 +9139,21 @@ This will add a speedbar major display mode. ;;;*** ;;;### (autoloads nil "erc-spelling" "erc/erc-spelling.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from erc/erc-spelling.el (autoload 'erc-spelling-mode "erc-spelling" nil t) ;;;*** -;;;### (autoloads nil "erc-stamp" "erc/erc-stamp.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "erc-stamp" "erc/erc-stamp.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from erc/erc-stamp.el (autoload 'erc-timestamp-mode "erc-stamp" nil t) ;;;*** -;;;### (autoloads nil "erc-track" "erc/erc-track.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "erc-track" "erc/erc-track.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from erc/erc-track.el (defvar erc-track-minor-mode nil "\ @@ -9182,7 +9179,7 @@ keybindings will not do anything useful. ;;;*** ;;;### (autoloads nil "erc-truncate" "erc/erc-truncate.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from erc/erc-truncate.el (autoload 'erc-truncate-mode "erc-truncate" nil t) @@ -9201,7 +9198,7 @@ Meant to be used in hooks, like `erc-insert-post-hook'. ;;;*** -;;;### (autoloads nil "erc-xdcc" "erc/erc-xdcc.el" (21291 53104 431149 +;;;### (autoloads nil "erc-xdcc" "erc/erc-xdcc.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from erc/erc-xdcc.el (autoload 'erc-xdcc-mode "erc-xdcc") @@ -9213,7 +9210,7 @@ Add a file to `erc-xdcc-files'. ;;;*** -;;;### (autoloads nil "ert" "emacs-lisp/ert.el" (21291 53104 431149 +;;;### (autoloads nil "ert" "emacs-lisp/ert.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/ert.el @@ -9279,8 +9276,8 @@ Display the documentation for TEST-OR-TEST-NAME (a symbol or ert-test). ;;;*** -;;;### (autoloads nil "ert-x" "emacs-lisp/ert-x.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ert-x" "emacs-lisp/ert-x.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/ert-x.el (put 'ert-with-test-buffer 'lisp-indent-function 1) @@ -9292,8 +9289,8 @@ Kill all test buffers that are still live. ;;;*** -;;;### (autoloads nil "esh-mode" "eshell/esh-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "esh-mode" "eshell/esh-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from eshell/esh-mode.el (autoload 'eshell-mode "esh-mode" "\ @@ -9303,7 +9300,7 @@ Emacs shell interactive mode. ;;;*** -;;;### (autoloads nil "eshell" "eshell/eshell.el" (21291 53104 431149 +;;;### (autoloads nil "eshell" "eshell/eshell.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from eshell/eshell.el (push (purecopy '(eshell 2 4 2)) package--builtin-versions) @@ -9339,7 +9336,7 @@ corresponding to a successful execution. ;;;*** -;;;### (autoloads nil "etags" "progmodes/etags.el" (21291 53104 431149 +;;;### (autoloads nil "etags" "progmodes/etags.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from progmodes/etags.el @@ -9649,7 +9646,7 @@ for \\[find-tag] (which see). ;;;*** ;;;### (autoloads nil "ethio-util" "language/ethio-util.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from language/ethio-util.el (autoload 'setup-ethiopic-environment-internal "ethio-util" "\ @@ -9817,7 +9814,7 @@ With ARG, insert that many delimiters. ;;;*** -;;;### (autoloads nil "eudc" "net/eudc.el" (21291 53104 431149 0)) +;;;### (autoloads nil "eudc" "net/eudc.el" (21291 9464 291241 0)) ;;; Generated autoloads from net/eudc.el (autoload 'eudc-set-server "eudc" "\ @@ -9871,7 +9868,7 @@ This does nothing except loading eudc by autoload side-effect. ;;;*** -;;;### (autoloads nil "eudc-bob" "net/eudc-bob.el" (21291 53104 431149 +;;;### (autoloads nil "eudc-bob" "net/eudc-bob.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from net/eudc-bob.el @@ -9907,8 +9904,8 @@ Display a button for the JPEG DATA. ;;;*** -;;;### (autoloads nil "eudc-export" "net/eudc-export.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "eudc-export" "net/eudc-export.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from net/eudc-export.el (autoload 'eudc-insert-record-at-point-into-bbdb "eudc-export" "\ @@ -9925,7 +9922,7 @@ Call `eudc-insert-record-at-point-into-bbdb' if on a record. ;;;*** ;;;### (autoloads nil "eudc-hotlist" "net/eudc-hotlist.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from net/eudc-hotlist.el (autoload 'eudc-edit-hotlist "eudc-hotlist" "\ @@ -9935,7 +9932,7 @@ Edit the hotlist of directory servers in a specialized buffer. ;;;*** -;;;### (autoloads nil "ewoc" "emacs-lisp/ewoc.el" (21291 53104 431149 +;;;### (autoloads nil "ewoc" "emacs-lisp/ewoc.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/ewoc.el @@ -9962,7 +9959,7 @@ fourth arg NOSEP non-nil inhibits this. ;;;*** -;;;### (autoloads nil "eww" "net/eww.el" (21291 53104 431149 0)) +;;;### (autoloads nil "eww" "net/eww.el" (21291 9464 291241 0)) ;;; Generated autoloads from net/eww.el (autoload 'eww "eww" "\ @@ -9986,7 +9983,7 @@ Render a file using EWW. ;;;*** ;;;### (autoloads nil "executable" "progmodes/executable.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/executable.el (autoload 'executable-command-find-posix-p "executable" "\ @@ -10027,7 +10024,7 @@ file modes. ;;;*** -;;;### (autoloads nil "expand" "expand.el" (21291 53104 431149 0)) +;;;### (autoloads nil "expand" "expand.el" (21291 9464 291241 0)) ;;; Generated autoloads from expand.el (autoload 'expand-add-abbrevs "expand" "\ @@ -10076,7 +10073,7 @@ This is used only in conjunction with `expand-add-abbrevs'. ;;;*** -;;;### (autoloads nil "f90" "progmodes/f90.el" (21291 53104 431149 +;;;### (autoloads nil "f90" "progmodes/f90.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from progmodes/f90.el @@ -10144,7 +10141,7 @@ with no args, if that value is non-nil. ;;;*** -;;;### (autoloads nil "face-remap" "face-remap.el" (21291 53104 431149 +;;;### (autoloads nil "face-remap" "face-remap.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from face-remap.el @@ -10304,8 +10301,8 @@ Besides the choice of face, it is the same as `buffer-face-mode'. ;;;*** -;;;### (autoloads nil "feedmail" "mail/feedmail.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "feedmail" "mail/feedmail.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from mail/feedmail.el (push (purecopy '(feedmail 11)) package--builtin-versions) @@ -10359,7 +10356,7 @@ you can set `feedmail-queue-reminder-alist' to nil. ;;;*** -;;;### (autoloads nil "ffap" "ffap.el" (21291 53104 431149 0)) +;;;### (autoloads nil "ffap" "ffap.el" (21292 8122 451256 0)) ;;; Generated autoloads from ffap.el (autoload 'ffap-next "ffap" "\ @@ -10422,7 +10419,7 @@ Evaluate the forms in variable `ffap-bindings'. ;;;*** -;;;### (autoloads nil "filecache" "filecache.el" (21291 53104 431149 +;;;### (autoloads nil "filecache" "filecache.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from filecache.el @@ -10480,7 +10477,7 @@ the name is considered already unique; only the second substitution ;;;*** -;;;### (autoloads nil "filenotify" "filenotify.el" (21291 53104 431149 +;;;### (autoloads nil "filenotify" "filenotify.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from filenotify.el @@ -10493,8 +10490,7 @@ Otherwise, signal a `file-notify-error'. ;;;*** -;;;### (autoloads nil "files-x" "files-x.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "files-x" "files-x.el" (21291 9464 291241 0)) ;;; Generated autoloads from files-x.el (autoload 'add-file-local-variable "files-x" "\ @@ -10559,7 +10555,7 @@ Copy directory-local variables to the -*- line. ;;;*** -;;;### (autoloads nil "filesets" "filesets.el" (21291 53104 431149 +;;;### (autoloads nil "filesets" "filesets.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from filesets.el @@ -10571,7 +10567,7 @@ Set up hooks, load the cache file -- if existing -- and build the menu. ;;;*** -;;;### (autoloads nil "find-cmd" "find-cmd.el" (21291 53104 431149 +;;;### (autoloads nil "find-cmd" "find-cmd.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from find-cmd.el (push (purecopy '(find-cmd 0 6)) package--builtin-versions) @@ -10592,7 +10588,7 @@ result is a string that should be ready for the command line. ;;;*** -;;;### (autoloads nil "find-dired" "find-dired.el" (21291 53104 431149 +;;;### (autoloads nil "find-dired" "find-dired.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from find-dired.el @@ -10633,7 +10629,7 @@ use in place of \"-ls\" as the final argument. ;;;*** -;;;### (autoloads nil "find-file" "find-file.el" (21291 53104 431149 +;;;### (autoloads nil "find-file" "find-file.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from find-file.el @@ -10725,7 +10721,7 @@ Visit the file you click on in another window. ;;;*** ;;;### (autoloads nil "find-func" "emacs-lisp/find-func.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/find-func.el (autoload 'find-library "find-func" "\ @@ -10883,7 +10879,7 @@ Define some key bindings for the find-function family of functions. ;;;*** -;;;### (autoloads nil "find-lisp" "find-lisp.el" (21291 53104 431149 +;;;### (autoloads nil "find-lisp" "find-lisp.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from find-lisp.el @@ -10904,7 +10900,7 @@ Change the filter on a `find-lisp-find-dired' buffer to REGEXP. ;;;*** -;;;### (autoloads nil "finder" "finder.el" (21291 53104 431149 0)) +;;;### (autoloads nil "finder" "finder.el" (21291 9464 291241 0)) ;;; Generated autoloads from finder.el (push (purecopy '(finder 1 0)) package--builtin-versions) @@ -10926,7 +10922,7 @@ Find packages matching a given keyword. ;;;*** -;;;### (autoloads nil "flow-ctrl" "flow-ctrl.el" (21291 53104 431149 +;;;### (autoloads nil "flow-ctrl" "flow-ctrl.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from flow-ctrl.el @@ -10948,8 +10944,8 @@ to get the effect of a C-q. ;;;*** -;;;### (autoloads nil "flow-fill" "gnus/flow-fill.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "flow-fill" "gnus/flow-fill.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/flow-fill.el (autoload 'fill-flowed-encode "flow-fill" "\ @@ -10964,8 +10960,8 @@ to get the effect of a C-q. ;;;*** -;;;### (autoloads nil "flymake" "progmodes/flymake.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "flymake" "progmodes/flymake.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/flymake.el (push (purecopy '(flymake 0 3)) package--builtin-versions) @@ -10995,8 +10991,8 @@ Turn flymake mode off. ;;;*** -;;;### (autoloads nil "flyspell" "textmodes/flyspell.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "flyspell" "textmodes/flyspell.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/flyspell.el (autoload 'flyspell-prog-mode "flyspell" "\ @@ -11066,14 +11062,13 @@ Flyspell whole buffer. ;;;*** -;;;### (autoloads nil "foldout" "foldout.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "foldout" "foldout.el" (21291 9464 291241 0)) ;;; Generated autoloads from foldout.el (push (purecopy '(foldout 1 10)) package--builtin-versions) ;;;*** -;;;### (autoloads nil "follow" "follow.el" (21291 53104 431149 0)) +;;;### (autoloads nil "follow" "follow.el" (21291 9464 291241 0)) ;;; Generated autoloads from follow.el (autoload 'turn-on-follow-mode "follow" "\ @@ -11141,8 +11136,8 @@ selected if the original window is the first one in the frame. ;;;*** -;;;### (autoloads nil "footnote" "mail/footnote.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "footnote" "mail/footnote.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from mail/footnote.el (push (purecopy '(footnote 0 19)) package--builtin-versions) @@ -11161,7 +11156,7 @@ play around with the following keys: ;;;*** -;;;### (autoloads nil "forms" "forms.el" (21291 53104 431149 0)) +;;;### (autoloads nil "forms" "forms.el" (21291 9464 291241 0)) ;;; Generated autoloads from forms.el (autoload 'forms-mode "forms" "\ @@ -11197,8 +11192,8 @@ Visit a file in Forms mode in other window. ;;;*** -;;;### (autoloads nil "fortran" "progmodes/fortran.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "fortran" "progmodes/fortran.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/fortran.el (autoload 'fortran-mode "fortran" "\ @@ -11275,7 +11270,7 @@ with no args, if that value is non-nil. ;;;*** -;;;### (autoloads nil "fortune" "play/fortune.el" (21291 53104 431149 +;;;### (autoloads nil "fortune" "play/fortune.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/fortune.el @@ -11324,7 +11319,7 @@ and choose the directory as the fortune-file. ;;;*** -;;;### (autoloads nil "frameset" "frameset.el" (21300 58261 85827 +;;;### (autoloads nil "frameset" "frameset.el" (21300 2232 181097 ;;;;;; 0)) ;;; Generated autoloads from frameset.el @@ -11505,15 +11500,15 @@ Interactively, reads the register using `register-read-with-preview'. ;;;*** -;;;### (autoloads nil "gamegrid" "play/gamegrid.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gamegrid" "play/gamegrid.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from play/gamegrid.el (push (purecopy '(gamegrid 1 2)) package--builtin-versions) ;;;*** -;;;### (autoloads nil "gdb-mi" "progmodes/gdb-mi.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gdb-mi" "progmodes/gdb-mi.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/gdb-mi.el (defvar gdb-enable-debug nil "\ @@ -11590,8 +11585,8 @@ detailed description of this mode. ;;;*** -;;;### (autoloads nil "generic" "emacs-lisp/generic.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "generic" "emacs-lisp/generic.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emacs-lisp/generic.el (defvar generic-mode-list nil "\ @@ -11671,8 +11666,8 @@ regular expression that can be used as an element of ;;;*** -;;;### (autoloads nil "glasses" "progmodes/glasses.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "glasses" "progmodes/glasses.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/glasses.el (autoload 'glasses-mode "glasses" "\ @@ -11686,8 +11681,8 @@ add virtual separators (like underscores) at places they belong to. ;;;*** -;;;### (autoloads nil "gmm-utils" "gnus/gmm-utils.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gmm-utils" "gnus/gmm-utils.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gmm-utils.el (autoload 'gmm-regexp-concat "gmm-utils" "\ @@ -11741,7 +11736,7 @@ DEFAULT-MAP specifies the default key map for ICON-LIST. ;;;*** -;;;### (autoloads nil "gnus" "gnus/gnus.el" (21291 53104 431149 0)) +;;;### (autoloads nil "gnus" "gnus/gnus.el" (21291 9464 291241 0)) ;;; Generated autoloads from gnus/gnus.el (push (purecopy '(gnus 5 13)) package--builtin-versions) (when (fboundp 'custom-autoload) @@ -11791,8 +11786,8 @@ prompt the user for the name of an NNTP server to use. ;;;*** -;;;### (autoloads nil "gnus-agent" "gnus/gnus-agent.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-agent" "gnus/gnus-agent.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-agent.el (autoload 'gnus-unplugged "gnus-agent" "\ @@ -11882,8 +11877,8 @@ CLEAN is obsolete and ignored. ;;;*** -;;;### (autoloads nil "gnus-art" "gnus/gnus-art.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-art" "gnus/gnus-art.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from gnus/gnus-art.el (autoload 'gnus-article-prepare-display "gnus-art" "\ @@ -11894,7 +11889,7 @@ Make the current buffer look like a nice article. ;;;*** ;;;### (autoloads nil "gnus-bookmark" "gnus/gnus-bookmark.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from gnus/gnus-bookmark.el (autoload 'gnus-bookmark-set "gnus-bookmark" "\ @@ -11917,8 +11912,8 @@ deletion, or > if it is flagged for displaying. ;;;*** -;;;### (autoloads nil "gnus-cache" "gnus/gnus-cache.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-cache" "gnus/gnus-cache.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-cache.el (autoload 'gnus-jog-cache "gnus-cache" "\ @@ -11959,8 +11954,8 @@ supported. ;;;*** -;;;### (autoloads nil "gnus-delay" "gnus/gnus-delay.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-delay" "gnus/gnus-delay.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-delay.el (autoload 'gnus-delay-article "gnus-delay" "\ @@ -11995,8 +11990,8 @@ Checking delayed messages is skipped if optional arg NO-CHECK is non-nil. ;;;*** -;;;### (autoloads nil "gnus-diary" "gnus/gnus-diary.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-diary" "gnus/gnus-diary.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-diary.el (autoload 'gnus-user-format-function-d "gnus-diary" "\ @@ -12011,8 +12006,8 @@ Checking delayed messages is skipped if optional arg NO-CHECK is non-nil. ;;;*** -;;;### (autoloads nil "gnus-dired" "gnus/gnus-dired.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-dired" "gnus/gnus-dired.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-dired.el (autoload 'turn-on-gnus-dired-mode "gnus-dired" "\ @@ -12022,8 +12017,8 @@ Convenience method to turn on gnus-dired-mode. ;;;*** -;;;### (autoloads nil "gnus-draft" "gnus/gnus-draft.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-draft" "gnus/gnus-draft.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-draft.el (autoload 'gnus-draft-reminder "gnus-draft" "\ @@ -12033,8 +12028,8 @@ Reminder user if there are unsent drafts. ;;;*** -;;;### (autoloads nil "gnus-fun" "gnus/gnus-fun.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-fun" "gnus/gnus-fun.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from gnus/gnus-fun.el (autoload 'gnus-random-x-face "gnus-fun" "\ @@ -12079,7 +12074,7 @@ FILE should be a PNG file that's 48x48 and smaller than or equal to ;;;*** ;;;### (autoloads nil "gnus-gravatar" "gnus/gnus-gravatar.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from gnus/gnus-gravatar.el (autoload 'gnus-treat-from-gravatar "gnus-gravatar" "\ @@ -12096,8 +12091,8 @@ If gravatars are already displayed, remove them. ;;;*** -;;;### (autoloads nil "gnus-group" "gnus/gnus-group.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-group" "gnus/gnus-group.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-group.el (autoload 'gnus-fetch-group "gnus-group" "\ @@ -12114,8 +12109,8 @@ Pop up a frame and enter GROUP. ;;;*** -;;;### (autoloads nil "gnus-html" "gnus/gnus-html.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-html" "gnus/gnus-html.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-html.el (autoload 'gnus-article-html "gnus-html" "\ @@ -12130,8 +12125,8 @@ Pop up a frame and enter GROUP. ;;;*** -;;;### (autoloads nil "gnus-kill" "gnus/gnus-kill.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-kill" "gnus/gnus-kill.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-kill.el (defalias 'gnus-batch-kill 'gnus-batch-score) @@ -12144,7 +12139,7 @@ Usage: emacs -batch -l ~/.emacs -l gnus -f gnus-batch-score ;;;*** -;;;### (autoloads nil "gnus-ml" "gnus/gnus-ml.el" (21291 53104 431149 +;;;### (autoloads nil "gnus-ml" "gnus/gnus-ml.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from gnus/gnus-ml.el @@ -12168,8 +12163,8 @@ Minor mode for providing mailing-list commands. ;;;*** -;;;### (autoloads nil "gnus-mlspl" "gnus/gnus-mlspl.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-mlspl" "gnus/gnus-mlspl.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-mlspl.el (autoload 'gnus-group-split-setup "gnus-mlspl" "\ @@ -12269,8 +12264,8 @@ Calling (gnus-group-split-fancy nil nil \"mail.others\") returns: ;;;*** -;;;### (autoloads nil "gnus-msg" "gnus/gnus-msg.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-msg" "gnus/gnus-msg.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from gnus/gnus-msg.el (autoload 'gnus-msg-mail "gnus-msg" "\ @@ -12297,7 +12292,7 @@ Like `message-reply'. ;;;*** ;;;### (autoloads nil "gnus-notifications" "gnus/gnus-notifications.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from gnus/gnus-notifications.el (autoload 'gnus-notifications "gnus-notifications" "\ @@ -12313,8 +12308,8 @@ This is typically a function to add in ;;;*** -;;;### (autoloads nil "gnus-picon" "gnus/gnus-picon.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-picon" "gnus/gnus-picon.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-picon.el (autoload 'gnus-treat-from-picon "gnus-picon" "\ @@ -12337,8 +12332,8 @@ If picons are already displayed, remove them. ;;;*** -;;;### (autoloads nil "gnus-range" "gnus/gnus-range.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-range" "gnus/gnus-range.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-range.el (autoload 'gnus-sorted-difference "gnus-range" "\ @@ -12406,7 +12401,7 @@ Add NUM into sorted LIST by side effect. ;;;*** ;;;### (autoloads nil "gnus-registry" "gnus/gnus-registry.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from gnus/gnus-registry.el (autoload 'gnus-registry-initialize "gnus-registry" "\ @@ -12421,8 +12416,8 @@ Install the registry hooks. ;;;*** -;;;### (autoloads nil "gnus-sieve" "gnus/gnus-sieve.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-sieve" "gnus/gnus-sieve.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-sieve.el (autoload 'gnus-sieve-update "gnus-sieve" "\ @@ -12449,8 +12444,8 @@ See the documentation for these variables and functions for details. ;;;*** -;;;### (autoloads nil "gnus-spec" "gnus/gnus-spec.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-spec" "gnus/gnus-spec.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-spec.el (autoload 'gnus-update-format "gnus-spec" "\ @@ -12460,8 +12455,8 @@ Update the format specification near point. ;;;*** -;;;### (autoloads nil "gnus-start" "gnus/gnus-start.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-start" "gnus/gnus-start.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-start.el (autoload 'gnus-declare-backend "gnus-start" "\ @@ -12471,8 +12466,8 @@ Declare back end NAME with ABILITIES as a Gnus back end. ;;;*** -;;;### (autoloads nil "gnus-sum" "gnus/gnus-sum.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-sum" "gnus/gnus-sum.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from gnus/gnus-sum.el (autoload 'gnus-summary-bookmark-jump "gnus-sum" "\ @@ -12483,8 +12478,8 @@ BOOKMARK is a bookmark name or a bookmark record. ;;;*** -;;;### (autoloads nil "gnus-sync" "gnus/gnus-sync.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-sync" "gnus/gnus-sync.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/gnus-sync.el (autoload 'gnus-sync-initialize "gnus-sync" "\ @@ -12499,8 +12494,8 @@ Install the sync hooks. ;;;*** -;;;### (autoloads nil "gnus-win" "gnus/gnus-win.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gnus-win" "gnus/gnus-win.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from gnus/gnus-win.el (autoload 'gnus-add-configuration "gnus-win" "\ @@ -12510,7 +12505,7 @@ Add the window configuration CONF to `gnus-buffer-configuration'. ;;;*** -;;;### (autoloads nil "gnutls" "net/gnutls.el" (21291 53104 431149 +;;;### (autoloads nil "gnutls" "net/gnutls.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from net/gnutls.el @@ -12527,7 +12522,7 @@ A value of nil says to use the default GnuTLS value.") ;;;*** -;;;### (autoloads nil "gomoku" "play/gomoku.el" (21291 53104 431149 +;;;### (autoloads nil "gomoku" "play/gomoku.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/gomoku.el @@ -12554,8 +12549,8 @@ Use \\[describe-mode] for more info. ;;;*** -;;;### (autoloads nil "goto-addr" "net/goto-addr.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "goto-addr" "net/goto-addr.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from net/goto-addr.el (define-obsolete-function-alias 'goto-address-at-mouse 'goto-address-at-point "22.1") @@ -12596,8 +12591,8 @@ Like `goto-address-mode', but only for comments and strings. ;;;*** -;;;### (autoloads nil "gravatar" "gnus/gravatar.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "gravatar" "gnus/gravatar.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from gnus/gravatar.el (autoload 'gravatar-retrieve "gravatar" "\ @@ -12613,7 +12608,7 @@ Retrieve MAIL-ADDRESS gravatar and returns it. ;;;*** -;;;### (autoloads nil "grep" "progmodes/grep.el" (21291 53104 431149 +;;;### (autoloads nil "grep" "progmodes/grep.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from progmodes/grep.el @@ -12778,7 +12773,7 @@ file name to `*.gz', and sets `grep-highlight-matches' to `always'. ;;;*** -;;;### (autoloads nil "gs" "gs.el" (21291 53104 431149 0)) +;;;### (autoloads nil "gs" "gs.el" (21291 9464 291241 0)) ;;; Generated autoloads from gs.el (autoload 'gs-load-image "gs" "\ @@ -12791,7 +12786,7 @@ the form \"WINDOW-ID PIXMAP-ID\". Value is non-nil if successful. ;;;*** -;;;### (autoloads nil "gud" "progmodes/gud.el" (21291 53104 431149 +;;;### (autoloads nil "gud" "progmodes/gud.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from progmodes/gud.el @@ -12880,7 +12875,7 @@ it if ARG is omitted or nil. ;;;*** -;;;### (autoloads nil "gv" "emacs-lisp/gv.el" (21291 53104 431149 +;;;### (autoloads nil "gv" "emacs-lisp/gv.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/gv.el @@ -12983,8 +12978,8 @@ binding mode. ;;;*** -;;;### (autoloads nil "handwrite" "play/handwrite.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "handwrite" "play/handwrite.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from play/handwrite.el (autoload 'handwrite "handwrite" "\ @@ -13001,7 +12996,7 @@ Variables: `handwrite-linespace' (default 12) ;;;*** -;;;### (autoloads nil "hanoi" "play/hanoi.el" (21291 53104 431149 +;;;### (autoloads nil "hanoi" "play/hanoi.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/hanoi.el @@ -13029,8 +13024,8 @@ to be updated. ;;;*** -;;;### (autoloads nil "hashcash" "mail/hashcash.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "hashcash" "mail/hashcash.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from mail/hashcash.el (autoload 'hashcash-insert-payment "hashcash" "\ @@ -13072,7 +13067,7 @@ Prefix arg sets default accept amount temporarily. ;;;*** -;;;### (autoloads nil "help-at-pt" "help-at-pt.el" (21291 53104 431149 +;;;### (autoloads nil "help-at-pt" "help-at-pt.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from help-at-pt.el @@ -13200,7 +13195,7 @@ different regions. With numeric argument ARG, behaves like ;;;*** -;;;### (autoloads nil "help-fns" "help-fns.el" (21291 53104 431149 +;;;### (autoloads nil "help-fns" "help-fns.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from help-fns.el @@ -13280,7 +13275,7 @@ Produce a texinfo buffer with sorted doc-strings from the DOC file. ;;;*** -;;;### (autoloads nil "help-macro" "help-macro.el" (21291 53104 431149 +;;;### (autoloads nil "help-macro" "help-macro.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from help-macro.el @@ -13295,7 +13290,7 @@ gives the window that lists the options.") ;;;*** -;;;### (autoloads nil "help-mode" "help-mode.el" (21291 53104 431149 +;;;### (autoloads nil "help-mode" "help-mode.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from help-mode.el @@ -13395,8 +13390,8 @@ BOOKMARK is a bookmark name or a bookmark record. ;;;*** -;;;### (autoloads nil "helper" "emacs-lisp/helper.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "helper" "emacs-lisp/helper.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emacs-lisp/helper.el (autoload 'Helper-describe-bindings "helper" "\ @@ -13411,7 +13406,7 @@ Provide help for current mode. ;;;*** -;;;### (autoloads nil "hexl" "hexl.el" (21291 53104 431149 0)) +;;;### (autoloads nil "hexl" "hexl.el" (21291 9464 291241 0)) ;;; Generated autoloads from hexl.el (autoload 'hexl-mode "hexl" "\ @@ -13505,8 +13500,7 @@ This discards the buffer's undo information. ;;;*** -;;;### (autoloads nil "hi-lock" "hi-lock.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "hi-lock" "hi-lock.el" (21291 9464 291241 0)) ;;; Generated autoloads from hi-lock.el (autoload 'hi-lock-mode "hi-lock" "\ @@ -13673,8 +13667,8 @@ be found in variable `hi-lock-interactive-patterns'. ;;;*** -;;;### (autoloads nil "hideif" "progmodes/hideif.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "hideif" "progmodes/hideif.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/hideif.el (autoload 'hide-ifdef-mode "hideif" "\ @@ -13717,8 +13711,8 @@ Several variables affect how the hiding is done: ;;;*** -;;;### (autoloads nil "hideshow" "progmodes/hideshow.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "hideshow" "progmodes/hideshow.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/hideshow.el (defvar hs-special-modes-alist (mapcar 'purecopy '((c-mode "{" "}" "/[*/]" nil nil) (c++-mode "{" "}" "/[*/]" nil nil) (bibtex-mode ("@\\S(*\\(\\s(\\)" 1)) (java-mode "{" "}" "/[*/]" nil nil) (js-mode "{" "}" "/[*/]" nil))) "\ @@ -13780,7 +13774,7 @@ Unconditionally turn off `hs-minor-mode'. ;;;*** -;;;### (autoloads nil "hilit-chg" "hilit-chg.el" (21291 53104 431149 +;;;### (autoloads nil "hilit-chg" "hilit-chg.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from hilit-chg.el @@ -13912,7 +13906,7 @@ See `highlight-changes-mode' for more information on Highlight-Changes mode. ;;;*** -;;;### (autoloads nil "hippie-exp" "hippie-exp.el" (21291 53104 431149 +;;;### (autoloads nil "hippie-exp" "hippie-exp.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from hippie-exp.el (push (purecopy '(hippie-exp 1 6)) package--builtin-versions) @@ -13945,8 +13939,7 @@ argument VERBOSE non-nil makes the function verbose. ;;;*** -;;;### (autoloads nil "hl-line" "hl-line.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "hl-line" "hl-line.el" (21291 9464 291241 0)) ;;; Generated autoloads from hl-line.el (autoload 'hl-line-mode "hl-line" "\ @@ -13995,8 +13988,8 @@ Global-Hl-Line mode uses the functions `global-hl-line-unhighlight' and ;;;*** -;;;### (autoloads nil "holidays" "calendar/holidays.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "holidays" "calendar/holidays.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from calendar/holidays.el (define-obsolete-variable-alias 'general-holidays 'holiday-general-holidays "23.1") @@ -14144,8 +14137,8 @@ The optional LABEL is used to label the buffer created. ;;;*** -;;;### (autoloads nil "html2text" "gnus/html2text.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "html2text" "gnus/html2text.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/html2text.el (autoload 'html2text "html2text" "\ @@ -14155,8 +14148,8 @@ Convert HTML to plain text in the current buffer. ;;;*** -;;;### (autoloads nil "htmlfontify" "htmlfontify.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "htmlfontify" "htmlfontify.el" (21326 26296 +;;;;;; 18069 0)) ;;; Generated autoloads from htmlfontify.el (push (purecopy '(htmlfontify 0 21)) package--builtin-versions) @@ -14189,7 +14182,7 @@ You may also want to set `hfy-page-header' and `hfy-page-footer'. ;;;*** -;;;### (autoloads nil "ibuf-macs" "ibuf-macs.el" (21291 53104 431149 +;;;### (autoloads nil "ibuf-macs" "ibuf-macs.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from ibuf-macs.el @@ -14278,8 +14271,7 @@ bound to the current value of the filter. ;;;*** -;;;### (autoloads nil "ibuffer" "ibuffer.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "ibuffer" "ibuffer.el" (21291 9464 291241 0)) ;;; Generated autoloads from ibuffer.el (autoload 'ibuffer-list-buffers "ibuffer" "\ @@ -14319,7 +14311,7 @@ FORMATS is the value to use for `ibuffer-formats'. ;;;*** ;;;### (autoloads nil "icalendar" "calendar/icalendar.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from calendar/icalendar.el (push (purecopy '(icalendar 0 19)) package--builtin-versions) @@ -14372,7 +14364,7 @@ buffer `*icalendar-errors*'. ;;;*** -;;;### (autoloads nil "icomplete" "icomplete.el" (21291 53104 431149 +;;;### (autoloads nil "icomplete" "icomplete.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from icomplete.el @@ -14408,7 +14400,7 @@ completions: ;;;*** -;;;### (autoloads nil "icon" "progmodes/icon.el" (21291 53104 431149 +;;;### (autoloads nil "icon" "progmodes/icon.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from progmodes/icon.el @@ -14450,7 +14442,7 @@ with no args, if that value is non-nil. ;;;*** ;;;### (autoloads nil "idlw-shell" "progmodes/idlw-shell.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/idlw-shell.el (autoload 'idlwave-shell "idlw-shell" "\ @@ -14475,8 +14467,8 @@ See also the variable `idlwave-shell-prompt-pattern'. ;;;*** -;;;### (autoloads nil "idlwave" "progmodes/idlwave.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "idlwave" "progmodes/idlwave.el" (21335 41274 +;;;;;; 440541 0)) ;;; Generated autoloads from progmodes/idlwave.el (push (purecopy '(idlwave 6 1 22)) package--builtin-versions) @@ -14604,7 +14596,7 @@ The main features of this mode are ;;;*** -;;;### (autoloads nil "ido" "ido.el" (21291 53104 431149 0)) +;;;### (autoloads nil "ido" "ido.el" (21291 9464 291241 0)) ;;; Generated autoloads from ido.el (defvar ido-mode nil "\ @@ -14866,7 +14858,7 @@ DEF, if non-nil, is the default value. ;;;*** -;;;### (autoloads nil "ielm" "ielm.el" (21291 53104 431149 0)) +;;;### (autoloads nil "ielm" "ielm.el" (21291 9464 291241 0)) ;;; Generated autoloads from ielm.el (autoload 'ielm "ielm" "\ @@ -14878,7 +14870,7 @@ See `inferior-emacs-lisp-mode' for details. ;;;*** -;;;### (autoloads nil "iimage" "iimage.el" (21291 53104 431149 0)) +;;;### (autoloads nil "iimage" "iimage.el" (21291 9464 291241 0)) ;;; Generated autoloads from iimage.el (define-obsolete-function-alias 'turn-on-iimage-mode 'iimage-mode "24.1") @@ -14894,7 +14886,7 @@ the mode if ARG is omitted or nil, and toggle it if ARG is `toggle'. ;;;*** -;;;### (autoloads nil "image" "image.el" (21291 53104 431149 0)) +;;;### (autoloads nil "image" "image.el" (21291 9464 291241 0)) ;;; Generated autoloads from image.el (autoload 'image-type-from-data "image" "\ @@ -15087,8 +15079,8 @@ If Emacs is compiled without ImageMagick support, this does nothing. ;;;*** -;;;### (autoloads nil "image-dired" "image-dired.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "image-dired" "image-dired.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from image-dired.el (push (purecopy '(image-dired 0 4 11)) package--builtin-versions) @@ -15225,7 +15217,7 @@ easy-to-use form. ;;;*** -;;;### (autoloads nil "image-file" "image-file.el" (21291 53104 431149 +;;;### (autoloads nil "image-file" "image-file.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from image-file.el @@ -15288,7 +15280,7 @@ An image file is one whose name has an extension in ;;;*** -;;;### (autoloads nil "image-mode" "image-mode.el" (21291 53104 431149 +;;;### (autoloads nil "image-mode" "image-mode.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from image-mode.el @@ -15336,7 +15328,7 @@ on these modes. ;;;*** -;;;### (autoloads nil "imenu" "imenu.el" (21291 53104 431149 0)) +;;;### (autoloads nil "imenu" "imenu.el" (21291 9464 291241 0)) ;;; Generated autoloads from imenu.el (defvar imenu-sort-function nil "\ @@ -15474,8 +15466,8 @@ for more information. ;;;*** -;;;### (autoloads nil "ind-util" "language/ind-util.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ind-util" "language/ind-util.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from language/ind-util.el (autoload 'indian-compose-region "ind-util" "\ @@ -15505,8 +15497,8 @@ Convert old Emacs Devanagari characters to UCS. ;;;*** -;;;### (autoloads nil "inf-lisp" "progmodes/inf-lisp.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "inf-lisp" "progmodes/inf-lisp.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/inf-lisp.el (autoload 'inferior-lisp "inf-lisp" "\ @@ -15524,7 +15516,7 @@ of `inferior-lisp-program'). Runs the hooks from ;;;*** -;;;### (autoloads nil "info" "info.el" (21291 53104 431149 0)) +;;;### (autoloads nil "info" "info.el" (21291 9464 291241 0)) ;;; Generated autoloads from info.el (defcustom Info-default-directory-list (let* ((config-dir (file-name-as-directory (or (and (featurep 'ns) (let ((dir (expand-file-name "../info" data-directory))) (if (file-directory-p dir) dir))) configure-info-directory))) (prefixes (prune-directory-list '("/usr/local/" "/usr/" "/opt/" "/"))) (suffixes '("share/" "" "gnu/" "gnu/lib/" "gnu/lib/emacs/" "emacs/" "lib/" "lib/emacs/")) (standard-info-dirs (apply #'nconc (mapcar (lambda (pfx) (let ((dirs (mapcar (lambda (sfx) (concat pfx sfx "info/")) suffixes))) (prune-directory-list dirs))) prefixes))) (dirs (if (member config-dir standard-info-dirs) (nconc standard-info-dirs (list config-dir)) (cons config-dir standard-info-dirs)))) (if (not (eq system-type 'windows-nt)) dirs (let* ((instdir (file-name-directory invocation-directory)) (dir1 (expand-file-name "../info/" instdir)) (dir2 (expand-file-name "../../../info/" instdir))) (cond ((file-exists-p dir1) (append dirs (list dir1))) ((file-exists-p dir2) (append dirs (list dir2))) (t dirs))))) "\ @@ -15735,7 +15727,7 @@ Otherwise, visit the manual in a new Info buffer. ;;;*** -;;;### (autoloads nil "info-look" "info-look.el" (21291 53104 431149 +;;;### (autoloads nil "info-look" "info-look.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from info-look.el @@ -15783,7 +15775,7 @@ Perform completion on file preceding point. ;;;*** -;;;### (autoloads nil "info-xref" "info-xref.el" (21291 53104 431149 +;;;### (autoloads nil "info-xref" "info-xref.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from info-xref.el (push (purecopy '(info-xref 3)) package--builtin-versions) @@ -15867,7 +15859,7 @@ the sources handy. ;;;*** -;;;### (autoloads nil "informat" "informat.el" (21291 53104 431149 +;;;### (autoloads nil "informat" "informat.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from informat.el @@ -15913,8 +15905,8 @@ For example, invoke \"emacs -batch -f batch-info-validate $info/ ~/*.info\" ;;;*** -;;;### (autoloads nil "inversion" "cedet/inversion.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "inversion" "cedet/inversion.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from cedet/inversion.el (push (purecopy '(inversion 1 3)) package--builtin-versions) @@ -15927,7 +15919,7 @@ Only checks one based on which kind of Emacs is being run. ;;;*** ;;;### (autoloads nil "isearch-x" "international/isearch-x.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from international/isearch-x.el (autoload 'isearch-toggle-specified-input-method "isearch-x" "\ @@ -15947,7 +15939,7 @@ Toggle input method in interactive search. ;;;*** -;;;### (autoloads nil "isearchb" "isearchb.el" (21291 53104 431149 +;;;### (autoloads nil "isearchb" "isearchb.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from isearchb.el (push (purecopy '(isearchb 1 5)) package--builtin-versions) @@ -15963,7 +15955,7 @@ accessed via isearchb. ;;;*** ;;;### (autoloads nil "iso-cvt" "international/iso-cvt.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from international/iso-cvt.el (autoload 'iso-spanish "iso-cvt" "\ @@ -16054,15 +16046,15 @@ Add submenus to the File menu, to convert to and from various formats. ;;;*** ;;;### (autoloads nil "iso-transl" "international/iso-transl.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from international/iso-transl.el (define-key key-translation-map "\C-x8" 'iso-transl-ctl-x-8-map) (autoload 'iso-transl-ctl-x-8-map "iso-transl" "Keymap for C-x 8 prefix." t 'keymap) ;;;*** -;;;### (autoloads nil "ispell" "textmodes/ispell.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ispell" "textmodes/ispell.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/ispell.el (put 'ispell-check-comments 'safe-local-variable (lambda (a) (memq a '(nil t exclusive)))) @@ -16296,7 +16288,7 @@ You can bind this to the key C-c i in GNUS or mail by adding to ;;;*** ;;;### (autoloads nil "japan-util" "language/japan-util.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from language/japan-util.el (autoload 'setup-japanese-environment-internal "japan-util" "\ @@ -16373,7 +16365,7 @@ If non-nil, second arg INITIAL-INPUT is a string to insert before reading. ;;;*** -;;;### (autoloads nil "jka-compr" "jka-compr.el" (21291 53104 431149 +;;;### (autoloads nil "jka-compr" "jka-compr.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from jka-compr.el @@ -16397,8 +16389,7 @@ by `jka-compr-installed'. ;;;*** -;;;### (autoloads nil "js" "progmodes/js.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "js" "progmodes/js.el" (21291 9464 291241 0)) ;;; Generated autoloads from progmodes/js.el (push (purecopy '(js 9)) package--builtin-versions) @@ -16410,14 +16401,14 @@ Major mode for editing JavaScript. ;;;*** -;;;### (autoloads nil "json" "json.el" (21291 53104 431149 0)) +;;;### (autoloads nil "json" "json.el" (21291 9464 291241 0)) ;;; Generated autoloads from json.el (push (purecopy '(json 1 4)) package--builtin-versions) ;;;*** -;;;### (autoloads nil "keypad" "emulation/keypad.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "keypad" "emulation/keypad.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emulation/keypad.el (defvar keypad-setup nil "\ @@ -16473,7 +16464,7 @@ the decimal key on the keypad is mapped to DECIMAL instead of `.' ;;;*** ;;;### (autoloads nil "kinsoku" "international/kinsoku.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from international/kinsoku.el (autoload 'kinsoku "kinsoku" "\ @@ -16494,7 +16485,7 @@ the context of text formatting. ;;;*** -;;;### (autoloads nil "kkc" "international/kkc.el" (21291 53104 431149 +;;;### (autoloads nil "kkc" "international/kkc.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from international/kkc.el @@ -16517,7 +16508,7 @@ and the return value is the length of the conversion. ;;;*** -;;;### (autoloads nil "kmacro" "kmacro.el" (21291 53104 431149 0)) +;;;### (autoloads nil "kmacro" "kmacro.el" (21291 9464 291241 0)) ;;; Generated autoloads from kmacro.el (global-set-key "\C-x(" 'kmacro-start-macro) (global-set-key "\C-x)" 'kmacro-end-macro) @@ -16630,7 +16621,7 @@ If kbd macro currently being defined end it before activating it. ;;;*** ;;;### (autoloads nil "korea-util" "language/korea-util.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from language/korea-util.el (defvar default-korean-keyboard (purecopy (if (string-match "3" (or (getenv "HANGUL_KEYBOARD_TYPE") "")) "3" "")) "\ @@ -16644,8 +16635,8 @@ The kind of Korean keyboard for Korean input method. ;;;*** -;;;### (autoloads nil "landmark" "play/landmark.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "landmark" "play/landmark.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from play/landmark.el (defalias 'landmark-repeat 'landmark-test-run) @@ -16675,8 +16666,8 @@ Use \\[describe-mode] for more info. ;;;*** -;;;### (autoloads nil "lao-util" "language/lao-util.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "lao-util" "language/lao-util.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from language/lao-util.el (autoload 'lao-compose-string "lao-util" "\ @@ -16714,7 +16705,7 @@ Transcribe Romanized Lao string STR to Lao character string. ;;;*** ;;;### (autoloads nil "latexenc" "international/latexenc.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from international/latexenc.el (defvar latex-inputenc-coding-alist (purecopy '(("ansinew" . windows-1252) ("applemac" . mac-roman) ("ascii" . us-ascii) ("cp1250" . windows-1250) ("cp1252" . windows-1252) ("cp1257" . cp1257) ("cp437de" . cp437) ("cp437" . cp437) ("cp850" . cp850) ("cp852" . cp852) ("cp858" . cp858) ("cp865" . cp865) ("latin1" . iso-8859-1) ("latin2" . iso-8859-2) ("latin3" . iso-8859-3) ("latin4" . iso-8859-4) ("latin5" . iso-8859-5) ("latin9" . iso-8859-15) ("next" . next) ("utf8" . utf-8) ("utf8x" . utf-8))) "\ @@ -16746,7 +16737,7 @@ coding system names is determined from `latex-inputenc-coding-alist'. ;;;*** ;;;### (autoloads nil "latin1-disp" "international/latin1-disp.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from international/latin1-disp.el (defvar latin1-display nil "\ @@ -16788,7 +16779,7 @@ use either \\[customize] or the function `latin1-display'.") ;;;*** ;;;### (autoloads nil "ld-script" "progmodes/ld-script.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/ld-script.el (autoload 'ld-script-mode "ld-script" "\ @@ -16798,7 +16789,7 @@ A major mode to edit GNU ld script files ;;;*** -;;;### (autoloads nil "life" "play/life.el" (21291 53104 431149 0)) +;;;### (autoloads nil "life" "play/life.el" (21291 9464 291241 0)) ;;; Generated autoloads from play/life.el (autoload 'life "life" "\ @@ -16811,7 +16802,7 @@ generations (this defaults to 1). ;;;*** -;;;### (autoloads nil "linum" "linum.el" (21291 53104 431149 0)) +;;;### (autoloads nil "linum" "linum.el" (21291 9464 291241 0)) ;;; Generated autoloads from linum.el (push (purecopy '(linum 0 9 24)) package--builtin-versions) @@ -16848,7 +16839,7 @@ See `linum-mode' for more information on Linum mode. ;;;*** -;;;### (autoloads nil "loadhist" "loadhist.el" (21291 53104 431149 +;;;### (autoloads nil "loadhist" "loadhist.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from loadhist.el @@ -16880,7 +16871,7 @@ something strange, such as redefining an Emacs function. ;;;*** -;;;### (autoloads nil "locate" "locate.el" (21291 53104 431149 0)) +;;;### (autoloads nil "locate" "locate.el" (21291 9464 291241 0)) ;;; Generated autoloads from locate.el (defvar locate-ls-subdir-switches (purecopy "-al") "\ @@ -16932,7 +16923,7 @@ except that FILTER is not optional. ;;;*** -;;;### (autoloads nil "log-edit" "vc/log-edit.el" (21291 53104 431149 +;;;### (autoloads nil "log-edit" "vc/log-edit.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/log-edit.el @@ -16964,7 +16955,7 @@ done. Otherwise, it uses the current buffer. ;;;*** -;;;### (autoloads nil "log-view" "vc/log-view.el" (21291 53104 431149 +;;;### (autoloads nil "log-view" "vc/log-view.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/log-view.el @@ -16975,7 +16966,7 @@ Major mode for browsing CVS log output. ;;;*** -;;;### (autoloads nil "lpr" "lpr.el" (21291 53104 431149 0)) +;;;### (autoloads nil "lpr" "lpr.el" (21291 9464 291241 0)) ;;; Generated autoloads from lpr.el (defvar lpr-windows-system (memq system-type '(ms-dos windows-nt)) "\ @@ -17070,8 +17061,7 @@ for further customization of the printer command. ;;;*** -;;;### (autoloads nil "ls-lisp" "ls-lisp.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "ls-lisp" "ls-lisp.el" (21291 9464 291241 0)) ;;; Generated autoloads from ls-lisp.el (defvar ls-lisp-support-shell-wildcards t "\ @@ -17082,7 +17072,7 @@ Otherwise they are treated as Emacs regexps (for backward compatibility).") ;;;*** -;;;### (autoloads nil "lunar" "calendar/lunar.el" (21291 53104 431149 +;;;### (autoloads nil "lunar" "calendar/lunar.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from calendar/lunar.el @@ -17097,8 +17087,8 @@ This function is suitable for execution in an init file. ;;;*** -;;;### (autoloads nil "m4-mode" "progmodes/m4-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "m4-mode" "progmodes/m4-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/m4-mode.el (autoload 'm4-mode "m4-mode" "\ @@ -17108,7 +17098,7 @@ A major mode to edit m4 macro files. ;;;*** -;;;### (autoloads nil "macros" "macros.el" (21291 53104 431149 0)) +;;;### (autoloads nil "macros" "macros.el" (21291 9464 291241 0)) ;;; Generated autoloads from macros.el (autoload 'name-last-kbd-macro "macros" "\ @@ -17197,8 +17187,8 @@ and then select the region of un-tablified names and use ;;;*** -;;;### (autoloads nil "mail-extr" "mail/mail-extr.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "mail-extr" "mail/mail-extr.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from mail/mail-extr.el (autoload 'mail-extract-address-components "mail-extr" "\ @@ -17228,8 +17218,8 @@ Convert mail domain DOMAIN to the country it corresponds to. ;;;*** -;;;### (autoloads nil "mail-hist" "mail/mail-hist.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "mail-hist" "mail/mail-hist.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from mail/mail-hist.el (autoload 'mail-hist-define-keys "mail-hist" "\ @@ -17258,8 +17248,8 @@ This function normally would be called when the message is sent. ;;;*** -;;;### (autoloads nil "mail-utils" "mail/mail-utils.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "mail-utils" "mail/mail-utils.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from mail/mail-utils.el (defvar mail-use-rfc822 nil "\ @@ -17333,8 +17323,8 @@ matches may be returned from the message body. ;;;*** -;;;### (autoloads nil "mailabbrev" "mail/mailabbrev.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "mailabbrev" "mail/mailabbrev.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from mail/mailabbrev.el (defvar mail-abbrevs-mode nil "\ @@ -17383,8 +17373,8 @@ double-quotes. ;;;*** -;;;### (autoloads nil "mailalias" "mail/mailalias.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "mailalias" "mail/mailalias.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from mail/mailalias.el (defvar mail-complete-style 'angles "\ @@ -17437,8 +17427,8 @@ current header, calls `mail-complete-function' and passes prefix ARG if any. ;;;*** -;;;### (autoloads nil "mailclient" "mail/mailclient.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "mailclient" "mail/mailclient.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from mail/mailclient.el (autoload 'mailclient-send-it "mailclient" "\ @@ -17451,7 +17441,7 @@ The mail client is taken to be the handler of mailto URLs. ;;;*** ;;;### (autoloads nil "make-mode" "progmodes/make-mode.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/make-mode.el (autoload 'makefile-mode "make-mode" "\ @@ -17568,8 +17558,7 @@ An adapted `makefile-mode' that knows about imake. ;;;*** -;;;### (autoloads nil "makesum" "makesum.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "makesum" "makesum.el" (21291 9464 291241 0)) ;;; Generated autoloads from makesum.el (autoload 'make-command-summary "makesum" "\ @@ -17580,7 +17569,7 @@ Previous contents of that buffer are killed first. ;;;*** -;;;### (autoloads nil "man" "man.el" (21291 53104 431149 0)) +;;;### (autoloads nil "man" "man.el" (21291 9464 291241 0)) ;;; Generated autoloads from man.el (defalias 'manual-entry 'man) @@ -17634,7 +17623,7 @@ Default bookmark handler for Man buffers. ;;;*** -;;;### (autoloads nil "master" "master.el" (21291 53104 431149 0)) +;;;### (autoloads nil "master" "master.el" (21291 9464 291241 0)) ;;; Generated autoloads from master.el (push (purecopy '(master 1 0 2)) package--builtin-versions) @@ -17657,7 +17646,7 @@ yourself the value of `master-of' by calling `master-show-slave'. ;;;*** -;;;### (autoloads nil "mb-depth" "mb-depth.el" (21291 53104 431149 +;;;### (autoloads nil "mb-depth" "mb-depth.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from mb-depth.el @@ -17685,13 +17674,13 @@ recursion depth in the minibuffer prompt. This is only useful if ;;;*** -;;;### (autoloads nil "md4" "md4.el" (21291 53104 431149 0)) +;;;### (autoloads nil "md4" "md4.el" (21291 9464 291241 0)) ;;; Generated autoloads from md4.el (push (purecopy '(md4 1 0)) package--builtin-versions) ;;;*** -;;;### (autoloads nil "message" "gnus/message.el" (21291 53104 431149 +;;;### (autoloads nil "message" "gnus/message.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from gnus/message.el @@ -17858,7 +17847,7 @@ which specify the range to operate on. ;;;*** ;;;### (autoloads nil "meta-mode" "progmodes/meta-mode.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/meta-mode.el (push (purecopy '(meta-mode 1 0)) package--builtin-versions) @@ -17874,8 +17863,8 @@ Major mode for editing MetaPost sources. ;;;*** -;;;### (autoloads nil "metamail" "mail/metamail.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "metamail" "mail/metamail.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from mail/metamail.el (autoload 'metamail-interpret-header "metamail" "\ @@ -17918,7 +17907,7 @@ redisplayed as output is inserted. ;;;*** -;;;### (autoloads nil "mh-comp" "mh-e/mh-comp.el" (21291 53104 431149 +;;;### (autoloads nil "mh-comp" "mh-e/mh-comp.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from mh-e/mh-comp.el @@ -18009,7 +17998,7 @@ delete the draft message. ;;;*** -;;;### (autoloads nil "mh-e" "mh-e/mh-e.el" (21291 53104 431149 0)) +;;;### (autoloads nil "mh-e" "mh-e/mh-e.el" (21291 9464 291241 0)) ;;; Generated autoloads from mh-e/mh-e.el (push (purecopy '(mh-e 8 5 -4)) package--builtin-versions) @@ -18026,8 +18015,8 @@ Display version information about MH-E and the MH mail handling system. ;;;*** -;;;### (autoloads nil "mh-folder" "mh-e/mh-folder.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "mh-folder" "mh-e/mh-folder.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from mh-e/mh-folder.el (autoload 'mh-rmail "mh-folder" "\ @@ -18108,7 +18097,7 @@ perform the operation on all messages in that region. ;;;*** -;;;### (autoloads nil "midnight" "midnight.el" (21291 53104 431149 +;;;### (autoloads nil "midnight" "midnight.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from midnight.el @@ -18135,8 +18124,8 @@ to its second argument TM. ;;;*** -;;;### (autoloads nil "minibuf-eldef" "minibuf-eldef.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "minibuf-eldef" "minibuf-eldef.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from minibuf-eldef.el (defvar minibuffer-electric-default-mode nil "\ @@ -18165,7 +18154,7 @@ is modified to remove the default indication. ;;;*** -;;;### (autoloads nil "misc" "misc.el" (21291 53104 431149 0)) +;;;### (autoloads nil "misc" "misc.el" (21291 9464 291241 0)) ;;; Generated autoloads from misc.el (autoload 'butterfly "misc" "\ @@ -18193,7 +18182,7 @@ The return value is always nil. ;;;*** -;;;### (autoloads nil "misearch" "misearch.el" (21291 53104 431149 +;;;### (autoloads nil "misearch" "misearch.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from misearch.el (add-hook 'isearch-mode-hook 'multi-isearch-setup) @@ -18276,7 +18265,7 @@ whose file names match the specified wildcard. ;;;*** ;;;### (autoloads nil "mixal-mode" "progmodes/mixal-mode.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/mixal-mode.el (push (purecopy '(mixal-mode 0 1)) package--builtin-versions) @@ -18287,8 +18276,8 @@ Major mode for the mixal asm language. ;;;*** -;;;### (autoloads nil "mm-encode" "gnus/mm-encode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "mm-encode" "gnus/mm-encode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/mm-encode.el (autoload 'mm-default-file-encoding "mm-encode" "\ @@ -18298,8 +18287,8 @@ Return a default encoding for FILE. ;;;*** -;;;### (autoloads nil "mm-extern" "gnus/mm-extern.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "mm-extern" "gnus/mm-extern.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/mm-extern.el (autoload 'mm-extern-cache-contents "mm-extern" "\ @@ -18317,8 +18306,8 @@ If NO-DISPLAY is nil, display it. Otherwise, do nothing after replacing. ;;;*** -;;;### (autoloads nil "mm-partial" "gnus/mm-partial.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "mm-partial" "gnus/mm-partial.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/mm-partial.el (autoload 'mm-inline-partial "mm-partial" "\ @@ -18331,7 +18320,7 @@ If NO-DISPLAY is nil, display it. Otherwise, do nothing after replacing. ;;;*** -;;;### (autoloads nil "mm-url" "gnus/mm-url.el" (21291 53104 431149 +;;;### (autoloads nil "mm-url" "gnus/mm-url.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from gnus/mm-url.el @@ -18348,7 +18337,7 @@ Insert file contents of URL using `mm-url-program'. ;;;*** -;;;### (autoloads nil "mm-uu" "gnus/mm-uu.el" (21291 53104 431149 +;;;### (autoloads nil "mm-uu" "gnus/mm-uu.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from gnus/mm-uu.el @@ -18368,7 +18357,7 @@ Assume text has been decoded if DECODED is non-nil. ;;;*** -;;;### (autoloads nil "mml" "gnus/mml.el" (21291 53104 431149 0)) +;;;### (autoloads nil "mml" "gnus/mml.el" (21291 9464 291241 0)) ;;; Generated autoloads from gnus/mml.el (autoload 'mml-to-mime "mml" "\ @@ -18393,7 +18382,7 @@ body) or \"attachment\" (separate from the body). ;;;*** -;;;### (autoloads nil "mml1991" "gnus/mml1991.el" (21291 53104 431149 +;;;### (autoloads nil "mml1991" "gnus/mml1991.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from gnus/mml1991.el @@ -18409,7 +18398,7 @@ body) or \"attachment\" (separate from the body). ;;;*** -;;;### (autoloads nil "mml2015" "gnus/mml2015.el" (21291 53104 431149 +;;;### (autoloads nil "mml2015" "gnus/mml2015.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from gnus/mml2015.el @@ -18450,16 +18439,16 @@ body) or \"attachment\" (separate from the body). ;;;*** -;;;### (autoloads nil "mode-local" "cedet/mode-local.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "mode-local" "cedet/mode-local.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from cedet/mode-local.el (put 'define-overloadable-function 'doc-string-elt 3) ;;;*** -;;;### (autoloads nil "modula2" "progmodes/modula2.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "modula2" "progmodes/modula2.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/modula2.el (defalias 'modula-2-mode 'm2-mode) @@ -18492,7 +18481,7 @@ followed by the first character of the construct. ;;;*** -;;;### (autoloads nil "morse" "play/morse.el" (21291 53104 431149 +;;;### (autoloads nil "morse" "play/morse.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/morse.el @@ -18518,7 +18507,7 @@ Convert NATO phonetic alphabet in region to ordinary ASCII text. ;;;*** -;;;### (autoloads nil "mouse-drag" "mouse-drag.el" (21291 53104 431149 +;;;### (autoloads nil "mouse-drag" "mouse-drag.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from mouse-drag.el @@ -18566,7 +18555,7 @@ To test this function, evaluate: ;;;*** -;;;### (autoloads nil "mpc" "mpc.el" (21313 59928 109370 0)) +;;;### (autoloads nil "mpc" "mpc.el" (21346 11577 511879 0)) ;;; Generated autoloads from mpc.el (autoload 'mpc "mpc" "\ @@ -18576,7 +18565,7 @@ Main entry point for MPC. ;;;*** -;;;### (autoloads nil "mpuz" "play/mpuz.el" (21291 53104 431149 0)) +;;;### (autoloads nil "mpuz" "play/mpuz.el" (21291 9464 291241 0)) ;;; Generated autoloads from play/mpuz.el (autoload 'mpuz "mpuz" "\ @@ -18586,7 +18575,7 @@ Multiplication puzzle with GNU Emacs. ;;;*** -;;;### (autoloads nil "msb" "msb.el" (21291 53104 431149 0)) +;;;### (autoloads nil "msb" "msb.el" (21291 9464 291241 0)) ;;; Generated autoloads from msb.el (defvar msb-mode nil "\ @@ -18612,7 +18601,7 @@ different buffer menu using the function `msb'. ;;;*** ;;;### (autoloads nil "mule-diag" "international/mule-diag.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from international/mule-diag.el (autoload 'list-character-sets "mule-diag" "\ @@ -18745,7 +18734,7 @@ The default is 20. If LIMIT is negative, do not limit the listing. ;;;*** ;;;### (autoloads nil "mule-util" "international/mule-util.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from international/mule-util.el (defsubst string-to-list (string) "\ @@ -18876,8 +18865,8 @@ per-character basis, this may not be accurate. ;;;*** -;;;### (autoloads nil "net-utils" "net/net-utils.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "net-utils" "net/net-utils.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from net/net-utils.el (autoload 'ifconfig "net-utils" "\ @@ -18971,8 +18960,7 @@ Open a network connection to HOST on PORT. ;;;*** -;;;### (autoloads nil "netrc" "net/netrc.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "netrc" "net/netrc.el" (21291 9464 291241 0)) ;;; Generated autoloads from net/netrc.el (autoload 'netrc-credentials "netrc" "\ @@ -18985,7 +18973,7 @@ listed in the PORTS list. ;;;*** ;;;### (autoloads nil "network-stream" "net/network-stream.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from net/network-stream.el (autoload 'open-network-stream "network-stream" "\ @@ -19079,7 +19067,7 @@ a greeting from the server. ;;;*** ;;;### (autoloads nil "newst-backend" "net/newst-backend.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from net/newst-backend.el (autoload 'newsticker-running-p "newst-backend" "\ @@ -19101,7 +19089,7 @@ Run `newsticker-start-hook' if newsticker was not running already. ;;;*** ;;;### (autoloads nil "newst-plainview" "net/newst-plainview.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from net/newst-plainview.el (autoload 'newsticker-plainview "newst-plainview" "\ @@ -19112,7 +19100,7 @@ Start newsticker plainview. ;;;*** ;;;### (autoloads nil "newst-reader" "net/newst-reader.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from net/newst-reader.el (autoload 'newsticker-show-news "newst-reader" "\ @@ -19123,7 +19111,7 @@ Start reading news. You may want to bind this to a key. ;;;*** ;;;### (autoloads nil "newst-ticker" "net/newst-ticker.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from net/newst-ticker.el (autoload 'newsticker-ticker-running-p "newst-ticker" "\ @@ -19144,7 +19132,7 @@ running already. ;;;*** ;;;### (autoloads nil "newst-treeview" "net/newst-treeview.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from net/newst-treeview.el (autoload 'newsticker-treeview "newst-treeview" "\ @@ -19154,14 +19142,14 @@ Start newsticker treeview. ;;;*** -;;;### (autoloads nil "newsticker" "net/newsticker.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "newsticker" "net/newsticker.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from net/newsticker.el (push (purecopy '(newsticker 1 99)) package--builtin-versions) ;;;*** -;;;### (autoloads nil "nndiary" "gnus/nndiary.el" (21291 53104 431149 +;;;### (autoloads nil "nndiary" "gnus/nndiary.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from gnus/nndiary.el @@ -19172,7 +19160,7 @@ Generate NOV databases in all nndiary directories. ;;;*** -;;;### (autoloads nil "nndoc" "gnus/nndoc.el" (21291 53104 431149 +;;;### (autoloads nil "nndoc" "gnus/nndoc.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from gnus/nndoc.el @@ -19187,8 +19175,8 @@ symbol in the alist. ;;;*** -;;;### (autoloads nil "nnfolder" "gnus/nnfolder.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "nnfolder" "gnus/nnfolder.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from gnus/nnfolder.el (autoload 'nnfolder-generate-active-file "nnfolder" "\ @@ -19199,7 +19187,7 @@ This command does not work if you use short group names. ;;;*** -;;;### (autoloads nil "nnml" "gnus/nnml.el" (21291 53104 431149 0)) +;;;### (autoloads nil "nnml" "gnus/nnml.el" (21291 9464 291241 0)) ;;; Generated autoloads from gnus/nnml.el (autoload 'nnml-generate-nov-databases "nnml" "\ @@ -19209,7 +19197,7 @@ Generate NOV databases in all nnml directories. ;;;*** -;;;### (autoloads nil "novice" "novice.el" (21291 53104 431149 0)) +;;;### (autoloads nil "novice" "novice.el" (21291 9464 291241 0)) ;;; Generated autoloads from novice.el (define-obsolete-variable-alias 'disabled-command-hook 'disabled-command-function "22.1") @@ -19242,7 +19230,7 @@ future sessions. ;;;*** ;;;### (autoloads nil "nroff-mode" "textmodes/nroff-mode.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from textmodes/nroff-mode.el (autoload 'nroff-mode "nroff-mode" "\ @@ -19256,14 +19244,14 @@ closing requests for requests that are used in matched pairs. ;;;*** -;;;### (autoloads nil "ntlm" "net/ntlm.el" (21291 53104 431149 0)) +;;;### (autoloads nil "ntlm" "net/ntlm.el" (21291 9464 291241 0)) ;;; Generated autoloads from net/ntlm.el (push (purecopy '(ntlm 1 0)) package--builtin-versions) ;;;*** -;;;### (autoloads nil "nxml-glyph" "nxml/nxml-glyph.el" (21291 57968 -;;;;;; 313602 751000)) +;;;### (autoloads nil "nxml-glyph" "nxml/nxml-glyph.el" (21292 8122 +;;;;;; 451256 0)) ;;; Generated autoloads from nxml/nxml-glyph.el (autoload 'nxml-glyph-display-string "nxml-glyph" "\ @@ -19275,8 +19263,8 @@ Return nil if the face cannot display a glyph for N. ;;;*** -;;;### (autoloads nil "nxml-mode" "nxml/nxml-mode.el" (21291 57968 -;;;;;; 313602 751000)) +;;;### (autoloads nil "nxml-mode" "nxml/nxml-mode.el" (21327 47162 +;;;;;; 581074 0)) ;;; Generated autoloads from nxml/nxml-mode.el (autoload 'nxml-mode "nxml-mode" "\ @@ -19337,8 +19325,8 @@ Many aspects this mode can be customized using ;;;*** -;;;### (autoloads nil "nxml-uchnm" "nxml/nxml-uchnm.el" (21291 57968 -;;;;;; 313602 751000)) +;;;### (autoloads nil "nxml-uchnm" "nxml/nxml-uchnm.el" (21292 8122 +;;;;;; 451256 0)) ;;; Generated autoloads from nxml/nxml-uchnm.el (autoload 'nxml-enable-unicode-char-name-sets "nxml-uchnm" "\ @@ -19350,8 +19338,8 @@ the variable `nxml-enabled-unicode-blocks'. ;;;*** -;;;### (autoloads nil "octave" "progmodes/octave.el" (21321 34341 -;;;;;; 175457 0)) +;;;### (autoloads nil "octave" "progmodes/octave.el" (21321 8376 +;;;;;; 617089 0)) ;;; Generated autoloads from progmodes/octave.el (autoload 'octave-mode "octave" "\ @@ -19388,8 +19376,8 @@ startup file, `~/.emacs-octave'. ;;;*** -;;;### (autoloads nil "opascal" "progmodes/opascal.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "opascal" "progmodes/opascal.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/opascal.el (define-obsolete-function-alias 'delphi-mode 'opascal-mode "24.4") @@ -19424,7 +19412,7 @@ Coloring: ;;;*** -;;;### (autoloads nil "org" "org/org.el" (21291 53104 431149 0)) +;;;### (autoloads nil "org" "org/org.el" (21335 41274 440541 0)) ;;; Generated autoloads from org/org.el (autoload 'org-babel-do-load-languages "org" "\ @@ -19645,8 +19633,8 @@ Call the customize function with org as argument. ;;;*** -;;;### (autoloads nil "org-agenda" "org/org-agenda.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "org-agenda" "org/org-agenda.el" (21335 41274 +;;;;;; 440541 0)) ;;; Generated autoloads from org/org-agenda.el (autoload 'org-toggle-sticky-agenda "org-agenda" "\ @@ -19919,8 +19907,8 @@ to override `appt-message-warning-time'. ;;;*** -;;;### (autoloads nil "org-capture" "org/org-capture.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "org-capture" "org/org-capture.el" (21335 41274 +;;;;;; 440541 0)) ;;; Generated autoloads from org/org-capture.el (autoload 'org-capture-string "org-capture" "\ @@ -19962,8 +19950,8 @@ Set `org-capture-templates' to be similar to `org-remember-templates'. ;;;*** -;;;### (autoloads nil "org-colview" "org/org-colview.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "org-colview" "org/org-colview.el" (21335 41274 +;;;;;; 440541 0)) ;;; Generated autoloads from org/org-colview.el (autoload 'org-columns-remove-overlays "org-colview" "\ @@ -20026,8 +20014,8 @@ Turn on or update column view in the agenda. ;;;*** -;;;### (autoloads nil "org-compat" "org/org-compat.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "org-compat" "org/org-compat.el" (21335 41274 +;;;;;; 440541 0)) ;;; Generated autoloads from org/org-compat.el (autoload 'org-check-version "org-compat" "\ @@ -20037,7 +20025,7 @@ Try very hard to provide sensible version strings. ;;;*** -;;;### (autoloads nil "org-macs" "org/org-macs.el" (21291 53104 431149 +;;;### (autoloads nil "org-macs" "org/org-macs.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from org/org-macs.el @@ -20048,8 +20036,8 @@ Load FILE with optional arguments NOERROR and MUSTSUFFIX. Drop the MUSTSUFFIX a ;;;*** -;;;### (autoloads nil "org-version" "org/org-version.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "org-version" "org/org-version.el" (21335 41274 +;;;;;; 440541 0)) ;;; Generated autoloads from org/org-version.el (autoload 'org-release "org-version" "\ @@ -20066,8 +20054,7 @@ The Git version of org-mode. ;;;*** -;;;### (autoloads nil "outline" "outline.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "outline" "outline.el" (21291 9464 291241 0)) ;;; Generated autoloads from outline.el (put 'outline-regexp 'safe-local-variable 'stringp) (put 'outline-heading-end-regexp 'safe-local-variable 'stringp) @@ -20128,8 +20115,8 @@ See the command `outline-mode' for more information on this mode. ;;;*** -;;;### (autoloads nil "package" "emacs-lisp/package.el" (21303 2348 -;;;;;; 989568 0)) +;;;### (autoloads nil "package" "emacs-lisp/package.el" (21302 43960 +;;;;;; 321062 0)) ;;; Generated autoloads from emacs-lisp/package.el (push (purecopy '(package 1 0 1)) package--builtin-versions) @@ -20201,7 +20188,7 @@ The list is displayed in a buffer named `*Packages*'. ;;;*** -;;;### (autoloads nil "paren" "paren.el" (21291 53104 431149 0)) +;;;### (autoloads nil "paren" "paren.el" (21291 9464 291241 0)) ;;; Generated autoloads from paren.el (defvar show-paren-mode nil "\ @@ -20228,7 +20215,7 @@ matching parenthesis is highlighted in `show-paren-style' after ;;;*** ;;;### (autoloads nil "parse-time" "calendar/parse-time.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from calendar/parse-time.el (put 'parse-time-rules 'risky-local-variable t) @@ -20241,8 +20228,8 @@ unknown are returned as nil. ;;;*** -;;;### (autoloads nil "pascal" "progmodes/pascal.el" (21319 19378 -;;;;;; 69506 0)) +;;;### (autoloads nil "pascal" "progmodes/pascal.el" (21319 15673 +;;;;;; 174 0)) ;;; Generated autoloads from progmodes/pascal.el (autoload 'pascal-mode "pascal" "\ @@ -20292,7 +20279,7 @@ See also the user variables `pascal-type-keywords', `pascal-start-keywords' and ;;;*** ;;;### (autoloads nil "password-cache" "password-cache.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from password-cache.el (defvar password-cache t "\ @@ -20313,8 +20300,8 @@ Check if KEY is in the cache. ;;;*** -;;;### (autoloads nil "pcase" "emacs-lisp/pcase.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "pcase" "emacs-lisp/pcase.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/pcase.el (autoload 'pcase "pcase" "\ @@ -20375,7 +20362,7 @@ of the form (UPAT EXP). ;;;*** -;;;### (autoloads nil "pcmpl-cvs" "pcmpl-cvs.el" (21291 53104 431149 +;;;### (autoloads nil "pcmpl-cvs" "pcmpl-cvs.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from pcmpl-cvs.el @@ -20386,7 +20373,7 @@ Completion rules for the `cvs' command. ;;;*** -;;;### (autoloads nil "pcmpl-gnu" "pcmpl-gnu.el" (21291 53104 431149 +;;;### (autoloads nil "pcmpl-gnu" "pcmpl-gnu.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from pcmpl-gnu.el @@ -20414,8 +20401,8 @@ Completion for the GNU tar utility. ;;;*** -;;;### (autoloads nil "pcmpl-linux" "pcmpl-linux.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "pcmpl-linux" "pcmpl-linux.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from pcmpl-linux.el (autoload 'pcomplete/kill "pcmpl-linux" "\ @@ -20435,7 +20422,7 @@ Completion for GNU/Linux `mount'. ;;;*** -;;;### (autoloads nil "pcmpl-rpm" "pcmpl-rpm.el" (21291 53104 431149 +;;;### (autoloads nil "pcmpl-rpm" "pcmpl-rpm.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from pcmpl-rpm.el @@ -20446,7 +20433,7 @@ Completion for the `rpm' command. ;;;*** -;;;### (autoloads nil "pcmpl-unix" "pcmpl-unix.el" (21291 53104 431149 +;;;### (autoloads nil "pcmpl-unix" "pcmpl-unix.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from pcmpl-unix.el @@ -20502,8 +20489,7 @@ Includes files as well as host names followed by a colon. ;;;*** -;;;### (autoloads nil "pcmpl-x" "pcmpl-x.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "pcmpl-x" "pcmpl-x.el" (21291 9464 291241 0)) ;;; Generated autoloads from pcmpl-x.el (autoload 'pcomplete/tlmgr "pcmpl-x" "\ @@ -20527,7 +20513,7 @@ Completion for the `ag' command. ;;;*** -;;;### (autoloads nil "pcomplete" "pcomplete.el" (21291 53104 431149 +;;;### (autoloads nil "pcomplete" "pcomplete.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from pcomplete.el @@ -20585,7 +20571,7 @@ Setup `shell-mode' to use pcomplete. ;;;*** -;;;### (autoloads nil "pcvs" "vc/pcvs.el" (21291 53104 431149 0)) +;;;### (autoloads nil "pcvs" "vc/pcvs.el" (21291 9464 291241 0)) ;;; Generated autoloads from vc/pcvs.el (autoload 'cvs-checkout "pcvs" "\ @@ -20660,8 +20646,8 @@ The exact behavior is determined also by `cvs-dired-use-hook'." (when (stringp d ;;;*** -;;;### (autoloads nil "pcvs-defs" "vc/pcvs-defs.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "pcvs-defs" "vc/pcvs-defs.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from vc/pcvs-defs.el (defvar cvs-global-menu (let ((m (make-sparse-keymap "PCL-CVS"))) (define-key m [status] `(menu-item ,(purecopy "Directory Status") cvs-status :help ,(purecopy "A more verbose status of a workarea"))) (define-key m [checkout] `(menu-item ,(purecopy "Checkout Module") cvs-checkout :help ,(purecopy "Check out a module from the repository"))) (define-key m [update] `(menu-item ,(purecopy "Update Directory") cvs-update :help ,(purecopy "Fetch updates from the repository"))) (define-key m [examine] `(menu-item ,(purecopy "Examine Directory") cvs-examine :help ,(purecopy "Examine the current state of a workarea"))) (fset 'cvs-global-menu m)) "\ @@ -20669,8 +20655,8 @@ Global menu used by PCL-CVS.") ;;;*** -;;;### (autoloads nil "perl-mode" "progmodes/perl-mode.el" (21308 -;;;;;; 51146 390959 0)) +;;;### (autoloads nil "perl-mode" "progmodes/perl-mode.el" (21335 +;;;;;; 41274 440541 0)) ;;; Generated autoloads from progmodes/perl-mode.el (put 'perl-indent-level 'safe-local-variable 'integerp) (put 'perl-continued-statement-offset 'safe-local-variable 'integerp) @@ -20731,8 +20717,8 @@ Turning on Perl mode runs the normal hook `perl-mode-hook'. ;;;*** -;;;### (autoloads nil "picture" "textmodes/picture.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "picture" "textmodes/picture.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/picture.el (autoload 'picture-mode "picture" "\ @@ -20812,7 +20798,7 @@ they are not by default assigned to keys. ;;;*** -;;;### (autoloads nil "plstore" "gnus/plstore.el" (21291 53104 431149 +;;;### (autoloads nil "plstore" "gnus/plstore.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from gnus/plstore.el @@ -20828,8 +20814,7 @@ Major mode for editing PLSTORE files. ;;;*** -;;;### (autoloads nil "po" "textmodes/po.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "po" "textmodes/po.el" (21291 9464 291241 0)) ;;; Generated autoloads from textmodes/po.el (autoload 'po-find-file-coding-system "po" "\ @@ -20840,7 +20825,7 @@ Called through `file-coding-system-alist', before the file is visited for real. ;;;*** -;;;### (autoloads nil "pong" "play/pong.el" (21291 53104 431149 0)) +;;;### (autoloads nil "pong" "play/pong.el" (21291 9464 291241 0)) ;;; Generated autoloads from play/pong.el (autoload 'pong "pong" "\ @@ -20856,7 +20841,7 @@ pong-mode keybindings:\\ ;;;*** -;;;### (autoloads nil "pop3" "gnus/pop3.el" (21291 53104 431149 0)) +;;;### (autoloads nil "pop3" "gnus/pop3.el" (21291 9464 291241 0)) ;;; Generated autoloads from gnus/pop3.el (autoload 'pop3-movemail "pop3" "\ @@ -20867,7 +20852,7 @@ Use streaming commands. ;;;*** -;;;### (autoloads nil "pp" "emacs-lisp/pp.el" (21291 53104 431149 +;;;### (autoloads nil "pp" "emacs-lisp/pp.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/pp.el @@ -20918,7 +20903,7 @@ Ignores leading comment characters. ;;;*** -;;;### (autoloads nil "printing" "printing.el" (21291 53104 431149 +;;;### (autoloads nil "printing" "printing.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from printing.el (push (purecopy '(printing 6 9 3)) package--builtin-versions) @@ -21507,7 +21492,7 @@ are both set to t. ;;;*** -;;;### (autoloads nil "proced" "proced.el" (21291 53104 431149 0)) +;;;### (autoloads nil "proced" "proced.el" (21291 9464 291241 0)) ;;; Generated autoloads from proced.el (autoload 'proced "proced" "\ @@ -21525,7 +21510,7 @@ Proced buffers. ;;;*** -;;;### (autoloads nil "profiler" "profiler.el" (21291 53104 431149 +;;;### (autoloads nil "profiler" "profiler.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from profiler.el @@ -21554,8 +21539,8 @@ Open profile FILENAME. ;;;*** -;;;### (autoloads nil "prolog" "progmodes/prolog.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "prolog" "progmodes/prolog.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/prolog.el (autoload 'prolog-mode "prolog" "\ @@ -21588,7 +21573,7 @@ With prefix argument ARG, restart the Prolog process if running before. ;;;*** -;;;### (autoloads nil "ps-bdf" "ps-bdf.el" (21291 53104 431149 0)) +;;;### (autoloads nil "ps-bdf" "ps-bdf.el" (21291 9464 291241 0)) ;;; Generated autoloads from ps-bdf.el (defvar bdf-directory-list (if (memq system-type '(ms-dos windows-nt)) (list (expand-file-name "fonts/bdf" installation-directory)) '("/usr/local/share/emacs/fonts/bdf")) "\ @@ -21599,8 +21584,8 @@ The default value is '(\"/usr/local/share/emacs/fonts/bdf\").") ;;;*** -;;;### (autoloads nil "ps-mode" "progmodes/ps-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ps-mode" "progmodes/ps-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/ps-mode.el (push (purecopy '(ps-mode 1 1 9)) package--builtin-versions) @@ -21647,7 +21632,7 @@ Typing \\\\[ps-run-goto-error] when the cursor is at the number ;;;*** -;;;### (autoloads nil "ps-print" "ps-print.el" (21291 53104 431149 +;;;### (autoloads nil "ps-print" "ps-print.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from ps-print.el (push (purecopy '(ps-print 7 3 5)) package--builtin-versions) @@ -21845,15 +21830,15 @@ If EXTENSION is any other symbol, it is ignored. ;;;*** -;;;### (autoloads nil "pulse" "cedet/pulse.el" (21291 53104 431149 +;;;### (autoloads nil "pulse" "cedet/pulse.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from cedet/pulse.el (push (purecopy '(pulse 1 0)) package--builtin-versions) ;;;*** -;;;### (autoloads nil "python" "progmodes/python.el" (21313 59928 -;;;;;; 109370 0)) +;;;### (autoloads nil "python" "progmodes/python.el" (21314 35128 +;;;;;; 127485 0)) ;;; Generated autoloads from progmodes/python.el (push (purecopy '(python 0 24 2)) package--builtin-versions) @@ -21887,7 +21872,7 @@ Major mode for editing Python files. ;;;*** -;;;### (autoloads nil "qp" "gnus/qp.el" (21291 53104 431149 0)) +;;;### (autoloads nil "qp" "gnus/qp.el" (21291 9464 291241 0)) ;;; Generated autoloads from gnus/qp.el (autoload 'quoted-printable-decode-region "qp" "\ @@ -21906,8 +21891,8 @@ them into characters should be done separately. ;;;*** -;;;### (autoloads nil "quail" "international/quail.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "quail" "international/quail.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from international/quail.el (autoload 'quail-title "quail" "\ @@ -22138,7 +22123,7 @@ of each directory. ;;;*** ;;;### (autoloads nil "quail/hangul" "leim/quail/hangul.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from leim/quail/hangul.el (autoload 'hangul-input-method-activate "quail/hangul" "\ @@ -22151,7 +22136,7 @@ HELP-TEXT is a text set in `hangul-input-method-help-text'. ;;;*** ;;;### (autoloads nil "quail/uni-input" "leim/quail/uni-input.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from leim/quail/uni-input.el (autoload 'ucs-input-activate "quail/uni-input" "\ @@ -22165,7 +22150,7 @@ While this input method is active, the variable ;;;*** -;;;### (autoloads nil "quickurl" "net/quickurl.el" (21291 53104 431149 +;;;### (autoloads nil "quickurl" "net/quickurl.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from net/quickurl.el @@ -22237,8 +22222,7 @@ Display `quickurl-list' as a formatted list using `quickurl-list-mode'. ;;;*** -;;;### (autoloads nil "rcirc" "net/rcirc.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "rcirc" "net/rcirc.el" (21291 9464 291241 0)) ;;; Generated autoloads from net/rcirc.el (autoload 'rcirc "rcirc" "\ @@ -22277,7 +22261,7 @@ if ARG is omitted or nil. ;;;*** ;;;### (autoloads nil "re-builder" "emacs-lisp/re-builder.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/re-builder.el (defalias 'regexp-builder 're-builder) @@ -22295,8 +22279,7 @@ matching parts of the target buffer will be highlighted. ;;;*** -;;;### (autoloads nil "recentf" "recentf.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "recentf" "recentf.el" (21291 9464 291241 0)) ;;; Generated autoloads from recentf.el (defvar recentf-mode nil "\ @@ -22322,7 +22305,7 @@ were operated on recently. ;;;*** -;;;### (autoloads nil "rect" "rect.el" (21291 53104 431149 0)) +;;;### (autoloads nil "rect" "rect.el" (21291 9464 291241 0)) ;;; Generated autoloads from rect.el (autoload 'delete-rectangle "rect" "\ @@ -22462,8 +22445,8 @@ Activates the region if needed. Only lasts until the region is deactivated. ;;;*** -;;;### (autoloads nil "refill" "textmodes/refill.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "refill" "textmodes/refill.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/refill.el (autoload 'refill-mode "refill" "\ @@ -22483,8 +22466,8 @@ For true \"word wrap\" behavior, use `visual-line-mode' instead. ;;;*** -;;;### (autoloads nil "reftex" "textmodes/reftex.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "reftex" "textmodes/reftex.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/reftex.el (autoload 'turn-on-reftex "reftex" "\ @@ -22534,7 +22517,7 @@ This enforces rescanning the buffer on next use. ;;;*** ;;;### (autoloads nil "reftex-cite" "textmodes/reftex-cite.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from textmodes/reftex-cite.el (autoload 'reftex-citation "reftex-cite" "\ @@ -22564,7 +22547,7 @@ While entering the regexp, completion on knows citation keys is possible. ;;;*** ;;;### (autoloads nil "reftex-global" "textmodes/reftex-global.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from textmodes/reftex-global.el (autoload 'reftex-isearch-minor-mode "reftex-global" "\ @@ -22581,7 +22564,7 @@ With no argument, this command toggles ;;;*** ;;;### (autoloads nil "reftex-index" "textmodes/reftex-index.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from textmodes/reftex-index.el (autoload 'reftex-index-phrases-mode "reftex-index" "\ @@ -22614,7 +22597,7 @@ Here are all local bindings. ;;;*** ;;;### (autoloads nil "reftex-parse" "textmodes/reftex-parse.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from textmodes/reftex-parse.el (autoload 'reftex-all-document-files "reftex-parse" "\ @@ -22627,7 +22610,7 @@ of master file. ;;;*** ;;;### (autoloads nil "reftex-vars" "textmodes/reftex-vars.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from textmodes/reftex-vars.el (put 'reftex-vref-is-default 'safe-local-variable (lambda (x) (or (stringp x) (symbolp x)))) (put 'reftex-fref-is-default 'safe-local-variable (lambda (x) (or (stringp x) (symbolp x)))) @@ -22637,7 +22620,7 @@ of master file. ;;;*** ;;;### (autoloads nil "regexp-opt" "emacs-lisp/regexp-opt.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/regexp-opt.el (autoload 'regexp-opt "regexp-opt" "\ @@ -22666,15 +22649,15 @@ This means the number of non-shy regexp grouping constructs ;;;*** -;;;### (autoloads nil "regi" "emacs-lisp/regi.el" (21291 53104 431149 +;;;### (autoloads nil "regi" "emacs-lisp/regi.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/regi.el (push (purecopy '(regi 1 8)) package--builtin-versions) ;;;*** -;;;### (autoloads nil "remember" "textmodes/remember.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "remember" "textmodes/remember.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/remember.el (push (purecopy '(remember 2 0)) package--builtin-versions) @@ -22728,7 +22711,7 @@ to turn the *scratch* buffer into your notes buffer. ;;;*** -;;;### (autoloads nil "repeat" "repeat.el" (21291 53104 431149 0)) +;;;### (autoloads nil "repeat" "repeat.el" (21291 9464 291241 0)) ;;; Generated autoloads from repeat.el (push (purecopy '(repeat 0 51)) package--builtin-versions) @@ -22751,8 +22734,8 @@ recently executed command not bound to an input event\". ;;;*** -;;;### (autoloads nil "reporter" "mail/reporter.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "reporter" "mail/reporter.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from mail/reporter.el (autoload 'reporter-submit-bug-report "reporter" "\ @@ -22783,7 +22766,7 @@ mail-sending package is used for editing and sending the message. ;;;*** -;;;### (autoloads nil "reposition" "reposition.el" (21291 53104 431149 +;;;### (autoloads nil "reposition" "reposition.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from reposition.el @@ -22810,7 +22793,7 @@ first comment line visible (if point is in a comment). ;;;*** -;;;### (autoloads nil "reveal" "reveal.el" (21291 53104 431149 0)) +;;;### (autoloads nil "reveal" "reveal.el" (21291 9464 291241 0)) ;;; Generated autoloads from reveal.el (autoload 'reveal-mode "reveal" "\ @@ -22845,7 +22828,7 @@ the mode if ARG is omitted or nil. ;;;*** -;;;### (autoloads nil "ring" "emacs-lisp/ring.el" (21291 53104 431149 +;;;### (autoloads nil "ring" "emacs-lisp/ring.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/ring.el @@ -22861,7 +22844,7 @@ Make a ring that can contain SIZE elements. ;;;*** -;;;### (autoloads nil "rlogin" "net/rlogin.el" (21291 53104 431149 +;;;### (autoloads nil "rlogin" "net/rlogin.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from net/rlogin.el @@ -22906,8 +22889,8 @@ variable. ;;;*** -;;;### (autoloads nil "rmail" "mail/rmail.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "rmail" "mail/rmail.el" (21343 51827 910137 +;;;;;; 754000)) ;;; Generated autoloads from mail/rmail.el (defvar rmail-file-name (purecopy "~/RMAIL") "\ @@ -23104,8 +23087,8 @@ Set PASSWORD to be used for retrieving mail from a POP or IMAP server. ;;;*** -;;;### (autoloads nil "rmailout" "mail/rmailout.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "rmailout" "mail/rmailout.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from mail/rmailout.el (put 'rmail-output-file-alist 'risky-local-variable t) @@ -23169,8 +23152,8 @@ than appending to it. Deletes the message after writing if ;;;*** -;;;### (autoloads nil "rng-cmpct" "nxml/rng-cmpct.el" (21319 19378 -;;;;;; 69506 0)) +;;;### (autoloads nil "rng-cmpct" "nxml/rng-cmpct.el" (21319 15673 +;;;;;; 174 0)) ;;; Generated autoloads from nxml/rng-cmpct.el (autoload 'rng-c-load-schema "rng-cmpct" "\ @@ -23181,8 +23164,8 @@ Return a pattern. ;;;*** -;;;### (autoloads nil "rng-nxml" "nxml/rng-nxml.el" (21291 57968 -;;;;;; 317602 643000)) +;;;### (autoloads nil "rng-nxml" "nxml/rng-nxml.el" (21292 8122 451256 +;;;;;; 0)) ;;; Generated autoloads from nxml/rng-nxml.el (autoload 'rng-nxml-mode-init "rng-nxml" "\ @@ -23194,8 +23177,8 @@ Validation will be enabled if `rng-nxml-auto-validate-flag' is non-nil. ;;;*** -;;;### (autoloads nil "rng-valid" "nxml/rng-valid.el" (21291 57968 -;;;;;; 317602 643000)) +;;;### (autoloads nil "rng-valid" "nxml/rng-valid.el" (21292 8122 +;;;;;; 451256 0)) ;;; Generated autoloads from nxml/rng-valid.el (autoload 'rng-validate-mode "rng-valid" "\ @@ -23225,8 +23208,8 @@ to use for finding the schema. ;;;*** -;;;### (autoloads nil "rng-xsd" "nxml/rng-xsd.el" (21291 57968 317602 -;;;;;; 643000)) +;;;### (autoloads nil "rng-xsd" "nxml/rng-xsd.el" (21292 8122 451256 +;;;;;; 0)) ;;; Generated autoloads from nxml/rng-xsd.el (put 'http://www\.w3\.org/2001/XMLSchema-datatypes 'rng-dt-compile 'rng-xsd-compile) @@ -23253,8 +23236,8 @@ must be equal. ;;;*** -;;;### (autoloads nil "robin" "international/robin.el" (20627 28607 -;;;;;; 829638 0)) +;;;### (autoloads nil "robin" "international/robin.el" (20627 10158 +;;;;;; 364804 0)) ;;; Generated autoloads from international/robin.el (autoload 'robin-define-package "robin" "\ @@ -23286,7 +23269,7 @@ Start using robin package NAME, which is a string. ;;;*** -;;;### (autoloads nil "rot13" "rot13.el" (21291 53104 431149 0)) +;;;### (autoloads nil "rot13" "rot13.el" (21291 9464 291241 0)) ;;; Generated autoloads from rot13.el (autoload 'rot13 "rot13" "\ @@ -23323,7 +23306,7 @@ Toggle the use of ROT13 encoding for the current window. ;;;*** -;;;### (autoloads nil "rst" "textmodes/rst.el" (21291 53104 431149 +;;;### (autoloads nil "rst" "textmodes/rst.el" (21343 35388 793281 ;;;;;; 0)) ;;; Generated autoloads from textmodes/rst.el (add-to-list 'auto-mode-alist (purecopy '("\\.re?st\\'" . rst-mode))) @@ -23355,7 +23338,7 @@ for modes derived from Text mode, like Mail mode. ;;;*** ;;;### (autoloads nil "ruby-mode" "progmodes/ruby-mode.el" (21316 -;;;;;; 47425 538878 0)) +;;;;;; 41565 831567 0)) ;;; Generated autoloads from progmodes/ruby-mode.el (push (purecopy '(ruby-mode 1 2)) package--builtin-versions) @@ -23372,7 +23355,7 @@ Major mode for editing Ruby code. ;;;*** -;;;### (autoloads nil "ruler-mode" "ruler-mode.el" (21291 53104 431149 +;;;### (autoloads nil "ruler-mode" "ruler-mode.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from ruler-mode.el (push (purecopy '(ruler-mode 1 6)) package--builtin-versions) @@ -23391,7 +23374,7 @@ if ARG is omitted or nil. ;;;*** -;;;### (autoloads nil "rx" "emacs-lisp/rx.el" (21291 53104 431149 +;;;### (autoloads nil "rx" "emacs-lisp/rx.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/rx.el @@ -23703,14 +23686,14 @@ enclosed in `(and ...)'. ;;;*** -;;;### (autoloads nil "sasl-ntlm" "net/sasl-ntlm.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "sasl-ntlm" "net/sasl-ntlm.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from net/sasl-ntlm.el (push (purecopy '(sasl 1 0)) package--builtin-versions) ;;;*** -;;;### (autoloads nil "savehist" "savehist.el" (21291 53104 431149 +;;;### (autoloads nil "savehist" "savehist.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from savehist.el (push (purecopy '(savehist 24)) package--builtin-versions) @@ -23743,8 +23726,8 @@ histories, which is probably undesirable. ;;;*** -;;;### (autoloads nil "scheme" "progmodes/scheme.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "scheme" "progmodes/scheme.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/scheme.el (autoload 'scheme-mode "scheme" "\ @@ -23783,8 +23766,8 @@ that variable's value is a string. ;;;*** -;;;### (autoloads nil "score-mode" "gnus/score-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "score-mode" "gnus/score-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/score-mode.el (autoload 'gnus-score-mode "score-mode" "\ @@ -23797,7 +23780,7 @@ This mode is an extended emacs-lisp mode. ;;;*** -;;;### (autoloads nil "scroll-all" "scroll-all.el" (21291 53104 431149 +;;;### (autoloads nil "scroll-all" "scroll-all.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from scroll-all.el @@ -23823,8 +23806,8 @@ one window apply to all visible windows in the same frame. ;;;*** -;;;### (autoloads nil "scroll-lock" "scroll-lock.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "scroll-lock" "scroll-lock.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from scroll-lock.el (autoload 'scroll-lock-mode "scroll-lock" "\ @@ -23840,7 +23823,7 @@ vertically fixed relative to window boundaries during scrolling. ;;;*** -;;;### (autoloads nil "secrets" "net/secrets.el" (21291 53104 431149 +;;;### (autoloads nil "secrets" "net/secrets.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from net/secrets.el (when (featurep 'dbusbind) @@ -23848,8 +23831,8 @@ vertically fixed relative to window boundaries during scrolling. ;;;*** -;;;### (autoloads nil "semantic" "cedet/semantic.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "semantic" "cedet/semantic.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from cedet/semantic.el (push (purecopy '(semantic 2 2)) package--builtin-versions) @@ -23907,7 +23890,7 @@ Semantic mode. ;;;*** ;;;### (autoloads nil "semantic/bovine/grammar" "cedet/semantic/bovine/grammar.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from cedet/semantic/bovine/grammar.el (autoload 'bovine-grammar-mode "semantic/bovine/grammar" "\ @@ -23918,7 +23901,7 @@ Major mode for editing Bovine grammars. ;;;*** ;;;### (autoloads nil "semantic/wisent/grammar" "cedet/semantic/wisent/grammar.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from cedet/semantic/wisent/grammar.el (autoload 'wisent-grammar-mode "semantic/wisent/grammar" "\ @@ -23928,8 +23911,8 @@ Major mode for editing Wisent grammars. ;;;*** -;;;### (autoloads nil "sendmail" "mail/sendmail.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "sendmail" "mail/sendmail.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from mail/sendmail.el (defvar mail-from-style 'default "\ @@ -24210,7 +24193,7 @@ Like `mail' command, but display mail buffer in another frame. ;;;*** -;;;### (autoloads nil "server" "server.el" (21291 53104 431149 0)) +;;;### (autoloads nil "server" "server.el" (21292 8122 451256 0)) ;;; Generated autoloads from server.el (put 'server-host 'risky-local-variable t) @@ -24277,7 +24260,7 @@ only these files will be asked to be saved. ;;;*** -;;;### (autoloads nil "ses" "ses.el" (21291 53104 431149 0)) +;;;### (autoloads nil "ses" "ses.el" (21291 9464 291241 0)) ;;; Generated autoloads from ses.el (autoload 'ses-mode "ses" "\ @@ -24322,7 +24305,7 @@ formula: ;;;*** ;;;### (autoloads nil "sgml-mode" "textmodes/sgml-mode.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from textmodes/sgml-mode.el (autoload 'sgml-mode "sgml-mode" "\ @@ -24387,8 +24370,8 @@ To work around that, do: ;;;*** -;;;### (autoloads nil "sh-script" "progmodes/sh-script.el" (21291 -;;;;;; 53104 431149 0)) +;;;### (autoloads nil "sh-script" "progmodes/sh-script.el" (21331 +;;;;;; 44214 797573 0)) ;;; Generated autoloads from progmodes/sh-script.el (push (purecopy '(sh-script 2 0 6)) package--builtin-versions) (put 'sh-shell 'safe-local-variable 'symbolp) @@ -24452,8 +24435,8 @@ with your script for an edit-interpret-debug cycle. ;;;*** -;;;### (autoloads nil "shadow" "emacs-lisp/shadow.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "shadow" "emacs-lisp/shadow.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emacs-lisp/shadow.el (autoload 'list-load-path-shadows "shadow" "\ @@ -24502,7 +24485,7 @@ function, `load-path-shadows-find'. ;;;*** -;;;### (autoloads nil "shadowfile" "shadowfile.el" (21291 53104 431149 +;;;### (autoloads nil "shadowfile" "shadowfile.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from shadowfile.el @@ -24541,7 +24524,7 @@ Set up file shadowing. ;;;*** -;;;### (autoloads nil "shell" "shell.el" (21313 65162 603703 543000)) +;;;### (autoloads nil "shell" "shell.el" (21314 35128 127485 0)) ;;; Generated autoloads from shell.el (defvar shell-dumb-shell-regexp (purecopy "cmd\\(proxy\\)?\\.exe") "\ @@ -24589,7 +24572,7 @@ Otherwise, one argument `-i' is passed to the shell. ;;;*** -;;;### (autoloads nil "shr" "net/shr.el" (21291 53104 431149 0)) +;;;### (autoloads nil "shr" "net/shr.el" (21325 5431 348093 0)) ;;; Generated autoloads from net/shr.el (autoload 'shr-render-region "shr" "\ @@ -24606,7 +24589,7 @@ DOM should be a parse tree as generated by ;;;*** -;;;### (autoloads nil "sieve" "gnus/sieve.el" (21291 53104 431149 +;;;### (autoloads nil "sieve" "gnus/sieve.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from gnus/sieve.el @@ -24632,8 +24615,8 @@ DOM should be a parse tree as generated by ;;;*** -;;;### (autoloads nil "sieve-mode" "gnus/sieve-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "sieve-mode" "gnus/sieve-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from gnus/sieve-mode.el (autoload 'sieve-mode "sieve-mode" "\ @@ -24648,8 +24631,8 @@ Turning on Sieve mode runs `sieve-mode-hook'. ;;;*** -;;;### (autoloads nil "simula" "progmodes/simula.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "simula" "progmodes/simula.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/simula.el (autoload 'simula-mode "simula" "\ @@ -24697,7 +24680,7 @@ with no arguments, if that value is non-nil. ;;;*** -;;;### (autoloads nil "skeleton" "skeleton.el" (21291 53104 431149 +;;;### (autoloads nil "skeleton" "skeleton.el" (21292 8122 451256 ;;;;;; 0)) ;;; Generated autoloads from skeleton.el @@ -24809,8 +24792,8 @@ symmetrical ones, and the same character twice for the others. ;;;*** -;;;### (autoloads nil "smerge-mode" "vc/smerge-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "smerge-mode" "vc/smerge-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from vc/smerge-mode.el (autoload 'smerge-ediff "smerge-mode" "\ @@ -24837,7 +24820,7 @@ If no conflict maker is found, turn off `smerge-mode'. ;;;*** -;;;### (autoloads nil "smiley" "gnus/smiley.el" (21291 53104 431149 +;;;### (autoloads nil "smiley" "gnus/smiley.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from gnus/smiley.el @@ -24855,8 +24838,8 @@ interactively. If there's no argument, do it at the current buffer. ;;;*** -;;;### (autoloads nil "smtpmail" "mail/smtpmail.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "smtpmail" "mail/smtpmail.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from mail/smtpmail.el (autoload 'smtpmail-send-it "smtpmail" "\ @@ -24871,7 +24854,7 @@ Send mail that was queued as a result of setting `smtpmail-queue-mail'. ;;;*** -;;;### (autoloads nil "snake" "play/snake.el" (21291 53104 431149 +;;;### (autoloads nil "snake" "play/snake.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/snake.el @@ -24895,8 +24878,8 @@ Snake mode keybindings: ;;;*** -;;;### (autoloads nil "snmp-mode" "net/snmp-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "snmp-mode" "net/snmp-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from net/snmp-mode.el (autoload 'snmp-mode "snmp-mode" "\ @@ -24925,7 +24908,7 @@ then `snmpv2-mode-hook'. ;;;*** -;;;### (autoloads nil "solar" "calendar/solar.el" (21291 53104 431149 +;;;### (autoloads nil "solar" "calendar/solar.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from calendar/solar.el @@ -24941,8 +24924,8 @@ This function is suitable for execution in an init file. ;;;*** -;;;### (autoloads nil "solitaire" "play/solitaire.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "solitaire" "play/solitaire.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from play/solitaire.el (autoload 'solitaire "solitaire" "\ @@ -25017,7 +25000,7 @@ Pick your favorite shortcuts: ;;;*** -;;;### (autoloads nil "sort" "sort.el" (21291 53104 431149 0)) +;;;### (autoloads nil "sort" "sort.el" (21291 9464 291241 0)) ;;; Generated autoloads from sort.el (put 'sort-fold-case 'safe-local-variable 'booleanp) @@ -25192,7 +25175,7 @@ is non-nil, it also prints a message describing the number of deletions. ;;;*** -;;;### (autoloads nil "spam" "gnus/spam.el" (21291 53104 431149 0)) +;;;### (autoloads nil "spam" "gnus/spam.el" (21291 9464 291241 0)) ;;; Generated autoloads from gnus/spam.el (autoload 'spam-initialize "spam" "\ @@ -25207,7 +25190,7 @@ installed through `spam-necessary-extra-headers'. ;;;*** ;;;### (autoloads nil "spam-report" "gnus/spam-report.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from gnus/spam-report.el (autoload 'spam-report-process-queue "spam-report" "\ @@ -25249,7 +25232,7 @@ Spam reports will be queued with the method used when ;;;*** -;;;### (autoloads nil "speedbar" "speedbar.el" (21291 53104 431149 +;;;### (autoloads nil "speedbar" "speedbar.el" (21334 20411 906208 ;;;;;; 0)) ;;; Generated autoloads from speedbar.el @@ -25274,7 +25257,7 @@ selected. If the speedbar frame is active, then select the attached frame. ;;;*** -;;;### (autoloads nil "spook" "play/spook.el" (21291 53104 431149 +;;;### (autoloads nil "spook" "play/spook.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/spook.el @@ -25290,7 +25273,7 @@ Return a vector containing the lines from `spook-phrases-file'. ;;;*** -;;;### (autoloads nil "sql" "progmodes/sql.el" (21291 53104 431149 +;;;### (autoloads nil "sql" "progmodes/sql.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from progmodes/sql.el (push (purecopy '(sql 3 4)) package--builtin-versions) @@ -25752,7 +25735,7 @@ buffer. ;;;*** -;;;### (autoloads nil "srecode" "cedet/srecode.el" (21291 53104 431149 +;;;### (autoloads nil "srecode" "cedet/srecode.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from cedet/srecode.el (push (purecopy '(srecode 1 2)) package--builtin-versions) @@ -25760,7 +25743,7 @@ buffer. ;;;*** ;;;### (autoloads nil "srecode/srt-mode" "cedet/srecode/srt-mode.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from cedet/srecode/srt-mode.el (autoload 'srecode-template-mode "srecode/srt-mode" "\ @@ -25772,8 +25755,8 @@ Major-mode for writing SRecode macros. ;;;*** -;;;### (autoloads nil "starttls" "gnus/starttls.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "starttls" "gnus/starttls.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from gnus/starttls.el (autoload 'starttls-open-stream "starttls" "\ @@ -25796,8 +25779,7 @@ GnuTLS requires a port number. ;;;*** -;;;### (autoloads nil "strokes" "strokes.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "strokes" "strokes.el" (21291 9464 291241 0)) ;;; Generated autoloads from strokes.el (autoload 'strokes-global-set-stroke "strokes" "\ @@ -25910,7 +25892,7 @@ Read a complex stroke and insert its glyph into the current buffer. ;;;*** -;;;### (autoloads nil "studly" "play/studly.el" (21291 53104 431149 +;;;### (autoloads nil "studly" "play/studly.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/studly.el @@ -25931,8 +25913,8 @@ Studlify-case the current buffer. ;;;*** -;;;### (autoloads nil "subword" "progmodes/subword.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "subword" "progmodes/subword.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from progmodes/subword.el (autoload 'subword-mode "subword" "\ @@ -26026,8 +26008,8 @@ See `superword-mode' for more information on Superword mode. ;;;*** -;;;### (autoloads nil "supercite" "mail/supercite.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "supercite" "mail/supercite.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from mail/supercite.el (autoload 'sc-cite-original "supercite" "\ @@ -26059,8 +26041,7 @@ and `sc-post-hook' is run after the guts of this function. ;;;*** -;;;### (autoloads nil "t-mouse" "t-mouse.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "t-mouse" "t-mouse.el" (21291 9464 291241 0)) ;;; Generated autoloads from t-mouse.el (define-obsolete-function-alias 't-mouse-mode 'gpm-mouse-mode "23.1") @@ -26088,7 +26069,7 @@ It relies on the `gpm' daemon being activated. ;;;*** -;;;### (autoloads nil "tabify" "tabify.el" (21291 53104 431149 0)) +;;;### (autoloads nil "tabify" "tabify.el" (21291 9464 291241 0)) ;;; Generated autoloads from tabify.el (autoload 'untabify "tabify" "\ @@ -26117,7 +26098,7 @@ The variable `tab-width' controls the spacing of tab stops. ;;;*** -;;;### (autoloads nil "table" "textmodes/table.el" (21291 53104 431149 +;;;### (autoloads nil "table" "textmodes/table.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from textmodes/table.el @@ -26710,7 +26691,7 @@ converts a table into plain text without frames. It is a companion to ;;;*** -;;;### (autoloads nil "talk" "talk.el" (21291 53104 431149 0)) +;;;### (autoloads nil "talk" "talk.el" (21291 9464 291241 0)) ;;; Generated autoloads from talk.el (autoload 'talk-connect "talk" "\ @@ -26725,7 +26706,7 @@ Connect to the Emacs talk group from the current X display or tty frame. ;;;*** -;;;### (autoloads nil "tar-mode" "tar-mode.el" (21291 53104 431149 +;;;### (autoloads nil "tar-mode" "tar-mode.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from tar-mode.el @@ -26749,7 +26730,7 @@ See also: variables `tar-update-datestamp' and `tar-anal-blocksize'. ;;;*** -;;;### (autoloads nil "tcl" "progmodes/tcl.el" (21291 53104 431149 +;;;### (autoloads nil "tcl" "progmodes/tcl.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from progmodes/tcl.el @@ -26798,7 +26779,7 @@ Prefix argument means invert sense of `tcl-use-smart-word-finder'. ;;;*** -;;;### (autoloads nil "telnet" "net/telnet.el" (21291 53104 431149 +;;;### (autoloads nil "telnet" "net/telnet.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from net/telnet.el @@ -26824,7 +26805,7 @@ Normally input is edited in Emacs and sent a line at a time. ;;;*** -;;;### (autoloads nil "term" "term.el" (21291 53104 431149 0)) +;;;### (autoloads nil "term" "term.el" (21335 41274 440541 0)) ;;; Generated autoloads from term.el (autoload 'make-term "term" "\ @@ -26867,7 +26848,7 @@ use in that buffer. ;;;*** ;;;### (autoloads nil "testcover" "emacs-lisp/testcover.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/testcover.el (autoload 'testcover-this-defun "testcover" "\ @@ -26877,7 +26858,7 @@ Start coverage on function under point. ;;;*** -;;;### (autoloads nil "tetris" "play/tetris.el" (21291 53104 431149 +;;;### (autoloads nil "tetris" "play/tetris.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from play/tetris.el (push (purecopy '(tetris 2 1)) package--builtin-versions) @@ -26903,8 +26884,8 @@ tetris-mode keybindings: ;;;*** -;;;### (autoloads nil "tex-mode" "textmodes/tex-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "tex-mode" "textmodes/tex-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/tex-mode.el (defvar tex-shell-file-name nil "\ @@ -27205,8 +27186,8 @@ Major mode to edit DocTeX files. ;;;*** -;;;### (autoloads nil "texinfmt" "textmodes/texinfmt.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "texinfmt" "textmodes/texinfmt.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/texinfmt.el (autoload 'texinfo-format-buffer "texinfmt" "\ @@ -27245,8 +27226,8 @@ if large. You can use `Info-split' to do this manually. ;;;*** -;;;### (autoloads nil "texinfo" "textmodes/texinfo.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "texinfo" "textmodes/texinfo.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/texinfo.el (defvar texinfo-open-quote (purecopy "``") "\ @@ -27331,7 +27312,7 @@ value of `texinfo-mode-hook'. ;;;*** ;;;### (autoloads nil "thai-util" "language/thai-util.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from language/thai-util.el (autoload 'thai-compose-region "thai-util" "\ @@ -27358,7 +27339,7 @@ Compose Thai characters in the current buffer. ;;;*** -;;;### (autoloads nil "thingatpt" "thingatpt.el" (21291 53104 431149 +;;;### (autoloads nil "thingatpt" "thingatpt.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from thingatpt.el @@ -27423,7 +27404,7 @@ Return the Lisp list at point, or nil if none is found. ;;;*** -;;;### (autoloads nil "thumbs" "thumbs.el" (21291 53104 431149 0)) +;;;### (autoloads nil "thumbs" "thumbs.el" (21291 9464 291241 0)) ;;; Generated autoloads from thumbs.el (autoload 'thumbs-find-thumb "thumbs" "\ @@ -27458,7 +27439,7 @@ In dired, call the setroot program on the image at point. ;;;*** ;;;### (autoloads nil "tibet-util" "language/tibet-util.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from language/tibet-util.el (autoload 'tibetan-char-p "tibet-util" "\ @@ -27531,8 +27512,8 @@ See also docstring of the function tibetan-compose-region. ;;;*** -;;;### (autoloads nil "tildify" "textmodes/tildify.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "tildify" "textmodes/tildify.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from textmodes/tildify.el (push (purecopy '(tildify 4 5)) package--builtin-versions) @@ -27556,7 +27537,7 @@ This function performs no refilling of the changed text. ;;;*** -;;;### (autoloads nil "time" "time.el" (21291 53104 431149 0)) +;;;### (autoloads nil "time" "time.el" (21291 9464 291241 0)) ;;; Generated autoloads from time.el (defvar display-time-day-and-date nil "\ @@ -27619,7 +27600,7 @@ Return a string giving the duration of the Emacs initialization. ;;;*** ;;;### (autoloads nil "time-date" "calendar/time-date.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from calendar/time-date.el (autoload 'date-to-time "time-date" "\ @@ -27730,7 +27711,7 @@ This function does not work for SECONDS greater than `most-positive-fixnum'. ;;;*** -;;;### (autoloads nil "time-stamp" "time-stamp.el" (21291 53104 431149 +;;;### (autoloads nil "time-stamp" "time-stamp.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from time-stamp.el (put 'time-stamp-format 'safe-local-variable 'stringp) @@ -27772,7 +27753,7 @@ With ARG, turn time stamping on if and only if arg is positive. ;;;*** ;;;### (autoloads nil "timeclock" "calendar/timeclock.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from calendar/timeclock.el (push (purecopy '(timeclock 2 6 1)) package--builtin-versions) @@ -27882,7 +27863,7 @@ relative only to the time worked today, and not to past time. ;;;*** ;;;### (autoloads nil "titdic-cnv" "international/titdic-cnv.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from international/titdic-cnv.el (autoload 'titdic-convert "titdic-cnv" "\ @@ -27904,7 +27885,7 @@ To get complete usage, invoke \"emacs -batch -f batch-titdic-convert -h\". ;;;*** -;;;### (autoloads nil "tmm" "tmm.el" (21291 53104 431149 0)) +;;;### (autoloads nil "tmm" "tmm.el" (21291 9464 291241 0)) ;;; Generated autoloads from tmm.el (define-key global-map "\M-`" 'tmm-menubar) (define-key global-map [menu-bar mouse-1] 'tmm-menubar-mouse) @@ -27947,7 +27928,7 @@ Its value should be an event that has a binding in MENU. ;;;*** ;;;### (autoloads nil "todo-mode" "calendar/todo-mode.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from calendar/todo-mode.el (autoload 'todo-show "todo-mode" "\ @@ -28020,7 +28001,7 @@ Mode for displaying and reprioritizing top priority Todo. ;;;*** -;;;### (autoloads nil "tool-bar" "tool-bar.el" (21291 53104 431149 +;;;### (autoloads nil "tool-bar" "tool-bar.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from tool-bar.el @@ -28091,8 +28072,8 @@ holds a keymap. ;;;*** -;;;### (autoloads nil "tpu-edt" "emulation/tpu-edt.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "tpu-edt" "emulation/tpu-edt.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emulation/tpu-edt.el (push (purecopy '(tpu-edt 4 5)) package--builtin-versions) @@ -28123,7 +28104,7 @@ Turn on TPU/edt emulation. ;;;*** ;;;### (autoloads nil "tpu-mapper" "emulation/tpu-mapper.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emulation/tpu-mapper.el (autoload 'tpu-mapper "tpu-mapper" "\ @@ -28157,7 +28138,7 @@ your local X guru can try to figure out why the key is being ignored. ;;;*** -;;;### (autoloads nil "tq" "emacs-lisp/tq.el" (21291 53104 431149 +;;;### (autoloads nil "tq" "emacs-lisp/tq.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/tq.el @@ -28171,8 +28152,8 @@ to a tcp server on another machine. ;;;*** -;;;### (autoloads nil "trace" "emacs-lisp/trace.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "trace" "emacs-lisp/trace.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from emacs-lisp/trace.el (defvar trace-buffer "*trace-output*" "\ @@ -28217,7 +28198,8 @@ the output buffer or changing the window configuration. ;;;*** -;;;### (autoloads nil "tramp" "net/tramp.el" (21319 19378 69506 0)) +;;;### (autoloads nil "tramp" "net/tramp.el" (21330 23349 756053 +;;;;;; 0)) ;;; Generated autoloads from net/tramp.el (defvar tramp-mode t "\ @@ -28293,30 +28275,22 @@ Used for file names matching `tramp-file-name-regexp'. Operations not mentioned here will be handled by Tramp's file name handler functions, or the normal Emacs functions.") -(defun tramp-run-real-handler (operation args) "\ -Invoke normal file name handler for OPERATION. -First arg specifies the OPERATION, second arg is a list of arguments to -pass to the OPERATION." (let* ((inhibit-file-name-handlers (\` (tramp-file-name-handler tramp-vc-file-name-handler tramp-completion-file-name-handler cygwin-mount-name-hook-function cygwin-mount-map-drive-hook-function \, (and (eq inhibit-file-name-operation operation) inhibit-file-name-handlers)))) (inhibit-file-name-operation operation)) (apply operation args))) - (defun tramp-completion-run-real-handler (operation args) "\ Invoke `tramp-file-name-handler' for OPERATION. First arg specifies the OPERATION, second arg is a list of arguments to pass to the OPERATION." (let* ((inhibit-file-name-handlers (\` (tramp-completion-file-name-handler cygwin-mount-name-hook-function cygwin-mount-map-drive-hook-function \, (and (eq inhibit-file-name-operation operation) inhibit-file-name-handlers)))) (inhibit-file-name-operation operation)) (apply operation args))) -(autoload 'tramp-file-name-handler "tramp" "\ -Invoke Tramp file name handler. -Falls back to normal file name handler if no Tramp file name handler exists. - -\(fn OPERATION &rest ARGS)" nil nil) - (defun tramp-completion-file-name-handler (operation &rest args) "\ Invoke Tramp file name completion handler. -Falls back to normal file name handler if no Tramp file name handler exists." (let ((directory-sep-char 47) (default-directory (if load-in-progress temporary-file-directory default-directory)) (fn (assoc operation tramp-completion-file-name-handler-alist))) (if (and fn tramp-mode (or (eq tramp-syntax (quote sep)) (featurep (quote tramp)) (and (boundp (quote partial-completion-mode)) (symbol-value (quote partial-completion-mode))) (featurep (quote ido)) (featurep (quote icicles)))) (save-match-data (apply (cdr fn) args)) (tramp-completion-run-real-handler operation args)))) +Falls back to normal file name handler if no Tramp file name handler exists." (let ((directory-sep-char 47) (fn (assoc operation tramp-completion-file-name-handler-alist))) (if (and fn tramp-mode (or (eq tramp-syntax (quote sep)) (featurep (quote tramp)) (and (boundp (quote partial-completion-mode)) (symbol-value (quote partial-completion-mode))) (featurep (quote ido)) (featurep (quote icicles)))) (save-match-data (apply (cdr fn) args)) (tramp-completion-run-real-handler operation args)))) -(defun tramp-register-file-name-handlers nil "\ -Add Tramp file name handlers to `file-name-handler-alist'." (let ((a1 (rassq (quote tramp-file-name-handler) file-name-handler-alist))) (setq file-name-handler-alist (delq a1 file-name-handler-alist))) (let ((a1 (rassq (quote tramp-completion-file-name-handler) file-name-handler-alist))) (setq file-name-handler-alist (delq a1 file-name-handler-alist))) (add-to-list (quote file-name-handler-alist) (cons tramp-file-name-regexp (quote tramp-file-name-handler))) (put (quote tramp-file-name-handler) (quote safe-magic) t) (add-to-list (quote file-name-handler-alist) (cons tramp-completion-file-name-regexp (quote tramp-completion-file-name-handler))) (put (quote tramp-completion-file-name-handler) (quote safe-magic) t) (dolist (fnh (quote (epa-file-handler jka-compr-handler))) (let ((entry (rassoc fnh file-name-handler-alist))) (when entry (setq file-name-handler-alist (cons entry (delete entry file-name-handler-alist))))))) +(defun tramp-autoload-file-name-handler (operation &rest args) "\ +Load Tramp file name handler, and perform OPERATION." (let ((default-directory temporary-file-directory)) (load "tramp" nil t)) (apply operation args)) -(tramp-register-file-name-handlers) +(defun tramp-register-autoload-file-name-handlers nil "\ +Add Tramp file name handlers to `file-name-handler-alist' during autoload." (add-to-list (quote file-name-handler-alist) (cons tramp-file-name-regexp (quote tramp-autoload-file-name-handler))) (put (quote tramp-autoload-file-name-handler) (quote safe-magic) t) (add-to-list (quote file-name-handler-alist) (cons tramp-completion-file-name-regexp (quote tramp-completion-file-name-handler))) (put (quote tramp-completion-file-name-handler) (quote safe-magic) t)) + +(tramp-register-autoload-file-name-handlers) (autoload 'tramp-unload-file-name-handlers "tramp" "\ @@ -28340,8 +28314,8 @@ Discard Tramp from loading remote files. ;;;*** -;;;### (autoloads nil "tramp-ftp" "net/tramp-ftp.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "tramp-ftp" "net/tramp-ftp.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from net/tramp-ftp.el (autoload 'tramp-ftp-enable-ange-ftp "tramp-ftp" "\ @@ -28351,7 +28325,7 @@ Discard Tramp from loading remote files. ;;;*** -;;;### (autoloads nil "tutorial" "tutorial.el" (21291 53104 431149 +;;;### (autoloads nil "tutorial" "tutorial.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from tutorial.el @@ -28376,8 +28350,8 @@ resumed later. ;;;*** -;;;### (autoloads nil "tv-util" "language/tv-util.el" (20352 35897 -;;;;;; 183049 0)) +;;;### (autoloads nil "tv-util" "language/tv-util.el" (20355 10320 +;;;;;; 526171 0)) ;;; Generated autoloads from language/tv-util.el (autoload 'tai-viet-composition-function "tv-util" "\ @@ -28388,7 +28362,7 @@ resumed later. ;;;*** ;;;### (autoloads nil "two-column" "textmodes/two-column.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from textmodes/two-column.el (autoload '2C-command "two-column" () t 'keymap) (global-set-key "\C-x6" '2C-command) @@ -28435,7 +28409,7 @@ First column's text sSs Second column's text ;;;*** -;;;### (autoloads nil "type-break" "type-break.el" (21291 53104 431149 +;;;### (autoloads nil "type-break" "type-break.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from type-break.el @@ -28568,7 +28542,7 @@ FRAC should be the inverse of the fractional value; for example, a value of ;;;*** -;;;### (autoloads nil "uce" "mail/uce.el" (21291 53104 431149 0)) +;;;### (autoloads nil "uce" "mail/uce.el" (21291 9464 291241 0)) ;;; Generated autoloads from mail/uce.el (autoload 'uce-reply-to-uce "uce" "\ @@ -28582,7 +28556,7 @@ You might need to set `uce-mail-reader' before using this. ;;;*** ;;;### (autoloads nil "ucs-normalize" "international/ucs-normalize.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from international/ucs-normalize.el (autoload 'ucs-normalize-NFD-region "ucs-normalize" "\ @@ -28648,7 +28622,7 @@ Normalize the string STR by the Unicode NFC and Mac OS's HFS Plus. ;;;*** ;;;### (autoloads nil "underline" "textmodes/underline.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from textmodes/underline.el (autoload 'underline-region "underline" "\ @@ -28668,7 +28642,7 @@ which specify the range to operate on. ;;;*** -;;;### (autoloads nil "unrmail" "mail/unrmail.el" (21291 53104 431149 +;;;### (autoloads nil "unrmail" "mail/unrmail.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from mail/unrmail.el @@ -28689,8 +28663,8 @@ The variable `unrmail-mbox-format' controls which mbox format to use. ;;;*** -;;;### (autoloads nil "unsafep" "emacs-lisp/unsafep.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "unsafep" "emacs-lisp/unsafep.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emacs-lisp/unsafep.el (autoload 'unsafep "unsafep" "\ @@ -28702,7 +28676,7 @@ UNSAFEP-VARS is a list of symbols with local bindings. ;;;*** -;;;### (autoloads nil "url" "url/url.el" (21291 53104 431149 0)) +;;;### (autoloads nil "url" "url/url.el" (21291 9464 291241 0)) ;;; Generated autoloads from url/url.el (autoload 'url-retrieve "url" "\ @@ -28749,7 +28723,7 @@ no further processing). URL is either a string or a parsed URL. ;;;*** -;;;### (autoloads nil "url-auth" "url/url-auth.el" (21291 53104 431149 +;;;### (autoloads nil "url-auth" "url/url-auth.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from url/url-auth.el @@ -28791,8 +28765,8 @@ RATING a rating between 1 and 10 of the strength of the authentication. ;;;*** -;;;### (autoloads nil "url-cache" "url/url-cache.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "url-cache" "url/url-cache.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from url/url-cache.el (autoload 'url-store-in-cache "url-cache" "\ @@ -28813,7 +28787,7 @@ Extract FNAM from the local disk cache. ;;;*** -;;;### (autoloads nil "url-cid" "url/url-cid.el" (21291 53104 431149 +;;;### (autoloads nil "url-cid" "url/url-cid.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from url/url-cid.el @@ -28824,7 +28798,7 @@ Extract FNAM from the local disk cache. ;;;*** -;;;### (autoloads nil "url-dav" "url/url-dav.el" (21291 53104 431149 +;;;### (autoloads nil "url-dav" "url/url-dav.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from url/url-dav.el @@ -28859,7 +28833,7 @@ added to this list, so most requests can just pass in nil. ;;;*** -;;;### (autoloads nil "url-file" "url/url-file.el" (21291 53104 431149 +;;;### (autoloads nil "url-file" "url/url-file.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from url/url-file.el @@ -28870,7 +28844,7 @@ Handle file: and ftp: URLs. ;;;*** -;;;### (autoloads nil "url-gw" "url/url-gw.el" (21291 53104 431149 +;;;### (autoloads nil "url-gw" "url/url-gw.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from url/url-gw.el @@ -28890,7 +28864,7 @@ Might do a non-blocking connection; use `process-status' to check. ;;;*** ;;;### (autoloads nil "url-handlers" "url/url-handlers.el" (21300 -;;;;;; 58261 85827 0)) +;;;;;; 2232 181097 0)) ;;; Generated autoloads from url/url-handlers.el (defvar url-handler-mode nil "\ @@ -28944,7 +28918,7 @@ accessible. ;;;*** -;;;### (autoloads nil "url-http" "url/url-http.el" (21291 53104 431149 +;;;### (autoloads nil "url-http" "url/url-http.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from url/url-http.el (autoload 'url-default-expander "url-expand") @@ -28957,7 +28931,7 @@ accessible. ;;;*** -;;;### (autoloads nil "url-irc" "url/url-irc.el" (21291 53104 431149 +;;;### (autoloads nil "url-irc" "url/url-irc.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from url/url-irc.el @@ -28968,7 +28942,7 @@ accessible. ;;;*** -;;;### (autoloads nil "url-ldap" "url/url-ldap.el" (21291 53104 431149 +;;;### (autoloads nil "url-ldap" "url/url-ldap.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from url/url-ldap.el @@ -28982,8 +28956,8 @@ URL can be a URL string, or a URL vector of the type returned by ;;;*** -;;;### (autoloads nil "url-mailto" "url/url-mailto.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "url-mailto" "url/url-mailto.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from url/url-mailto.el (autoload 'url-mail "url-mailto" "\ @@ -28998,7 +28972,7 @@ Handle the mailto: URL syntax. ;;;*** -;;;### (autoloads nil "url-misc" "url/url-misc.el" (21291 53104 431149 +;;;### (autoloads nil "url-misc" "url/url-misc.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from url/url-misc.el @@ -29030,7 +29004,7 @@ Fetch a data URL (RFC 2397). ;;;*** -;;;### (autoloads nil "url-news" "url/url-news.el" (21291 53104 431149 +;;;### (autoloads nil "url-news" "url/url-news.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from url/url-news.el @@ -29046,7 +29020,7 @@ Fetch a data URL (RFC 2397). ;;;*** -;;;### (autoloads nil "url-ns" "url/url-ns.el" (21291 53104 431149 +;;;### (autoloads nil "url-ns" "url/url-ns.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from url/url-ns.el @@ -29087,8 +29061,8 @@ Fetch a data URL (RFC 2397). ;;;*** -;;;### (autoloads nil "url-parse" "url/url-parse.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "url-parse" "url/url-parse.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from url/url-parse.el (autoload 'url-recreate-url "url-parse" "\ @@ -29139,8 +29113,8 @@ parses to ;;;*** -;;;### (autoloads nil "url-privacy" "url/url-privacy.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "url-privacy" "url/url-privacy.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from url/url-privacy.el (autoload 'url-setup-privacy-info "url-privacy" "\ @@ -29150,8 +29124,8 @@ Setup variables that expose info about you and your system. ;;;*** -;;;### (autoloads nil "url-queue" "url/url-queue.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "url-queue" "url/url-queue.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from url/url-queue.el (autoload 'url-queue-retrieve "url-queue" "\ @@ -29165,7 +29139,7 @@ The variable `url-queue-timeout' sets a timeout. ;;;*** -;;;### (autoloads nil "url-util" "url/url-util.el" (21291 53104 431149 +;;;### (autoloads nil "url-util" "url/url-util.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from url/url-util.el @@ -29334,7 +29308,7 @@ This uses `url-current-object', set locally to the buffer. ;;;*** -;;;### (autoloads nil "userlock" "userlock.el" (21291 53104 431149 +;;;### (autoloads nil "userlock" "userlock.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from userlock.el @@ -29363,8 +29337,8 @@ The buffer in question is current when this function is called. ;;;*** -;;;### (autoloads nil "utf-7" "international/utf-7.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "utf-7" "international/utf-7.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from international/utf-7.el (autoload 'utf-7-post-read-conversion "utf-7" "\ @@ -29389,7 +29363,7 @@ The buffer in question is current when this function is called. ;;;*** -;;;### (autoloads nil "utf7" "gnus/utf7.el" (21291 53104 431149 0)) +;;;### (autoloads nil "utf7" "gnus/utf7.el" (21291 9464 291241 0)) ;;; Generated autoloads from gnus/utf7.el (autoload 'utf7-encode "utf7" "\ @@ -29399,8 +29373,8 @@ Encode UTF-7 STRING. Use IMAP modification if FOR-IMAP is non-nil. ;;;*** -;;;### (autoloads nil "uudecode" "mail/uudecode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "uudecode" "mail/uudecode.el" (21291 9464 291241 +;;;;;; 0)) ;;; Generated autoloads from mail/uudecode.el (autoload 'uudecode-decode-region-external "uudecode" "\ @@ -29424,7 +29398,7 @@ If FILE-NAME is non-nil, save the result to FILE-NAME. ;;;*** -;;;### (autoloads nil "vc" "vc/vc.el" (21291 53104 431149 0)) +;;;### (autoloads nil "vc" "vc/vc.el" (21291 9464 291241 0)) ;;; Generated autoloads from vc/vc.el (defvar vc-checkout-hook nil "\ @@ -29705,8 +29679,8 @@ Return the branch part of a revision number REV. ;;;*** -;;;### (autoloads nil "vc-annotate" "vc/vc-annotate.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "vc-annotate" "vc/vc-annotate.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from vc/vc-annotate.el (autoload 'vc-annotate "vc-annotate" "\ @@ -29743,7 +29717,7 @@ mode-specific menu. `vc-annotate-color-map' and ;;;*** -;;;### (autoloads nil "vc-arch" "vc/vc-arch.el" (21291 53104 431149 +;;;### (autoloads nil "vc-arch" "vc/vc-arch.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/vc-arch.el (defun vc-arch-registered (file) @@ -29754,7 +29728,7 @@ mode-specific menu. `vc-annotate-color-map' and ;;;*** -;;;### (autoloads nil "vc-bzr" "vc/vc-bzr.el" (21291 53104 431149 +;;;### (autoloads nil "vc-bzr" "vc/vc-bzr.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/vc-bzr.el @@ -29771,7 +29745,7 @@ Name of the format file in a .bzr directory.") ;;;*** -;;;### (autoloads nil "vc-cvs" "vc/vc-cvs.el" (21291 53104 431149 +;;;### (autoloads nil "vc-cvs" "vc/vc-cvs.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/vc-cvs.el (defun vc-cvs-registered (f) @@ -29783,7 +29757,7 @@ Name of the format file in a .bzr directory.") ;;;*** -;;;### (autoloads nil "vc-dir" "vc/vc-dir.el" (21291 53104 431149 +;;;### (autoloads nil "vc-dir" "vc/vc-dir.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/vc-dir.el @@ -29809,7 +29783,7 @@ These are the commands available for use in the file status buffer: ;;;*** ;;;### (autoloads nil "vc-dispatcher" "vc/vc-dispatcher.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from vc/vc-dispatcher.el (autoload 'vc-do-command "vc-dispatcher" "\ @@ -29832,7 +29806,7 @@ case, and the process object in the asynchronous case. ;;;*** -;;;### (autoloads nil "vc-git" "vc/vc-git.el" (21291 53104 431149 +;;;### (autoloads nil "vc-git" "vc/vc-git.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/vc-git.el (defun vc-git-registered (file) @@ -29844,7 +29818,7 @@ case, and the process object in the asynchronous case. ;;;*** -;;;### (autoloads nil "vc-hg" "vc/vc-hg.el" (21291 53104 431149 0)) +;;;### (autoloads nil "vc-hg" "vc/vc-hg.el" (21291 9464 291241 0)) ;;; Generated autoloads from vc/vc-hg.el (defun vc-hg-registered (file) "Return non-nil if FILE is registered with hg." @@ -29855,7 +29829,7 @@ case, and the process object in the asynchronous case. ;;;*** -;;;### (autoloads nil "vc-mtn" "vc/vc-mtn.el" (21291 53104 431149 +;;;### (autoloads nil "vc-mtn" "vc/vc-mtn.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/vc-mtn.el @@ -29872,7 +29846,7 @@ Name of the monotone directory's format file.") ;;;*** -;;;### (autoloads nil "vc-rcs" "vc/vc-rcs.el" (21291 53104 431149 +;;;### (autoloads nil "vc-rcs" "vc/vc-rcs.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/vc-rcs.el @@ -29886,7 +29860,7 @@ For a description of possible values, see `vc-check-master-templates'.") ;;;*** -;;;### (autoloads nil "vc-sccs" "vc/vc-sccs.el" (21291 53104 431149 +;;;### (autoloads nil "vc-sccs" "vc/vc-sccs.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/vc-sccs.el @@ -29905,7 +29879,7 @@ find any project directory." (let ((project-dir (getenv "PROJECTDIR")) dirs dir) ;;;*** -;;;### (autoloads nil "vc-svn" "vc/vc-svn.el" (21291 53104 431149 +;;;### (autoloads nil "vc-svn" "vc/vc-svn.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from vc/vc-svn.el (defun vc-svn-registered (f) @@ -29920,7 +29894,7 @@ find any project directory." (let ((project-dir (getenv "PROJECTDIR")) dirs dir) ;;;*** ;;;### (autoloads nil "vera-mode" "progmodes/vera-mode.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/vera-mode.el (push (purecopy '(vera-mode 2 28)) package--builtin-versions) (add-to-list 'auto-mode-alist (cons (purecopy "\\.vr[hi]?\\'") 'vera-mode)) @@ -29979,7 +29953,7 @@ Key bindings: ;;;*** ;;;### (autoloads nil "verilog-mode" "progmodes/verilog-mode.el" -;;;;;; (21291 53104 431149 0)) +;;;;;; (21291 9464 291241 0)) ;;; Generated autoloads from progmodes/verilog-mode.el (autoload 'verilog-mode "verilog-mode" "\ @@ -30119,7 +30093,7 @@ Key bindings specific to `verilog-mode-map' are: ;;;*** ;;;### (autoloads nil "vhdl-mode" "progmodes/vhdl-mode.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/vhdl-mode.el (autoload 'vhdl-mode "vhdl-mode" "\ @@ -30673,8 +30647,7 @@ Key bindings: ;;;*** -;;;### (autoloads nil "vi" "emulation/vi.el" (21291 53104 431149 -;;;;;; 0)) +;;;### (autoloads nil "vi" "emulation/vi.el" (21291 9464 291241 0)) ;;; Generated autoloads from emulation/vi.el (autoload 'vi-mode "vi" "\ @@ -30727,7 +30700,7 @@ Syntax table and abbrevs while in vi mode remain as they were in Emacs. ;;;*** ;;;### (autoloads nil "viet-util" "language/viet-util.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from language/viet-util.el (autoload 'viet-encode-viscii-char "viet-util" "\ @@ -30771,7 +30744,7 @@ Convert Vietnamese characters of the current buffer to `VIQR' mnemonics. ;;;*** -;;;### (autoloads nil "view" "view.el" (21291 53104 431149 0)) +;;;### (autoloads nil "view" "view.el" (21291 9464 291241 0)) ;;; Generated autoloads from view.el (defvar view-remove-frame-by-deleting t "\ @@ -31027,7 +31000,7 @@ Exit View mode and make the current buffer editable. ;;;*** -;;;### (autoloads nil "vip" "emulation/vip.el" (21291 53104 431149 +;;;### (autoloads nil "vip" "emulation/vip.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emulation/vip.el @@ -31043,7 +31016,7 @@ Turn on VIP emulation of VI. ;;;*** -;;;### (autoloads nil "viper" "emulation/viper.el" (21291 53104 431149 +;;;### (autoloads nil "viper" "emulation/viper.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from emulation/viper.el (push (purecopy '(viper 3 14 1)) package--builtin-versions) @@ -31062,7 +31035,7 @@ Turn on Viper emulation of Vi in Emacs. See Info node `(viper)Top'. ;;;*** ;;;### (autoloads nil "warnings" "emacs-lisp/warnings.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from emacs-lisp/warnings.el (defvar warning-prefix-function nil "\ @@ -31152,7 +31125,7 @@ this is equivalent to `display-warning', using ;;;*** -;;;### (autoloads nil "wdired" "wdired.el" (21291 53104 431149 0)) +;;;### (autoloads nil "wdired" "wdired.el" (21291 9464 291241 0)) ;;; Generated autoloads from wdired.el (push (purecopy '(wdired 2 0)) package--builtin-versions) @@ -31170,7 +31143,7 @@ See `wdired-mode'. ;;;*** -;;;### (autoloads nil "webjump" "net/webjump.el" (21291 53104 431149 +;;;### (autoloads nil "webjump" "net/webjump.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from net/webjump.el @@ -31188,7 +31161,7 @@ Please submit bug reports and other feedback to the author, Neil W. Van Dyke ;;;*** ;;;### (autoloads nil "which-func" "progmodes/which-func.el" (21291 -;;;;;; 53104 431149 0)) +;;;;;; 9464 291241 0)) ;;; Generated autoloads from progmodes/which-func.el (put 'which-func-format 'risky-local-variable t) (put 'which-func-current 'risky-local-variable t) @@ -31218,7 +31191,7 @@ in certain major modes. ;;;*** -;;;### (autoloads nil "whitespace" "whitespace.el" (21291 53104 431149 +;;;### (autoloads nil "whitespace" "whitespace.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from whitespace.el (push (purecopy '(whitespace 13 2 2)) package--builtin-versions) @@ -31618,7 +31591,7 @@ cleaning up these problems. ;;;*** -;;;### (autoloads nil "wid-browse" "wid-browse.el" (21291 53104 431149 +;;;### (autoloads nil "wid-browse" "wid-browse.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from wid-browse.el @@ -31647,7 +31620,7 @@ if ARG is omitted or nil. ;;;*** -;;;### (autoloads nil "wid-edit" "wid-edit.el" (21291 53104 431149 +;;;### (autoloads nil "wid-edit" "wid-edit.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from wid-edit.el @@ -31690,7 +31663,7 @@ Setup current buffer so editing string widgets works. ;;;*** -;;;### (autoloads nil "windmove" "windmove.el" (21291 53104 431149 +;;;### (autoloads nil "windmove" "windmove.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from windmove.el @@ -31743,7 +31716,7 @@ Default MODIFIER is 'shift. ;;;*** -;;;### (autoloads nil "winner" "winner.el" (21291 53104 431149 0)) +;;;### (autoloads nil "winner" "winner.el" (21291 9464 291241 0)) ;;; Generated autoloads from winner.el (defvar winner-mode nil "\ @@ -31766,7 +31739,7 @@ the mode if ARG is omitted or nil, and toggle it if ARG is `toggle'. ;;;*** -;;;### (autoloads nil "woman" "woman.el" (21291 53104 431149 0)) +;;;### (autoloads nil "woman" "woman.el" (21291 9464 291241 0)) ;;; Generated autoloads from woman.el (push (purecopy '(woman 0 551)) package--builtin-versions) @@ -31815,8 +31788,8 @@ Default bookmark handler for Woman buffers. ;;;*** -;;;### (autoloads nil "ws-mode" "emulation/ws-mode.el" (21291 53104 -;;;;;; 431149 0)) +;;;### (autoloads nil "ws-mode" "emulation/ws-mode.el" (21291 9464 +;;;;;; 291241 0)) ;;; Generated autoloads from emulation/ws-mode.el (push (purecopy '(ws-mode 0 7)) package--builtin-versions) @@ -31837,7 +31810,7 @@ Emacs-like. ;;;*** -;;;### (autoloads nil "xml" "xml.el" (21291 53104 431149 0)) +;;;### (autoloads nil "xml" "xml.el" (21291 9464 291241 0)) ;;; Generated autoloads from xml.el (autoload 'xml-parse-file "xml" "\ @@ -31893,8 +31866,8 @@ Both features can be combined by providing a cons cell ;;;*** -;;;### (autoloads nil "xmltok" "nxml/xmltok.el" (21291 57968 317602 -;;;;;; 643000)) +;;;### (autoloads nil "xmltok" "nxml/xmltok.el" (21327 47162 581074 +;;;;;; 0)) ;;; Generated autoloads from nxml/xmltok.el (autoload 'xmltok-get-declared-encoding-position "xmltok" "\ @@ -31912,7 +31885,7 @@ If LIMIT is non-nil, then do not consider characters beyond LIMIT. ;;;*** -;;;### (autoloads nil "xt-mouse" "xt-mouse.el" (21291 53104 431149 +;;;### (autoloads nil "xt-mouse" "xt-mouse.el" (21291 9464 291241 ;;;;;; 0)) ;;; Generated autoloads from xt-mouse.el @@ -31942,7 +31915,7 @@ down the SHIFT key while pressing the mouse button. ;;;*** -;;;### (autoloads nil "yenc" "gnus/yenc.el" (21291 53104 431149 0)) +;;;### (autoloads nil "yenc" "gnus/yenc.el" (21291 9464 291241 0)) ;;; Generated autoloads from gnus/yenc.el (autoload 'yenc-decode-region "yenc" "\ @@ -31957,7 +31930,7 @@ Extract file name from an yenc header. ;;;*** -;;;### (autoloads nil "zone" "play/zone.el" (21291 53104 431149 0)) +;;;### (autoloads nil "zone" "play/zone.el" (21291 9464 291241 0)) ;;; Generated autoloads from play/zone.el (autoload 'zone "zone" "\ @@ -31973,45 +31946,44 @@ Zone out, completely. ;;;;;; "calc/calc-fin.el" "calc/calc-forms.el" "calc/calc-frac.el" ;;;;;; "calc/calc-funcs.el" "calc/calc-graph.el" "calc/calc-help.el" ;;;;;; "calc/calc-incom.el" "calc/calc-keypd.el" "calc/calc-lang.el" -;;;;;; "calc/calc-macs.el" "calc/calc-map.el" "calc/calc-math.el" -;;;;;; "calc/calc-menu.el" "calc/calc-misc.el" "calc/calc-mode.el" -;;;;;; "calc/calc-mtx.el" "calc/calc-nlfit.el" "calc/calc-poly.el" -;;;;;; "calc/calc-prog.el" "calc/calc-rewr.el" "calc/calc-rules.el" -;;;;;; "calc/calc-sel.el" "calc/calc-stat.el" "calc/calc-store.el" -;;;;;; "calc/calc-stuff.el" "calc/calc-trail.el" "calc/calc-units.el" -;;;;;; "calc/calc-vec.el" "calc/calc-yank.el" "calc/calcalg2.el" -;;;;;; "calc/calcalg3.el" "calc/calccomp.el" "calc/calcsel2.el" -;;;;;; "calendar/cal-bahai.el" "calendar/cal-coptic.el" "calendar/cal-french.el" -;;;;;; "calendar/cal-html.el" "calendar/cal-islam.el" "calendar/cal-iso.el" -;;;;;; "calendar/cal-julian.el" "calendar/cal-loaddefs.el" "calendar/cal-mayan.el" -;;;;;; "calendar/cal-menu.el" "calendar/cal-move.el" "calendar/cal-persia.el" -;;;;;; "calendar/cal-tex.el" "calendar/cal-x.el" "calendar/diary-loaddefs.el" -;;;;;; "calendar/hol-loaddefs.el" "cdl.el" "cedet/cedet-cscope.el" -;;;;;; "cedet/cedet-files.el" "cedet/cedet-global.el" "cedet/cedet-idutils.el" -;;;;;; "cedet/ede/auto.el" "cedet/ede/autoconf-edit.el" "cedet/ede/base.el" -;;;;;; "cedet/ede/cpp-root.el" "cedet/ede/custom.el" "cedet/ede/dired.el" -;;;;;; "cedet/ede/emacs.el" "cedet/ede/files.el" "cedet/ede/generic.el" -;;;;;; "cedet/ede/linux.el" "cedet/ede/locate.el" "cedet/ede/make.el" -;;;;;; "cedet/ede/makefile-edit.el" "cedet/ede/pconf.el" "cedet/ede/pmake.el" -;;;;;; "cedet/ede/proj-archive.el" "cedet/ede/proj-aux.el" "cedet/ede/proj-comp.el" -;;;;;; "cedet/ede/proj-elisp.el" "cedet/ede/proj-info.el" "cedet/ede/proj-misc.el" -;;;;;; "cedet/ede/proj-obj.el" "cedet/ede/proj-prog.el" "cedet/ede/proj-scheme.el" -;;;;;; "cedet/ede/proj-shared.el" "cedet/ede/proj.el" "cedet/ede/project-am.el" -;;;;;; "cedet/ede/shell.el" "cedet/ede/simple.el" "cedet/ede/source.el" -;;;;;; "cedet/ede/speedbar.el" "cedet/ede/srecode.el" "cedet/ede/system.el" -;;;;;; "cedet/ede/util.el" "cedet/semantic/analyze.el" "cedet/semantic/analyze/complete.el" +;;;;;; "calc/calc-loaddefs.el" "calc/calc-macs.el" "calc/calc-map.el" +;;;;;; "calc/calc-math.el" "calc/calc-menu.el" "calc/calc-misc.el" +;;;;;; "calc/calc-mode.el" "calc/calc-mtx.el" "calc/calc-nlfit.el" +;;;;;; "calc/calc-poly.el" "calc/calc-prog.el" "calc/calc-rewr.el" +;;;;;; "calc/calc-rules.el" "calc/calc-sel.el" "calc/calc-stat.el" +;;;;;; "calc/calc-store.el" "calc/calc-stuff.el" "calc/calc-trail.el" +;;;;;; "calc/calc-units.el" "calc/calc-vec.el" "calc/calc-yank.el" +;;;;;; "calc/calcalg2.el" "calc/calcalg3.el" "calc/calccomp.el" +;;;;;; "calc/calcsel2.el" "calendar/cal-bahai.el" "calendar/cal-coptic.el" +;;;;;; "calendar/cal-french.el" "calendar/cal-html.el" "calendar/cal-islam.el" +;;;;;; "calendar/cal-iso.el" "calendar/cal-julian.el" "calendar/cal-loaddefs.el" +;;;;;; "calendar/cal-mayan.el" "calendar/cal-menu.el" "calendar/cal-move.el" +;;;;;; "calendar/cal-persia.el" "calendar/cal-tex.el" "calendar/cal-x.el" +;;;;;; "calendar/diary-loaddefs.el" "calendar/hol-loaddefs.el" "cdl.el" +;;;;;; "cedet/cedet-cscope.el" "cedet/cedet-files.el" "cedet/cedet-global.el" +;;;;;; "cedet/cedet-idutils.el" "cedet/ede/auto.el" "cedet/ede/autoconf-edit.el" +;;;;;; "cedet/ede/base.el" "cedet/ede/cpp-root.el" "cedet/ede/custom.el" +;;;;;; "cedet/ede/dired.el" "cedet/ede/emacs.el" "cedet/ede/files.el" +;;;;;; "cedet/ede/generic.el" "cedet/ede/linux.el" "cedet/ede/loaddefs.el" +;;;;;; "cedet/ede/locate.el" "cedet/ede/make.el" "cedet/ede/makefile-edit.el" +;;;;;; "cedet/ede/pconf.el" "cedet/ede/pmake.el" "cedet/ede/proj-archive.el" +;;;;;; "cedet/ede/proj-aux.el" "cedet/ede/proj-comp.el" "cedet/ede/proj-elisp.el" +;;;;;; "cedet/ede/proj-info.el" "cedet/ede/proj-misc.el" "cedet/ede/proj-obj.el" +;;;;;; "cedet/ede/proj-prog.el" "cedet/ede/proj-scheme.el" "cedet/ede/proj-shared.el" +;;;;;; "cedet/ede/proj.el" "cedet/ede/project-am.el" "cedet/ede/shell.el" +;;;;;; "cedet/ede/simple.el" "cedet/ede/source.el" "cedet/ede/speedbar.el" +;;;;;; "cedet/ede/srecode.el" "cedet/ede/system.el" "cedet/ede/util.el" +;;;;;; "cedet/semantic/analyze.el" "cedet/semantic/analyze/complete.el" ;;;;;; "cedet/semantic/analyze/debug.el" "cedet/semantic/analyze/fcn.el" ;;;;;; "cedet/semantic/analyze/refs.el" "cedet/semantic/bovine.el" -;;;;;; "cedet/semantic/bovine/c-by.el" "cedet/semantic/bovine/c.el" -;;;;;; "cedet/semantic/bovine/debug.el" "cedet/semantic/bovine/el.el" -;;;;;; "cedet/semantic/bovine/gcc.el" "cedet/semantic/bovine/make-by.el" -;;;;;; "cedet/semantic/bovine/make.el" "cedet/semantic/bovine/scm-by.el" -;;;;;; "cedet/semantic/bovine/scm.el" "cedet/semantic/chart.el" -;;;;;; "cedet/semantic/complete.el" "cedet/semantic/ctxt.el" "cedet/semantic/db-debug.el" -;;;;;; "cedet/semantic/db-ebrowse.el" "cedet/semantic/db-el.el" -;;;;;; "cedet/semantic/db-file.el" "cedet/semantic/db-find.el" "cedet/semantic/db-global.el" -;;;;;; "cedet/semantic/db-javascript.el" "cedet/semantic/db-mode.el" -;;;;;; "cedet/semantic/db-ref.el" "cedet/semantic/db-typecache.el" +;;;;;; "cedet/semantic/bovine/c.el" "cedet/semantic/bovine/debug.el" +;;;;;; "cedet/semantic/bovine/el.el" "cedet/semantic/bovine/gcc.el" +;;;;;; "cedet/semantic/bovine/make.el" "cedet/semantic/bovine/scm.el" +;;;;;; "cedet/semantic/chart.el" "cedet/semantic/complete.el" "cedet/semantic/ctxt.el" +;;;;;; "cedet/semantic/db-debug.el" "cedet/semantic/db-ebrowse.el" +;;;;;; "cedet/semantic/db-el.el" "cedet/semantic/db-file.el" "cedet/semantic/db-find.el" +;;;;;; "cedet/semantic/db-global.el" "cedet/semantic/db-javascript.el" +;;;;;; "cedet/semantic/db-mode.el" "cedet/semantic/db-ref.el" "cedet/semantic/db-typecache.el" ;;;;;; "cedet/semantic/db.el" "cedet/semantic/debug.el" "cedet/semantic/decorate.el" ;;;;;; "cedet/semantic/decorate/include.el" "cedet/semantic/decorate/mode.el" ;;;;;; "cedet/semantic/dep.el" "cedet/semantic/doc.el" "cedet/semantic/ede-grammar.el" @@ -32019,36 +31991,35 @@ Zone out, completely. ;;;;;; "cedet/semantic/fw.el" "cedet/semantic/grammar-wy.el" "cedet/semantic/grammar.el" ;;;;;; "cedet/semantic/html.el" "cedet/semantic/ia-sb.el" "cedet/semantic/ia.el" ;;;;;; "cedet/semantic/idle.el" "cedet/semantic/imenu.el" "cedet/semantic/java.el" -;;;;;; "cedet/semantic/lex-spp.el" "cedet/semantic/lex.el" "cedet/semantic/mru-bookmark.el" -;;;;;; "cedet/semantic/sb.el" "cedet/semantic/scope.el" "cedet/semantic/senator.el" -;;;;;; "cedet/semantic/sort.el" "cedet/semantic/symref.el" "cedet/semantic/symref/cscope.el" -;;;;;; "cedet/semantic/symref/filter.el" "cedet/semantic/symref/global.el" -;;;;;; "cedet/semantic/symref/grep.el" "cedet/semantic/symref/idutils.el" -;;;;;; "cedet/semantic/symref/list.el" "cedet/semantic/tag-file.el" -;;;;;; "cedet/semantic/tag-ls.el" "cedet/semantic/tag-write.el" +;;;;;; "cedet/semantic/lex-spp.el" "cedet/semantic/lex.el" "cedet/semantic/loaddefs.el" +;;;;;; "cedet/semantic/mru-bookmark.el" "cedet/semantic/sb.el" "cedet/semantic/scope.el" +;;;;;; "cedet/semantic/senator.el" "cedet/semantic/sort.el" "cedet/semantic/symref.el" +;;;;;; "cedet/semantic/symref/cscope.el" "cedet/semantic/symref/filter.el" +;;;;;; "cedet/semantic/symref/global.el" "cedet/semantic/symref/grep.el" +;;;;;; "cedet/semantic/symref/idutils.el" "cedet/semantic/symref/list.el" +;;;;;; "cedet/semantic/tag-file.el" "cedet/semantic/tag-ls.el" "cedet/semantic/tag-write.el" ;;;;;; "cedet/semantic/tag.el" "cedet/semantic/texi.el" "cedet/semantic/util-modes.el" ;;;;;; "cedet/semantic/util.el" "cedet/semantic/wisent.el" "cedet/semantic/wisent/comp.el" ;;;;;; "cedet/semantic/wisent/java-tags.el" "cedet/semantic/wisent/javascript.el" -;;;;;; "cedet/semantic/wisent/javat-wy.el" "cedet/semantic/wisent/js-wy.el" -;;;;;; "cedet/semantic/wisent/python-wy.el" "cedet/semantic/wisent/python.el" -;;;;;; "cedet/semantic/wisent/wisent.el" "cedet/srecode/args.el" -;;;;;; "cedet/srecode/compile.el" "cedet/srecode/cpp.el" "cedet/srecode/ctxt.el" -;;;;;; "cedet/srecode/dictionary.el" "cedet/srecode/document.el" +;;;;;; "cedet/semantic/wisent/python.el" "cedet/semantic/wisent/wisent.el" +;;;;;; "cedet/srecode/args.el" "cedet/srecode/compile.el" "cedet/srecode/cpp.el" +;;;;;; "cedet/srecode/ctxt.el" "cedet/srecode/dictionary.el" "cedet/srecode/document.el" ;;;;;; "cedet/srecode/el.el" "cedet/srecode/expandproto.el" "cedet/srecode/extract.el" ;;;;;; "cedet/srecode/fields.el" "cedet/srecode/filters.el" "cedet/srecode/find.el" ;;;;;; "cedet/srecode/getset.el" "cedet/srecode/insert.el" "cedet/srecode/java.el" -;;;;;; "cedet/srecode/map.el" "cedet/srecode/mode.el" "cedet/srecode/semantic.el" -;;;;;; "cedet/srecode/srt-wy.el" "cedet/srecode/srt.el" "cedet/srecode/table.el" +;;;;;; "cedet/srecode/loaddefs.el" "cedet/srecode/map.el" "cedet/srecode/mode.el" +;;;;;; "cedet/srecode/semantic.el" "cedet/srecode/srt.el" "cedet/srecode/table.el" ;;;;;; "cedet/srecode/template.el" "cedet/srecode/texi.el" "cus-dep.el" ;;;;;; "dframe.el" "dired-aux.el" "dired-x.el" "dos-fns.el" "dos-vars.el" ;;;;;; "dos-w32.el" "dynamic-setting.el" "emacs-lisp/authors.el" ;;;;;; "emacs-lisp/avl-tree.el" "emacs-lisp/bindat.el" "emacs-lisp/byte-opt.el" -;;;;;; "emacs-lisp/cl-extra.el" "emacs-lisp/cl-macs.el" "emacs-lisp/cl-seq.el" -;;;;;; "emacs-lisp/cl.el" "emacs-lisp/eieio-base.el" "emacs-lisp/eieio-custom.el" -;;;;;; "emacs-lisp/eieio-datadebug.el" "emacs-lisp/eieio-opt.el" -;;;;;; "emacs-lisp/eieio-speedbar.el" "emacs-lisp/find-gc.el" "emacs-lisp/gulp.el" -;;;;;; "emacs-lisp/lisp-mnt.el" "emacs-lisp/package-x.el" "emacs-lisp/smie.el" -;;;;;; "emacs-lisp/subr-x.el" "emacs-lisp/tcover-ses.el" "emacs-lisp/tcover-unsafep.el" +;;;;;; "emacs-lisp/cl-extra.el" "emacs-lisp/cl-loaddefs.el" "emacs-lisp/cl-macs.el" +;;;;;; "emacs-lisp/cl-seq.el" "emacs-lisp/cl.el" "emacs-lisp/eieio-base.el" +;;;;;; "emacs-lisp/eieio-custom.el" "emacs-lisp/eieio-datadebug.el" +;;;;;; "emacs-lisp/eieio-opt.el" "emacs-lisp/eieio-speedbar.el" +;;;;;; "emacs-lisp/find-gc.el" "emacs-lisp/gulp.el" "emacs-lisp/lisp-mnt.el" +;;;;;; "emacs-lisp/package-x.el" "emacs-lisp/smie.el" "emacs-lisp/subr-x.el" +;;;;;; "emacs-lisp/tcover-ses.el" "emacs-lisp/tcover-unsafep.el" ;;;;;; "emulation/cua-gmrk.el" "emulation/edt-lk201.el" "emulation/edt-mapper.el" ;;;;;; "emulation/edt-pc.el" "emulation/edt-vt100.el" "emulation/tpu-extras.el" ;;;;;; "emulation/viper-cmd.el" "emulation/viper-ex.el" "emulation/viper-init.el" @@ -32061,41 +32032,34 @@ Zone out, completely. ;;;;;; "eshell/em-rebind.el" "eshell/em-script.el" "eshell/em-smart.el" ;;;;;; "eshell/em-term.el" "eshell/em-tramp.el" "eshell/em-unix.el" ;;;;;; "eshell/em-xtra.el" "eshell/esh-arg.el" "eshell/esh-cmd.el" -;;;;;; "eshell/esh-ext.el" "eshell/esh-io.el" "eshell/esh-module.el" -;;;;;; "eshell/esh-opt.el" "eshell/esh-proc.el" "eshell/esh-util.el" -;;;;;; "eshell/esh-var.el" "ezimage.el" "format-spec.el" "fringe.el" -;;;;;; "generic-x.el" "gnus/compface.el" "gnus/gnus-async.el" "gnus/gnus-bcklg.el" -;;;;;; "gnus/gnus-cite.el" "gnus/gnus-cus.el" "gnus/gnus-demon.el" -;;;;;; "gnus/gnus-dup.el" "gnus/gnus-eform.el" "gnus/gnus-ems.el" -;;;;;; "gnus/gnus-icalendar.el" "gnus/gnus-int.el" "gnus/gnus-logic.el" -;;;;;; "gnus/gnus-mh.el" "gnus/gnus-salt.el" "gnus/gnus-score.el" -;;;;;; "gnus/gnus-setup.el" "gnus/gnus-srvr.el" "gnus/gnus-topic.el" -;;;;;; "gnus/gnus-undo.el" "gnus/gnus-util.el" "gnus/gnus-uu.el" -;;;;;; "gnus/gnus-vm.el" "gnus/gssapi.el" "gnus/ietf-drums.el" "gnus/legacy-gnus-agent.el" -;;;;;; "gnus/mail-parse.el" "gnus/mail-prsvr.el" "gnus/mail-source.el" -;;;;;; "gnus/mailcap.el" "gnus/messcompat.el" "gnus/mm-archive.el" -;;;;;; "gnus/mm-bodies.el" "gnus/mm-decode.el" "gnus/mm-util.el" -;;;;;; "gnus/mm-view.el" "gnus/mml-sec.el" "gnus/mml-smime.el" "gnus/nnagent.el" -;;;;;; "gnus/nnbabyl.el" "gnus/nndir.el" "gnus/nndraft.el" "gnus/nneething.el" -;;;;;; "gnus/nngateway.el" "gnus/nnheader.el" "gnus/nnimap.el" "gnus/nnir.el" -;;;;;; "gnus/nnmail.el" "gnus/nnmaildir.el" "gnus/nnmairix.el" "gnus/nnmbox.el" -;;;;;; "gnus/nnmh.el" "gnus/nnnil.el" "gnus/nnoo.el" "gnus/nnregistry.el" -;;;;;; "gnus/nnrss.el" "gnus/nnspool.el" "gnus/nntp.el" "gnus/nnvirtual.el" -;;;;;; "gnus/nnweb.el" "gnus/registry.el" "gnus/rfc1843.el" "gnus/rfc2045.el" -;;;;;; "gnus/rfc2047.el" "gnus/rfc2104.el" "gnus/rfc2231.el" "gnus/rtree.el" -;;;;;; "gnus/sieve-manage.el" "gnus/smime.el" "gnus/spam-stat.el" -;;;;;; "gnus/spam-wash.el" "hex-util.el" "hfy-cmap.el" "ibuf-ext.el" -;;;;;; "international/cp51932.el" "international/eucjp-ms.el" "international/fontset.el" -;;;;;; "international/iso-ascii.el" "international/ja-dic-cnv.el" -;;;;;; "international/ja-dic-utl.el" "international/ogonek.el" "international/uni-bidi.el" -;;;;;; "international/uni-category.el" "international/uni-combining.el" -;;;;;; "international/uni-comment.el" "international/uni-decimal.el" -;;;;;; "international/uni-decomposition.el" "international/uni-digit.el" -;;;;;; "international/uni-lowercase.el" "international/uni-mirrored.el" -;;;;;; "international/uni-name.el" "international/uni-numeric.el" -;;;;;; "international/uni-old-name.el" "international/uni-titlecase.el" -;;;;;; "international/uni-uppercase.el" "kermit.el" "language/hanja-util.el" -;;;;;; "language/thai-word.el" "ldefs-boot.el" "leim/ja-dic/ja-dic.el" +;;;;;; "eshell/esh-ext.el" "eshell/esh-groups.el" "eshell/esh-io.el" +;;;;;; "eshell/esh-module.el" "eshell/esh-opt.el" "eshell/esh-proc.el" +;;;;;; "eshell/esh-util.el" "eshell/esh-var.el" "ezimage.el" "format-spec.el" +;;;;;; "fringe.el" "generic-x.el" "gnus/compface.el" "gnus/gnus-async.el" +;;;;;; "gnus/gnus-bcklg.el" "gnus/gnus-cite.el" "gnus/gnus-cus.el" +;;;;;; "gnus/gnus-demon.el" "gnus/gnus-dup.el" "gnus/gnus-eform.el" +;;;;;; "gnus/gnus-ems.el" "gnus/gnus-icalendar.el" "gnus/gnus-int.el" +;;;;;; "gnus/gnus-logic.el" "gnus/gnus-mh.el" "gnus/gnus-salt.el" +;;;;;; "gnus/gnus-score.el" "gnus/gnus-setup.el" "gnus/gnus-srvr.el" +;;;;;; "gnus/gnus-topic.el" "gnus/gnus-undo.el" "gnus/gnus-util.el" +;;;;;; "gnus/gnus-uu.el" "gnus/gnus-vm.el" "gnus/gssapi.el" "gnus/ietf-drums.el" +;;;;;; "gnus/legacy-gnus-agent.el" "gnus/mail-parse.el" "gnus/mail-prsvr.el" +;;;;;; "gnus/mail-source.el" "gnus/mailcap.el" "gnus/messcompat.el" +;;;;;; "gnus/mm-archive.el" "gnus/mm-bodies.el" "gnus/mm-decode.el" +;;;;;; "gnus/mm-util.el" "gnus/mm-view.el" "gnus/mml-sec.el" "gnus/mml-smime.el" +;;;;;; "gnus/nnagent.el" "gnus/nnbabyl.el" "gnus/nndir.el" "gnus/nndraft.el" +;;;;;; "gnus/nneething.el" "gnus/nngateway.el" "gnus/nnheader.el" +;;;;;; "gnus/nnimap.el" "gnus/nnir.el" "gnus/nnmail.el" "gnus/nnmaildir.el" +;;;;;; "gnus/nnmairix.el" "gnus/nnmbox.el" "gnus/nnmh.el" "gnus/nnnil.el" +;;;;;; "gnus/nnoo.el" "gnus/nnregistry.el" "gnus/nnrss.el" "gnus/nnspool.el" +;;;;;; "gnus/nntp.el" "gnus/nnvirtual.el" "gnus/nnweb.el" "gnus/registry.el" +;;;;;; "gnus/rfc1843.el" "gnus/rfc2045.el" "gnus/rfc2047.el" "gnus/rfc2104.el" +;;;;;; "gnus/rfc2231.el" "gnus/rtree.el" "gnus/sieve-manage.el" +;;;;;; "gnus/smime.el" "gnus/spam-stat.el" "gnus/spam-wash.el" "hex-util.el" +;;;;;; "hfy-cmap.el" "ibuf-ext.el" "international/cp51932.el" "international/eucjp-ms.el" +;;;;;; "international/fontset.el" "international/iso-ascii.el" "international/ja-dic-cnv.el" +;;;;;; "international/ja-dic-utl.el" "international/ogonek.el" "kermit.el" +;;;;;; "language/hanja-util.el" "language/thai-word.el" "ldefs-boot.el" ;;;;;; "leim/quail/arabic.el" "leim/quail/croatian.el" "leim/quail/cyril-jis.el" ;;;;;; "leim/quail/cyrillic.el" "leim/quail/czech.el" "leim/quail/ethiopic.el" ;;;;;; "leim/quail/georgian.el" "leim/quail/greek.el" "leim/quail/hanja-jis.el" @@ -32154,14 +32118,14 @@ Zone out, completely. ;;;;;; "org/org-faces.el" "org/org-feed.el" "org/org-footnote.el" ;;;;;; "org/org-gnus.el" "org/org-habit.el" "org/org-id.el" "org/org-indent.el" ;;;;;; "org/org-info.el" "org/org-inlinetask.el" "org/org-install.el" -;;;;;; "org/org-irc.el" "org/org-list.el" "org/org-macro.el" "org/org-mhe.el" -;;;;;; "org/org-mobile.el" "org/org-mouse.el" "org/org-pcomplete.el" -;;;;;; "org/org-plot.el" "org/org-protocol.el" "org/org-rmail.el" -;;;;;; "org/org-src.el" "org/org-table.el" "org/org-timer.el" "org/org-w3m.el" -;;;;;; "org/ox-ascii.el" "org/ox-beamer.el" "org/ox-html.el" "org/ox-icalendar.el" -;;;;;; "org/ox-latex.el" "org/ox-man.el" "org/ox-md.el" "org/ox-odt.el" -;;;;;; "org/ox-org.el" "org/ox-publish.el" "org/ox-texinfo.el" "org/ox.el" -;;;;;; "play/gametree.el" "progmodes/ada-prj.el" "progmodes/cc-align.el" +;;;;;; "org/org-irc.el" "org/org-list.el" "org/org-loaddefs.el" +;;;;;; "org/org-macro.el" "org/org-mhe.el" "org/org-mobile.el" "org/org-mouse.el" +;;;;;; "org/org-pcomplete.el" "org/org-plot.el" "org/org-protocol.el" +;;;;;; "org/org-rmail.el" "org/org-src.el" "org/org-table.el" "org/org-timer.el" +;;;;;; "org/org-w3m.el" "org/ox-ascii.el" "org/ox-beamer.el" "org/ox-html.el" +;;;;;; "org/ox-icalendar.el" "org/ox-latex.el" "org/ox-man.el" "org/ox-md.el" +;;;;;; "org/ox-odt.el" "org/ox-org.el" "org/ox-publish.el" "org/ox-texinfo.el" +;;;;;; "org/ox.el" "play/gametree.el" "progmodes/ada-prj.el" "progmodes/cc-align.el" ;;;;;; "progmodes/cc-awk.el" "progmodes/cc-bytecomp.el" "progmodes/cc-cmds.el" ;;;;;; "progmodes/cc-defs.el" "progmodes/cc-fonts.el" "progmodes/cc-langs.el" ;;;;;; "progmodes/cc-menus.el" "progmodes/ebnf-abn.el" "progmodes/ebnf-bnf.el" @@ -32183,8 +32147,8 @@ Zone out, completely. ;;;;;; "vc/ediff-ptch.el" "vc/ediff-vers.el" "vc/ediff-wind.el" ;;;;;; "vc/pcvs-info.el" "vc/pcvs-parse.el" "vc/pcvs-util.el" "vc/vc-dav.el" ;;;;;; "vcursor.el" "vt-control.el" "vt100-led.el" "w32-common-fns.el" -;;;;;; "w32-fns.el" "w32-vars.el" "x-dnd.el") (21321 34786 372533 -;;;;;; 150000)) +;;;;;; "w32-fns.el" "w32-vars.el" "x-dnd.el") (21346 11636 801272 +;;;;;; 923000)) ;;;*** From 23c931aa24622cafab8e30c4f779b70f2390a409 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Thu, 1 May 2014 11:15:46 -0400 Subject: [PATCH 03/20] * src/intervals.c: Tighten assertions. (create_root_interval): Make sure the interval is not empty. (intervals_equal): Use booleans. (rotate_right, rotate_left): Check LENGTHs rather than TOTAL_LENGTH. (balance_an_interval): Sanity check LENGTHs and TOTAL_LENGTHs. (balance_possible_root_interval): Simplify and use booleans. (split_interval_right, split_interval_left): Check LENGTH, and remove now redundant assertion. (adjust_intervals_for_insertion): Remove now redundant assertions. (delete_node, interval_deletion_adjustment) (adjust_intervals_for_deletion, merge_interval_right) (merge_interval_left): Check LENGTH rather than TOTAL_LENGTH. (reproduce_interval): Make sure the interval is not empty. --- src/ChangeLog | 16 +++++++++ src/intervals.c | 94 ++++++++++++++++++++++++++----------------------- 2 files changed, 65 insertions(+), 45 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index ab87645b48b..85914939608 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,19 @@ +2014-05-01 Stefan Monnier + + * intervals.c: Tighten assertions. + (create_root_interval): Make sure the interval is not empty. + (intervals_equal): Use booleans. + (rotate_right, rotate_left): Check LENGTHs rather than TOTAL_LENGTH. + (balance_an_interval): Sanity check LENGTHs and TOTAL_LENGTHs. + (balance_possible_root_interval): Simplify and use booleans. + (split_interval_right, split_interval_left): Check LENGTH, and remove + now redundant assertion. + (adjust_intervals_for_insertion): Remove now redundant assertions. + (delete_node, interval_deletion_adjustment) + (adjust_intervals_for_deletion, merge_interval_right) + (merge_interval_left): Check LENGTH rather than TOTAL_LENGTH. + (reproduce_interval): Make sure the interval is not empty. + 2014-04-30 Paul Eggert * term.c (tty_menu_activate): Don't assume row and col are initialized. diff --git a/src/intervals.c b/src/intervals.c index 8544ed94b79..842e0c20c42 100644 --- a/src/intervals.c +++ b/src/intervals.c @@ -110,13 +110,14 @@ create_root_interval (Lisp_Object parent) set_string_intervals (parent, new); new->position = 0; } - + eassert (LENGTH (new) > 0); + set_interval_object (new, parent); return new; } -/* Make the interval TARGET have exactly the properties of SOURCE */ +/* Make the interval TARGET have exactly the properties of SOURCE. */ void copy_properties (register INTERVAL source, register INTERVAL target) @@ -176,10 +177,10 @@ intervals_equal (INTERVAL i0, INTERVAL i1) Lisp_Object i1_cdr, i1_val; if (DEFAULT_INTERVAL_P (i0) && DEFAULT_INTERVAL_P (i1)) - return 1; + return true; if (DEFAULT_INTERVAL_P (i0) || DEFAULT_INTERVAL_P (i1)) - return 0; + return false; i0_cdr = i0->plist; i1_cdr = i1->plist; @@ -188,31 +189,31 @@ intervals_equal (INTERVAL i0, INTERVAL i1) i0_sym = XCAR (i0_cdr); i0_cdr = XCDR (i0_cdr); if (!CONSP (i0_cdr)) - return 0; + return false; i1_val = i1->plist; while (CONSP (i1_val) && !EQ (XCAR (i1_val), i0_sym)) { i1_val = XCDR (i1_val); if (!CONSP (i1_val)) - return 0; + return false; i1_val = XCDR (i1_val); } /* i0 has something i1 doesn't. */ if (EQ (i1_val, Qnil)) - return 0; + return false; /* i0 and i1 both have sym, but it has different values in each. */ if (!CONSP (i1_val) || (i1_val = XCDR (i1_val), !CONSP (i1_val)) || !EQ (XCAR (i1_val), XCAR (i0_cdr))) - return 0; + return false; i0_cdr = XCDR (i0_cdr); i1_cdr = XCDR (i1_cdr); if (!CONSP (i1_cdr)) - return 0; + return false; i1_cdr = XCDR (i1_cdr); } @@ -339,10 +340,8 @@ rotate_right (INTERVAL A) ptrdiff_t old_total = A->total_length; eassert (old_total > 0); - eassert (old_total - > TOTAL_LENGTH (B) + TOTAL_LENGTH (A->right)); - eassert (TOTAL_LENGTH (B) - > TOTAL_LENGTH (B->left) + TOTAL_LENGTH (c)); + eassert (LENGTH (A) > 0); + eassert (LENGTH (B) > 0); /* Deal with any Parent of A; make it point to B. */ if (! ROOT_INTERVAL_P (A)) @@ -366,9 +365,11 @@ rotate_right (INTERVAL A) /* A's total length is decreased by the length of B and its left child. */ A->total_length -= B->total_length - TOTAL_LENGTH (c); eassert (TOTAL_LENGTH (A) > 0); + eassert (LENGTH (A) > 0); /* B must have the same total length of A. */ B->total_length = old_total; + eassert (LENGTH (B) > 0); return B; } @@ -390,10 +391,8 @@ rotate_left (INTERVAL A) ptrdiff_t old_total = A->total_length; eassert (old_total > 0); - eassert (old_total - > TOTAL_LENGTH (B) + TOTAL_LENGTH (A->left)); - eassert (TOTAL_LENGTH (B) - > TOTAL_LENGTH (B->right) + TOTAL_LENGTH (c)); + eassert (LENGTH (A) > 0); + eassert (LENGTH (B) > 0); /* Deal with any parent of A; make it point to B. */ if (! ROOT_INTERVAL_P (A)) @@ -417,9 +416,11 @@ rotate_left (INTERVAL A) /* A's total length is decreased by the length of B and its right child. */ A->total_length -= B->total_length - TOTAL_LENGTH (c); eassert (TOTAL_LENGTH (A) > 0); + eassert (LENGTH (A) > 0); /* B must have the same total length of A. */ B->total_length = old_total; + eassert (LENGTH (B) > 0); return B; } @@ -432,6 +433,9 @@ balance_an_interval (INTERVAL i) { register ptrdiff_t old_diff, new_diff; + eassert (LENGTH (i) > 0); + eassert (TOTAL_LENGTH (i) >= LENGTH (i)); + while (1) { old_diff = LEFT_TOTAL_LENGTH (i) - RIGHT_TOTAL_LENGTH (i); @@ -468,16 +472,16 @@ static INTERVAL balance_possible_root_interval (INTERVAL interval) { Lisp_Object parent; - bool have_parent = 0; - - if (!INTERVAL_HAS_OBJECT (interval) && !INTERVAL_HAS_PARENT (interval)) - return interval; + bool have_parent = false; if (INTERVAL_HAS_OBJECT (interval)) { - have_parent = 1; + have_parent = true; GET_INTERVAL_OBJECT (parent, interval); } + else if (!INTERVAL_HAS_PARENT (interval)) + return interval; + interval = balance_an_interval (interval); if (have_parent) @@ -553,7 +557,7 @@ split_interval_right (INTERVAL interval, ptrdiff_t offset) { set_interval_right (interval, new); new->total_length = new_length; - eassert (TOTAL_LENGTH (new) >= 0); + eassert (LENGTH (new) > 0); } else { @@ -562,7 +566,6 @@ split_interval_right (INTERVAL interval, ptrdiff_t offset) set_interval_parent (interval->right, new); set_interval_right (interval, new); new->total_length = new_length + new->right->total_length; - eassert (TOTAL_LENGTH (new) >= 0); balance_an_interval (new); } @@ -598,7 +601,7 @@ split_interval_left (INTERVAL interval, ptrdiff_t offset) { set_interval_left (interval, new); new->total_length = new_length; - eassert (TOTAL_LENGTH (new) >= 0); + eassert (LENGTH (new) > 0); } else { @@ -607,7 +610,6 @@ split_interval_left (INTERVAL interval, ptrdiff_t offset) set_interval_parent (new->left, new); set_interval_left (interval, new); new->total_length = new_length + new->left->total_length; - eassert (TOTAL_LENGTH (new) >= 0); balance_an_interval (new); } @@ -791,12 +793,12 @@ update_interval (register INTERVAL i, ptrdiff_t pos) { if (pos < i->position) { - /* Move left. */ + /* Move left. */ if (pos >= i->position - TOTAL_LENGTH (i->left)) { i->left->position = i->position - TOTAL_LENGTH (i->left) + LEFT_TOTAL_LENGTH (i->left); - i = i->left; /* Move to the left child */ + i = i->left; /* Move to the left child. */ } else if (NULL_PARENT (i)) error ("Point before start of properties"); @@ -806,12 +808,12 @@ update_interval (register INTERVAL i, ptrdiff_t pos) } else if (pos >= INTERVAL_LAST_POS (i)) { - /* Move right. */ + /* Move right. */ if (pos < INTERVAL_LAST_POS (i) + TOTAL_LENGTH (i->right)) { i->right->position = INTERVAL_LAST_POS (i) + LEFT_TOTAL_LENGTH (i->right); - i = i->right; /* Move to the right child */ + i = i->right; /* Move to the right child. */ } else if (NULL_PARENT (i)) error ("Point %"pD"d after end of properties", pos); @@ -958,7 +960,6 @@ adjust_intervals_for_insertion (INTERVAL tree, for (temp = prev ? prev : i; temp; temp = INTERVAL_PARENT_OR_NULL (temp)) { temp->total_length += length; - eassert (TOTAL_LENGTH (temp) >= 0); temp = balance_possible_root_interval (temp); } @@ -1014,7 +1015,6 @@ adjust_intervals_for_insertion (INTERVAL tree, for (temp = i; temp; temp = INTERVAL_PARENT_OR_NULL (temp)) { temp->total_length += length; - eassert (TOTAL_LENGTH (temp) >= 0); temp = balance_possible_root_interval (temp); } } @@ -1216,9 +1216,10 @@ delete_node (register INTERVAL i) this = this->left; this->total_length += migrate_amt; } - eassert (TOTAL_LENGTH (this) >= 0); set_interval_left (this, migrate); set_interval_parent (migrate, this); + eassert (LENGTH (this) > 0); + eassert (LENGTH (i->right) > 0); return i->right; } @@ -1298,7 +1299,7 @@ interval_deletion_adjustment (register INTERVAL tree, register ptrdiff_t from, relative_position, amount); tree->total_length -= subtract; - eassert (TOTAL_LENGTH (tree) >= 0); + eassert (LENGTH (tree) > 0); return subtract; } /* Right branch. */ @@ -1313,7 +1314,7 @@ interval_deletion_adjustment (register INTERVAL tree, register ptrdiff_t from, relative_position, amount); tree->total_length -= subtract; - eassert (TOTAL_LENGTH (tree) >= 0); + eassert (LENGTH (tree) > 0); return subtract; } /* Here -- this node. */ @@ -1328,7 +1329,7 @@ interval_deletion_adjustment (register INTERVAL tree, register ptrdiff_t from, amount = my_amount; tree->total_length -= amount; - eassert (TOTAL_LENGTH (tree) >= 0); + eassert (LENGTH (tree) >= 0); if (LENGTH (tree) == 0) delete_interval (tree); @@ -1370,7 +1371,7 @@ adjust_intervals_for_deletion (struct buffer *buffer, if (ONLY_INTERVAL_P (tree)) { tree->total_length -= length; - eassert (TOTAL_LENGTH (tree) >= 0); + eassert (LENGTH (tree) > 0); return; } @@ -1430,12 +1431,12 @@ merge_interval_right (register INTERVAL i) while (! NULL_LEFT_CHILD (successor)) { successor->total_length += absorb; - eassert (TOTAL_LENGTH (successor) >= 0); + eassert (LENGTH (successor) > 0); successor = successor->left; } successor->total_length += absorb; - eassert (TOTAL_LENGTH (successor) >= 0); + eassert (LENGTH (successor) > 0); delete_interval (i); return successor; } @@ -1457,7 +1458,7 @@ merge_interval_right (register INTERVAL i) successor = INTERVAL_PARENT (successor); successor->total_length -= absorb; - eassert (TOTAL_LENGTH (successor) >= 0); + eassert (LENGTH (successor) > 0); } /* This must be the rightmost or last interval and cannot @@ -1486,12 +1487,12 @@ merge_interval_left (register INTERVAL i) while (! NULL_RIGHT_CHILD (predecessor)) { predecessor->total_length += absorb; - eassert (TOTAL_LENGTH (predecessor) >= 0); + eassert (LENGTH (predecessor) > 0); predecessor = predecessor->right; } predecessor->total_length += absorb; - eassert (TOTAL_LENGTH (predecessor) >= 0); + eassert (LENGTH (predecessor) > 0); delete_interval (i); return predecessor; } @@ -1513,7 +1514,7 @@ merge_interval_left (register INTERVAL i) predecessor = INTERVAL_PARENT (predecessor); predecessor->total_length -= absorb; - eassert (TOTAL_LENGTH (predecessor) >= 0); + eassert (LENGTH (predecessor) > 0); } /* This must be the leftmost or first interval and cannot @@ -1528,6 +1529,8 @@ reproduce_interval (INTERVAL source) { register INTERVAL target = make_interval (); + eassert (LENGTH (source) > 0); + target->total_length = source->total_length; target->position = source->position; @@ -1538,6 +1541,7 @@ reproduce_interval (INTERVAL source) if (! NULL_RIGHT_CHILD (source)) set_interval_right (target, reproduce_tree (source->right, target)); + eassert (LENGTH (target) > 0); return target; } @@ -1766,7 +1770,7 @@ lookup_char_property (Lisp_Object plist, Lisp_Object prop, bool textprop) if (! NILP (fallback)) return fallback; - /* Check for alternative properties */ + /* Check for alternative properties. */ tail = Fassq (prop, Vchar_property_alias_alist); if (! NILP (tail)) { @@ -2434,7 +2438,7 @@ set_intervals_multibyte_1 (INTERVAL i, bool multi_flag, end, end_byte); } - /* Rounding to char boundaries can theoretically ake this interval + /* Rounding to char boundaries can theoretically make this interval spurious. If so, delete one child, and copy its property list to this interval. */ if (LEFT_TOTAL_LENGTH (i) + RIGHT_TOTAL_LENGTH (i) >= TOTAL_LENGTH (i)) From 28c05b699f5290d08a55e9342a5f83b41dd20a8f Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Thu, 1 May 2014 18:59:42 +0300 Subject: [PATCH 04/20] src/term.c (tty_menu_activate): A better initialization for cursor coordinates. --- src/ChangeLog | 5 +++++ src/term.c | 8 ++++---- 2 files changed, 9 insertions(+), 4 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index 85914939608..17a32a4823f 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2014-05-01 Eli Zaretskii + + * term.c (tty_menu_activate): A better initialization for cursor + coordinates. + 2014-05-01 Stefan Monnier * intervals.c: Tighten assertions. diff --git a/src/term.c b/src/term.c index 3bbb21f1589..12cd2ce8508 100644 --- a/src/term.c +++ b/src/term.c @@ -3240,7 +3240,10 @@ tty_menu_activate (tty_menu *menu, int *pane, int *selidx, /* Turn off the cursor. Otherwise it shows through the menu panes, which is ugly. */ + col = cursorX (tty); + row = cursorY (tty); tty_hide_cursor (tty); + if (buffers_num_deleted) menu->text[0][7] = ' '; onepane = menu->count == 1 && menu->submenu[0]; @@ -3378,8 +3381,6 @@ tty_menu_activate (tty_menu *menu, int *pane, int *selidx, col = cursorX (tty); row = cursorY (tty); } - else - row = -1; /* Display the help-echo message for the currently-selected menu item. */ @@ -3391,8 +3392,7 @@ tty_menu_activate (tty_menu *menu, int *pane, int *selidx, /* Move the cursor to the beginning of the current menu item, so that screen readers and other accessibility aids know where the active region is. */ - if (0 <= row) - cursor_to (sf, row, col); + cursor_to (sf, row, col); tty_hide_cursor (tty); fflush (tty->output); prev_menu_help_message = menu_help_message; From 969aabf250a052aebe981eaa5f222b55ffc8deb1 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 1 May 2014 17:57:27 -0400 Subject: [PATCH 05/20] * configure.ac (LIBPNG): Consult libpng-config for the precise form of "-lpng" to use. Fixes: debbugs:17339 --- ChangeLog | 5 +++++ configure.ac | 13 ++++++++++--- 2 files changed, 15 insertions(+), 3 deletions(-) diff --git a/ChangeLog b/ChangeLog index 1b0d403b0f4..c79e1b01976 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2014-05-01 Glenn Morris + + * configure.ac (LIBPNG): Consult libpng-config for the precise + form of "-lpng" to use. (Bug#17339) + 2014-04-29 Glenn Morris * configure.ac: Treat MirBSD as OpenBSD. (Bug#17339) diff --git a/configure.ac b/configure.ac index c51d7b03e18..5aed265849e 100644 --- a/configure.ac +++ b/configure.ac @@ -3101,8 +3101,15 @@ elif test "${HAVE_X11}" = "yes" || test "${HAVE_W32}" = "yes"; then fi if test "${HAVE_PNG}" = "yes"; then - AC_DEFINE(HAVE_PNG, 1, [Define to 1 if you have the png library (-lpng).]) - LIBPNG="-lpng -lz -lm" + AC_DEFINE(HAVE_PNG, 1, [Define to 1 if you have the png library.]) + + dnl Some systems, eg NetBSD 6, only provide eg "libpng16", not "libpng". + lpng=`libpng-config --libs 2> /dev/null` + case $lpng in + -l*) : ;; + *) lpng="-lpng" ;; + esac + LIBPNG="$lpng -lz -lm" AC_CHECK_DECL(png_longjmp, [], @@ -4976,7 +4983,7 @@ echo " Does Emacs use -lXpm? ${HAVE_XPM}" echo " Does Emacs use -ljpeg? ${HAVE_JPEG}" echo " Does Emacs use -ltiff? ${HAVE_TIFF}" echo " Does Emacs use a gif library? ${HAVE_GIF} $LIBGIF" -echo " Does Emacs use -lpng? ${HAVE_PNG}" +echo " Does Emacs use a png library? ${HAVE_PNG} $LIBPNG" echo " Does Emacs use -lrsvg-2? ${HAVE_RSVG}" echo " Does Emacs use imagemagick? ${HAVE_IMAGEMAGICK}" From d136f1846276c44fa65ec56fb62680a4026750cd Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 1 May 2014 19:55:25 -0400 Subject: [PATCH 06/20] Doc fixes * doc/misc/autotype.texi (Skeleton Language): * doc/misc/message.texi (Header Commands): * lisp/allout-widgets.el (allout-widgets-tally) (allout-decorate-item-guides): * lisp/menu-bar.el (menu-bar-positive-p): * lisp/minibuffer.el (completion-pcm-complete-word-inserts-delimiters): * lisp/cedet/ede.el (ede-project-directories, ede-check-project-directory): * lisp/cedet/semantic/ia-sb.el (semantic-ia-sb-show-doc): * lisp/cedet/semantic/tag.el (semantic-tag-in-buffer-p): * lisp/cedet/semantic/bovine/c.el (semantic-tag-abstract-p): * lisp/gnus/gnus-registry.el (gnus-registry-install-p): Doc fix. * lisp/progmodes/gdb-mi.el (gdbmi-same-start, gdbmi-is-number): * lisp/progmodes/js.el (js--inside-param-list-p) (js--inside-dojo-class-list-p, js--forward-destructuring-spec): * lisp/progmodes/prolog.el (region-exists-p): * lisp/progmodes/verilog-mode.el (verilog-scan-cache-ok-p): * lisp/textmodes/reftex-parse.el (reftex-using-biblatex-p): * lisp/url/url-parse.el (url-generic-parse-url): * src/floatfns.c (Fisnan): * src/profiler.c (Fprofiler_cpu_running_p): Doc fixes (replace `iff'). Fixes: debbugs:17309 --- doc/misc/ChangeLog | 5 +++++ doc/misc/autotype.texi | 4 ++-- doc/misc/message.texi | 5 ++--- doc/misc/semantic.texi | 2 +- lisp/ChangeLog | 14 ++++++++++++++ lisp/allout-widgets.el | 4 ++-- lisp/cedet/ChangeLog | 8 ++++++++ lisp/cedet/ede.el | 4 ++-- lisp/cedet/semantic/bovine/c.el | 2 +- lisp/cedet/semantic/ia-sb.el | 5 ++--- lisp/cedet/semantic/tag.el | 2 +- lisp/gnus/ChangeLog | 4 ++++ lisp/gnus/gnus-registry.el | 6 +++--- lisp/menu-bar.el | 2 +- lisp/minibuffer.el | 2 +- lisp/progmodes/gdb-mi.el | 4 ++-- lisp/progmodes/js.el | 6 +++--- lisp/progmodes/prolog.el | 2 +- lisp/progmodes/sh-script.el | 2 +- lisp/progmodes/verilog-mode.el | 2 +- lisp/textmodes/reftex-parse.el | 2 +- lisp/url/ChangeLog | 4 ++++ lisp/url/url-parse.el | 2 +- src/ChangeLog | 5 +++++ src/floatfns.c | 5 ++--- src/profiler.c | 2 +- 26 files changed, 71 insertions(+), 34 deletions(-) diff --git a/doc/misc/ChangeLog b/doc/misc/ChangeLog index d80a44b2db8..86ae8c99782 100644 --- a/doc/misc/ChangeLog +++ b/doc/misc/ChangeLog @@ -1,3 +1,8 @@ +2014-05-01 Glenn Morris + + * autotype.texi (Skeleton Language): + * message.texi (Header Commands): Replace `iff'. + 2014-04-22 Bastien Guerry * org.texi (Installation): Be more clear on why installing Org diff --git a/doc/misc/autotype.texi b/doc/misc/autotype.texi index ae3fa0e5870..e01a6c2f5c5 100644 --- a/doc/misc/autotype.texi +++ b/doc/misc/autotype.texi @@ -241,10 +241,10 @@ put at these places. Point is left at first @code{_} where nothing is wrapped. Indent line according to major mode. When following element is @code{_}, and there is a interregion that will be wrapped here, indent that interregion. @item @code{&} -Logical and. Iff preceding element moved point, i.e., usually inserted +Logical and. If preceding element moved point, i.e., usually inserted something, do following element. @item @code{|} -Logical xor. Iff preceding element didn't move point, i.e., usually inserted +Logical xor. If preceding element didn't move point, i.e., usually inserted nothing, do following element. @item @code{-@var{number}} Delete preceding number characters. Depends on value of diff --git a/doc/misc/message.texi b/doc/misc/message.texi index 9be8ca05620..75452aa57cf 100644 --- a/doc/misc/message.texi +++ b/doc/misc/message.texi @@ -742,9 +742,8 @@ by the @code{message-cross-post-note-function} variable. @item C-c C-f t @kindex C-c C-f t @findex message-reduce-to-to-cc -Replace contents of @samp{To} header with contents of @samp{Cc} or -@samp{Bcc} header. (Iff @samp{Cc} header is not present, @samp{Bcc} -header will be used instead.) +Replace contents of @samp{To} header with contents of @samp{Cc} +header (or the @samp{Bcc} header, if there is no @samp{Cc} header). @item C-c C-f w @kindex C-c C-f w diff --git a/doc/misc/semantic.texi b/doc/misc/semantic.texi index f9ccd034fe6..b72fb3c88cf 100644 --- a/doc/misc/semantic.texi +++ b/doc/misc/semantic.texi @@ -611,7 +611,7 @@ Emacs Lisp. It is an LALR parser suitable for complex languages. @c LocalWords: deffn deffnx defun defvar destructor's dfn diff dir @c LocalWords: doc docstring EDE EIEIO elisp emacsman emph enum @c LocalWords: eq Exp EXPANDFULL expression fn foo func funcall -@c LocalWords: ia ids iff ifinfo imenu imenus init int isearch itemx java kbd +@c LocalWords: ia ids ifinfo imenu imenus init int isearch itemx java kbd @c LocalWords: keymap keywordtable lang languagemode lexer lexing Ludlam @c LocalWords: menubar metaparent metaparents min minibuffer Misc mode's @c LocalWords: multitable NAvigaTOR noindent nomedian nonterm noselect diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 669467687d2..c4115376724 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,17 @@ +2014-05-01 Glenn Morris + + * allout-widgets.el (allout-widgets-tally) + (allout-decorate-item-guides): + * menu-bar.el (menu-bar-positive-p): + * minibuffer.el (completion-pcm-complete-word-inserts-delimiters): + * progmodes/gdb-mi.el (gdbmi-same-start, gdbmi-is-number): + * progmodes/js.el (js--inside-param-list-p) + (js--inside-dojo-class-list-p, js--forward-destructuring-spec): + * progmodes/prolog.el (region-exists-p): + * progmodes/verilog-mode.el (verilog-scan-cache-ok-p): + * textmodes/reftex-parse.el (reftex-using-biblatex-p): + Doc fixes (replace `iff'). + 2014-05-01 Stefan Monnier * mpc.el (mpc-volume-mouse-set): Don't burp at the boundaries. diff --git a/lisp/allout-widgets.el b/lisp/allout-widgets.el index 65517607980..66ec0c333a7 100644 --- a/lisp/allout-widgets.el +++ b/lisp/allout-widgets.el @@ -266,7 +266,7 @@ decreases as obsolete widgets are garbage collected." (defvar allout-widgets-tally nil "Hash-table of existing allout widgets, for debugging. -Table is maintained iff `allout-widgets-maintain-tally' is non-nil. +Table is maintained only if `allout-widgets-maintain-tally' is non-nil. The table contents will be out of sync if any widgets are created or deleted while this variable is nil.") @@ -1852,7 +1852,7 @@ In their absence, the current guide column flags are used. Optional PARENT-WIDGET is the widget for the item's parent item. -Optional HAS-SUCCESSOR is true iff the item is followed by a sibling. +Optional HAS-SUCCESSOR is true if the item is followed by a sibling. We also hide the header-prefix string. diff --git a/lisp/cedet/ChangeLog b/lisp/cedet/ChangeLog index 51339cebe60..750e0bca095 100644 --- a/lisp/cedet/ChangeLog +++ b/lisp/cedet/ChangeLog @@ -1,3 +1,11 @@ +2014-05-01 Glenn Morris + + * ede.el (ede-project-directories, ede-check-project-directory): + * semantic/ia-sb.el (semantic-ia-sb-show-doc): + * semantic/tag.el (semantic-tag-in-buffer-p): + * semantic/bovine/c.el (semantic-tag-abstract-p): + Doc fixes (replace `iff'). + 2014-04-01 Glenn Morris * ede/emacs.el (ede-emacs-version): Update AC_INIT regexp. (Bug#17160) diff --git a/lisp/cedet/ede.el b/lisp/cedet/ede.el index 70bac9aae3e..cbcc20f5039 100644 --- a/lisp/cedet/ede.el +++ b/lisp/cedet/ede.el @@ -99,7 +99,7 @@ target willing to take the file. 'never means never perform the check." If the value is t, EDE may search in any directory. If the value is a function, EDE calls that function with one -argument, the directory name; the function should return t iff +argument, the directory name; the function should return t if EDE should look for project files in the directory. Otherwise, the value should be a list of fully-expanded directory @@ -705,7 +705,7 @@ Otherwise, create a new project for DIR." "Check if DIR should be in `ede-project-directories'. If it is not, try asking the user if it should be added; if so, add it and save `ede-project-directories' via Customize. -Return nil iff DIR should not be in `ede-project-directories'." +Return nil if DIR should not be in `ede-project-directories'." (setq dir (directory-file-name (expand-file-name dir))) ; strip trailing / (or (eq ede-project-directories t) (and (functionp ede-project-directories) diff --git a/lisp/cedet/semantic/bovine/c.el b/lisp/cedet/semantic/bovine/c.el index e4f239b14a9..e9715cc1bb0 100644 --- a/lisp/cedet/semantic/bovine/c.el +++ b/lisp/cedet/semantic/bovine/c.el @@ -1594,7 +1594,7 @@ Optional PARENT and COLOR as specified with "Return non-nil if TAG is considered abstract. PARENT is tag's parent. In C, a method is abstract if it is `virtual', which is already -handled. A class is abstract iff its destructor is virtual." +handled. A class is abstract only if its destructor is virtual." (cond ((eq (semantic-tag-class tag) 'type) (require 'semantic/find) diff --git a/lisp/cedet/semantic/ia-sb.el b/lisp/cedet/semantic/ia-sb.el index f77760c4452..006e8e8259f 100644 --- a/lisp/cedet/semantic/ia-sb.el +++ b/lisp/cedet/semantic/ia-sb.el @@ -1,7 +1,6 @@ ;;; semantic/ia-sb.el --- Speedbar analysis display interactor -;;; Copyright (C) 2002-2004, 2006, 2008-2014 Free Software Foundation, -;;; Inc. +;;; Copyright (C) 2002-2004, 2006, 2008-2014 Free Software Foundation, Inc. ;; Author: Eric M. Ludlam ;; Keywords: syntax @@ -139,7 +138,7 @@ DIRECTORY is the current directory, which is ignored, and ZERO is 0." ))) (defmethod semantic-ia-sb-show-doc ((context semantic-analyze-context)) - "Show documentation about CONTEXT iff CONTEXT points at a complete symbol." + "Show documentation about CONTEXT if CONTEXT points at a complete symbol." (let ((sym (car (reverse (oref context prefix)))) (doc nil)) (when (semantic-tag-p sym) diff --git a/lisp/cedet/semantic/tag.el b/lisp/cedet/semantic/tag.el index 97fa607f9ae..31354846ec0 100644 --- a/lisp/cedet/semantic/tag.el +++ b/lisp/cedet/semantic/tag.el @@ -172,7 +172,7 @@ That function is for internal use only." (semantic--tag-set-overlay tag (vector start end))))) (defun semantic-tag-in-buffer-p (tag) - "Return the buffer TAG resides in IFF tag is already in a buffer. + "Return the buffer TAG resides in, if tag is already in a buffer. If a tag is not in a buffer, return nil." (let ((o (semantic-tag-overlay tag))) ;; TAG is currently linked to a buffer, return it. diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index cdf22ef256a..00dbf131880 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2014-05-01 Glenn Morris + + * gnus-registry.el (gnus-registry-install-p): Doc fix. + 2014-03-07 Lars Ingebrigtsen * nnimap.el (nnimap-request-accept-article): Make respooling to nnimap diff --git a/lisp/gnus/gnus-registry.el b/lisp/gnus/gnus-registry.el index 5989b8885bc..f3b81f77b50 100644 --- a/lisp/gnus/gnus-registry.el +++ b/lisp/gnus/gnus-registry.el @@ -1125,9 +1125,9 @@ only the last one's marks are returned." (add-hook 'gnus-registry-unload-hook 'gnus-registry-unload-hook) (defun gnus-registry-install-p () - "If the registry is not already enabled, and `gnus-registry-install' is t, -the registry is enabled. If `gnus-registry-install' is `ask', -the user is asked first. Returns non-nil iff the registry is enabled." + "Return non-nil if the registry is enabled (and maybe enable it first). +If the registry is not already enabled, then if `gnus-registry-install' +is `ask', ask the user; or if `gnus-registry-install' is non-nil, enable it." (interactive) (unless gnus-registry-enabled (when (if (eq gnus-registry-install 'ask) diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 84df6922749..436d8f611a8 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el @@ -922,7 +922,7 @@ by \"Save Options\" in Custom buffers.") (selected-frame))) (defun menu-bar-positive-p (val) - "Return non-nil iff VAL is a positive number." + "Return non-nil if VAL is a positive number." (and (numberp val) (> val 0))) diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index bbb7114610d..9dd4ef9fe04 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el @@ -2772,7 +2772,7 @@ expression (not containing character ranges like `a-z')." (defcustom completion-pcm-complete-word-inserts-delimiters nil "Treat the SPC or - inserted by `minibuffer-complete-word' as delimiters. -Those chars are treated as delimiters iff this variable is non-nil. +Those chars are treated as delimiters if this variable is non-nil. I.e. if non-nil, M-x SPC will just insert a \"-\" in the minibuffer, whereas if nil, it will list all possible commands in *Completions* because none of the commands start with a \"-\" or a SPC." diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el index 7f8c483ee5c..0c81a8506c0 100644 --- a/lisp/progmodes/gdb-mi.el +++ b/lisp/progmodes/gdb-mi.el @@ -1979,7 +1979,7 @@ OFFSET is the position in STR at which the comparison takes place." (string-equal match (substring str offset (+ offset match-length)))))) (defun gdbmi-same-start (str offset match) - "Return non-nil iff STR and MATCH are equal up to the end of either strings. + "Return non-nil if STR and MATCH are equal up to the end of either strings. OFFSET is the position in STR at which the comparison takes place." (let* ((str-length (- (length str) offset)) (match-length (length match)) @@ -1989,7 +1989,7 @@ OFFSET is the position in STR at which the comparison takes place." (substring match 0 compare-length))))) (defun gdbmi-is-number (character) - "Return non-nil iff CHARACTER is a numerical character between 0 and 9." + "Return non-nil if CHARACTER is a numerical character between 0 and 9." (and (>= character ?0) (<= character ?9))) diff --git a/lisp/progmodes/js.el b/lisp/progmodes/js.el index cc9ee8fe67b..5be1373213e 100644 --- a/lisp/progmodes/js.el +++ b/lisp/progmodes/js.el @@ -1302,7 +1302,7 @@ LIMIT defaults to point." (up-list -1))) (defun js--inside-param-list-p () - "Return non-nil iff point is in a function parameter list." + "Return non-nil if point is in a function parameter list." (ignore-errors (save-excursion (js--up-nearby-list) @@ -1313,7 +1313,7 @@ LIMIT defaults to point." (looking-at "function")))))))) (defun js--inside-dojo-class-list-p () - "Return non-nil iff point is in a Dojo multiple-inheritance class block." + "Return non-nil if point is in a Dojo multiple-inheritance class block." (ignore-errors (save-excursion (js--up-nearby-list) @@ -1352,7 +1352,7 @@ REGEXPS, but only if FRAMEWORK is in `js-enabled-frameworks'." (defun js--forward-destructuring-spec (&optional func) "Move forward over a JavaScript destructuring spec. If FUNC is supplied, call it with no arguments before every -variable name in the spec. Return true iff this was actually a +variable name in the spec. Return true if this was actually a spec. FUNC must preserve the match data." (pcase (char-after) (?\[ diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el index d82eea05e1c..bcac59a3ade 100644 --- a/lisp/progmodes/prolog.el +++ b/lisp/progmodes/prolog.el @@ -3228,7 +3228,7 @@ PREFIX is the prefix of the search regexp." (unless (fboundp 'region-exists-p) (defun region-exists-p () - "Non-nil iff the mark is set. Lobotomized version for Emacsen that do not provide their own." + "Non-nil if the mark is set. Lobotomized version for Emacsen that do not provide their own." (mark))) diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index 06d7a8fdffe..03c845851e2 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el @@ -2361,7 +2361,7 @@ the value thus obtained, and the result is used instead." ;; I commented this out because nobody calls it -- rms. ;;(defun sh-abbrevs (ancestor &rest list) -;; "Iff it isn't, define the current shell as abbrev table and fill that. +;; "If it isn't, define the current shell as abbrev table and fill that. ;;Abbrev table will inherit all abbrevs from ANCESTOR, which is either an abbrev ;;table or a list of (NAME1 EXPANSION1 ...). In addition it will define abbrevs ;;according to the remaining arguments NAMEi EXPANSIONi ... diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el index ee5f8cb046b..84d7c15f76c 100644 --- a/lisp/progmodes/verilog-mode.el +++ b/lisp/progmodes/verilog-mode.el @@ -3159,7 +3159,7 @@ and `verilog-scan'.") (setq verilog-scan-cache-tick nil)) (defun verilog-scan-cache-ok-p () - "Return t iff the scan cache is up to date." + "Return t if the scan cache is up to date." (or (and verilog-scan-cache-preserving (eq verilog-scan-cache-preserving (current-buffer)) verilog-scan-cache-tick) diff --git a/lisp/textmodes/reftex-parse.el b/lisp/textmodes/reftex-parse.el index 40aa31a648b..71bec89a51d 100644 --- a/lisp/textmodes/reftex-parse.el +++ b/lisp/textmodes/reftex-parse.el @@ -351,7 +351,7 @@ of master file." docstruct)) (defun reftex-using-biblatex-p () - "Return non-nil iff we are using biblatex rather than bibtex." + "Return non-nil if we are using biblatex rather than bibtex." (if (boundp 'TeX-active-styles) ;; the sophisticated AUCTeX way (member "biblatex" TeX-active-styles) diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index cb37b4511bd..da7d7325a01 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog @@ -1,3 +1,7 @@ +2014-05-01 Glenn Morris + + * url-parse.el (url-generic-parse-url): Doc fix (replace `iff'). + 2014-03-26 Juanma Barranquero * url-handlers.el (url-http-parse-response): Add autoload. diff --git a/lisp/url/url-parse.el b/lisp/url/url-parse.el index 50de84f5167..0a811297986 100644 --- a/lisp/url/url-parse.el +++ b/lisp/url/url-parse.el @@ -125,7 +125,7 @@ TARGET is the fragment identifier component (used to refer to a ATTRIBUTES is nil; this slot originally stored the attribute and value alists for IMAP URIs, but this feature was removed since it conflicts with RFC 3986. -FULLNESS is non-nil iff the hierarchical sequence component of +FULLNESS is non-nil if the hierarchical sequence component of the URL starts with two slashes, \"//\". The parser follows RFC 3986, except that it also tries to handle diff --git a/src/ChangeLog b/src/ChangeLog index 17a32a4823f..12a0cd63dc0 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2014-05-01 Glenn Morris + + * floatfns.c (Fisnan): + * profiler.c (Fprofiler_cpu_running_p): Doc fix (replace `iff'). + 2014-05-01 Eli Zaretskii * term.c (tty_menu_activate): A better initialization for cursor diff --git a/src/floatfns.c b/src/floatfns.c index ac0447ce6d6..75106a661b7 100644 --- a/src/floatfns.c +++ b/src/floatfns.c @@ -1,7 +1,6 @@ /* Primitive operations on floating point for GNU Emacs Lisp interpreter. -Copyright (C) 1988, 1993-1994, 1999, 2001-2014 Free Software Foundation, -Inc. +Copyright (C) 1988, 1993-1994, 1999, 2001-2014 Free Software Foundation, Inc. Author: Wolfgang Rupprecht (according to ack.texi) @@ -142,7 +141,7 @@ DEFUN ("tan", Ftan, Stan, 1, 1, 0, } DEFUN ("isnan", Fisnan, Sisnan, 1, 1, 0, - doc: /* Return non nil iff argument X is a NaN. */) + doc: /* Return non nil if argument X is a NaN. */) (Lisp_Object x) { CHECK_FLOAT (x); diff --git a/src/profiler.c b/src/profiler.c index 8b092dcc818..fff7c6b0ff6 100644 --- a/src/profiler.c +++ b/src/profiler.c @@ -384,7 +384,7 @@ Return non-nil if the profiler was running. */) DEFUN ("profiler-cpu-running-p", Fprofiler_cpu_running_p, Sprofiler_cpu_running_p, 0, 0, 0, - doc: /* Return non-nil iff cpu profiler is running. */) + doc: /* Return non-nil if cpu profiler is running. */) (void) { return profiler_cpu_running ? Qt : Qnil; From 157e8cfdd80c31850b70b0c286d421a1c2094e5c Mon Sep 17 00:00:00 2001 From: Leo Liu Date: Fri, 2 May 2014 19:11:35 +0800 Subject: [PATCH 07/20] * emacs-lisp/cl-macs.el (cl-deftype): Fix indentation. --- lisp/ChangeLog | 4 ++++ lisp/emacs-lisp/cl-macs.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c4115376724..7af62b0ee41 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2014-05-02 Leo Liu + + * emacs-lisp/cl-macs.el (cl-deftype): Fix indentation. + 2014-05-01 Glenn Morris * allout-widgets.el (allout-widgets-tally) diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index 1c163273b64..5640b1796c7 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -2585,7 +2585,7 @@ non-nil value, that slot cannot be set via `setf'. (defmacro cl-deftype (name arglist &rest body) "Define NAME as a new data type. The type name can then be used in `cl-typecase', `cl-check-type', etc." - (declare (debug cl-defmacro) (doc-string 3)) + (declare (debug cl-defmacro) (doc-string 3) (indent 2)) `(cl-eval-when (compile load eval) (put ',name 'cl-deftype-handler (cl-function (lambda (&cl-defs '('*) ,@arglist) ,@body))))) From a419eaa751695009cc4048b0efd97ad67bb84614 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Fri, 2 May 2014 15:28:10 +0300 Subject: [PATCH 08/20] Improve indexing in trouble-related sections of Emacs User manual. doc/emacs/trouble.texi (Lossage, DEL Does Not Delete, Stuck Recursive) (Screen Garbled, Text Garbled, After a Crash, Emergency Escape) (Bug Criteria, Understanding Bug Reporting, Checklist, Service): Improve indexing. --- doc/emacs/ChangeLog | 7 +++++++ doc/emacs/trouble.texi | 22 ++++++++++++++++++++-- 2 files changed, 27 insertions(+), 2 deletions(-) diff --git a/doc/emacs/ChangeLog b/doc/emacs/ChangeLog index 4aeac464208..a1e6dd8903f 100644 --- a/doc/emacs/ChangeLog +++ b/doc/emacs/ChangeLog @@ -1,3 +1,10 @@ +2014-05-02 Eli Zaretskii + + * trouble.texi (Lossage, DEL Does Not Delete, Stuck Recursive) + (Screen Garbled, Text Garbled, After a Crash, Emergency Escape) + (Bug Criteria, Understanding Bug Reporting, Checklist, Service): + Improve indexing. + 2014-04-29 Eli Zaretskii * trouble.texi (Quitting, DEL Does Not Delete, Emergency Escape) diff --git a/doc/emacs/trouble.texi b/doc/emacs/trouble.texi index bf7c6175dcb..f0cbbcc5721 100644 --- a/doc/emacs/trouble.texi +++ b/doc/emacs/trouble.texi @@ -135,6 +135,7 @@ facility. @node Lossage @section Dealing with Emacs Trouble +@cindex troubleshooting Emacs This section describes how to recognize and deal with situations in which Emacs does not work as you expect, such as keyboard code mixups, @@ -158,6 +159,7 @@ Emacs. @subsection If @key{DEL} Fails to Delete @cindex @key{DEL} vs @key{BACKSPACE} @cindex @key{BACKSPACE} vs @key{DEL} +@cindex @key{DEL} does not delete Every keyboard has a large key, usually labeled @key{BACKSPACE}, which is ordinarily used to erase the last character that you typed. @@ -212,6 +214,8 @@ Customization}. @node Stuck Recursive @subsection Recursive Editing Levels +@cindex stuck in recursive editing +@cindex recursive editing, cannot exit Recursive editing levels are important and useful features of Emacs, but they can seem like malfunctions if you do not understand them. @@ -225,6 +229,9 @@ top-level}. @xref{Recursive Edit}. @node Screen Garbled @subsection Garbage on the Screen +@cindex garbled display +@cindex display, incorrect +@cindex screen display, wrong If the text on a text terminal looks wrong, the first thing to do is see whether it is wrong in the buffer. Type @kbd{C-l} to redisplay @@ -242,6 +249,8 @@ bug in Emacs that appears for certain terminal types. @node Text Garbled @subsection Garbage in the Text +@cindex garbled text +@cindex buffer text garbled If @kbd{C-l} shows that the text is wrong, first type @kbd{C-h l} to see what commands you typed to produce the observed results. Then try @@ -348,6 +357,7 @@ enable them by running the shell command @samp{ulimit -c unlimited} @node After a Crash @subsection Recovery After a Crash +@cindex recovering crashed session If Emacs or the computer crashes, you can recover the files you were editing at the time of the crash from their auto-save files. To do @@ -394,6 +404,7 @@ not make a backup of its old contents. @node Emergency Escape @subsection Emergency Escape +@cindex emergency escape On text terminals, the @dfn{emergency escape} feature suspends Emacs immediately if you type @kbd{C-g} a second time before Emacs can @@ -528,6 +539,8 @@ not feel obliged to read this list before reporting a bug. @node Bug Criteria @subsection When Is There a Bug +@cindex bug criteria +@cindex what constitutes an Emacs bug If Emacs accesses an invalid memory location (``segmentation fault''), or exits with an operating system error message that @@ -580,6 +593,8 @@ with the manual, one of them must be wrong; that is a bug. @node Understanding Bug Reporting @subsection Understanding Bug Reporting +@cindex bug reporting +@cindex report an Emacs bug, how to @findex emacs-version When you decide that there is a bug, it is important to report it @@ -636,8 +651,8 @@ separate bug report for each. @node Checklist @subsection Checklist for Bug Reports - -@cindex reporting bugs +@cindex checklist before reporting a bug +@cindex bug reporting, checklist Before reporting a bug, first try to see if the problem has already been reported (@pxref{Known Problems}). @@ -1192,6 +1207,9 @@ file in the Emacs distribution. @node Service @section How To Get Help with GNU Emacs +@cindex help in using Emacs +@cindex help-gnu-emacs mailing list +@cindex gnu.emacs.help newsgroup If you need help installing, using or changing GNU Emacs, there are two ways to find it: From aed4b12d6a24698e87e48e3e677c00451fadc430 Mon Sep 17 00:00:00 2001 From: Stephen Berman Date: Fri, 2 May 2014 15:58:23 +0200 Subject: [PATCH 09/20] Extend todo item insertion UI to item editing. * calendar/todo-mode.el: Reimplement item editing to have the same basic user interface as item insertion, and make small UI and larger internal improvements to the latter. (todo-insert-item): Add reference to the Todo mode user manual to the documentation string. (todo-insert-item--basic): Rename from todo-basic-insert-item and adjust all callers. Change signature to combine diary and nonmarking arguments. Incorporate functionality of deleted item copying command and add error checking. Remove detailed descriptions of the arguments from the documentation string, since this is treated in the Todo mode user manual. (todo-copy-item, todo-edit-multiline-item) (todo-edit-done-item-comment, todo-edit-item-header) (todo-edit-item-time, todo-edit-item-date-from-calendar) (todo-edit-item-date-to-today, todo-edit-item-date-day-name) (todo-edit-item-date-year, todo-edit-item-date-month) (todo-edit-item-date-day, todo-edit-item-diary-nonmarking): Remove. (todo-edit-item): Reimplement as wrapper command for todo-edit-item--next-key and make it distinguish done and not done todo items. (todo-edit-item--text): New function, replacing old command todo-edit-item and incorporating deleted commands todo-edit-multiline-item and todo-edit-done-item-comment. (todo-edit-item--header): Rename from todo-basic-edit-item-header. Use only numeric value of prefix argument. Remove detailed descriptions of the arguments from the documentation string, since this is treated in the Todo mode user manual. (todo-edit-item--diary-inclusion): New function, replacing old command todo-edit-item-diary-inclusion and incorporating and fixing functionality of deleted command todo-edit-item-diary-nonmarking, making sure to remove todo-nondiary-marker when adding diary-nonmarking-symbol. (todo-edit-category-diary-inclusion): Make sure to delete diary-nonmarking-symbol when adding todo-nondiary-marker. (todo-edit-category-diary-nonmarking): Fix indentation. (todo-insert-item--parameters): Group diary and nonmarking parameters together. (todo-insert-item--apply-args): Adjust to signature of todo-insert-item--basic and incorporate copy parameter. Make small code improvements. (todo-insert-item--next-param): Improve prompt and adjust it to new parameter grouping. Remove obsolete code. (todo-edit-item--param-key-alist) (todo-edit-item--date-param-key-alist) (todo-edit-done-item--param-key-alist): New defconsts. (todo-edit-item--prompt): New variable. (todo-edit-item--next-key): New function. (todo-key-bindings-t): Bind "e" to todo-edit-item. Remove bindings of deleted commands. --- lisp/ChangeLog | 53 +++ lisp/calendar/todo-mode.el | 691 +++++++++++++++---------------------- 2 files changed, 327 insertions(+), 417 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7af62b0ee41..816c25cf716 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,56 @@ +2014-05-02 Stephen Berman + + * calendar/todo-mode.el: Reimplement item editing to have the same + basic user interface as item insertion, and make small UI and + larger internal improvements to the latter. + (todo-insert-item): Add reference to the Todo mode user manual to + the documentation string. + (todo-insert-item--basic): Rename from todo-basic-insert-item and + adjust all callers. Change signature to combine diary and + nonmarking arguments. Incorporate functionality of deleted item + copying command and add error checking. Remove detailed + descriptions of the arguments from the documentation string, since + this is treated in the Todo mode user manual. + (todo-copy-item, todo-edit-multiline-item) + (todo-edit-done-item-comment, todo-edit-item-header) + (todo-edit-item-time, todo-edit-item-date-from-calendar) + (todo-edit-item-date-to-today, todo-edit-item-date-day-name) + (todo-edit-item-date-year, todo-edit-item-date-month) + (todo-edit-item-date-day, todo-edit-item-diary-nonmarking): + Remove. + (todo-edit-item): Reimplement as wrapper command for + todo-edit-item--next-key and make it distinguish done and not done + todo items. + (todo-edit-item--text): New function, replacing old command + todo-edit-item and incorporating deleted commands + todo-edit-multiline-item and todo-edit-done-item-comment. + (todo-edit-item--header): Rename from todo-basic-edit-item-header. + Use only numeric value of prefix argument. Remove detailed + descriptions of the arguments from the documentation string, since + this is treated in the Todo mode user manual. + (todo-edit-item--diary-inclusion): New function, replacing old + command todo-edit-item-diary-inclusion and incorporating and fixing + functionality of deleted command todo-edit-item-diary-nonmarking, + making sure to remove todo-nondiary-marker when adding + diary-nonmarking-symbol. + (todo-edit-category-diary-inclusion): Make sure to delete + diary-nonmarking-symbol when adding todo-nondiary-marker. + (todo-edit-category-diary-nonmarking): Fix indentation. + (todo-insert-item--parameters): Group diary and nonmarking + parameters together. + (todo-insert-item--apply-args): Adjust to signature of + todo-insert-item--basic and incorporate copy parameter. + Make small code improvements. + (todo-insert-item--next-param): Improve prompt and adjust it to + new parameter grouping. Remove obsolete code. + (todo-edit-item--param-key-alist) + (todo-edit-item--date-param-key-alist) + (todo-edit-done-item--param-key-alist): New defconsts. + (todo-edit-item--prompt): New variable. + (todo-edit-item--next-key): New function. + (todo-key-bindings-t): Bind "e" to todo-edit-item. Remove + bindings of deleted commands. + 2014-05-02 Leo Liu * emacs-lisp/cl-macs.el (cl-deftype): Fix indentation. diff --git a/lisp/calendar/todo-mode.el b/lisp/calendar/todo-mode.el index 09cca201c3c..df9f379a185 100644 --- a/lisp/calendar/todo-mode.el +++ b/lisp/calendar/todo-mode.el @@ -787,7 +787,7 @@ corresponding todo file, displaying the corresponding category." (kill-buffer) (keyboard-quit))))) (save-excursion (todo-category-select)) - (when add-item (todo-basic-insert-item))) + (when add-item (todo-insert-item--basic))) (setq todo-show-first show-first) (add-to-list 'todo-visited file))))) @@ -947,7 +947,7 @@ Categories mode." (todo-category-number category) (todo-category-select) (goto-char (point-min)) - (when add-item (todo-basic-insert-item)))))) + (when add-item (todo-insert-item--basic)))))) (defun todo-next-item (&optional count) "Move point down to the beginning of the next item. @@ -1267,7 +1267,7 @@ return the new category number." (setq todo-category-number num) (todo-category-select) (when todo-add-item-if-new-category - (todo-basic-insert-item))) + (todo-insert-item--basic))) num)))) (defun todo-rename-category () @@ -1752,7 +1752,8 @@ marking of the next N items." (defvar todo-insert-item--parameters) (defun todo-insert-item (&optional arg) - "Insert a new todo item into a category. + "Choose an item insertion operation and carry it out. +This inserts a new todo item into a category. With no prefix argument ARG, add the item to the current category; with one prefix argument (`C-u'), prompt for a category @@ -1766,117 +1767,31 @@ There are a number of item insertion parameters which can be combined by entering specific keys to produce different insertion commands. After entering each key, a message shows which have already been entered and which remain available. See -`todo-basic-insert-item' for details of the parameters and their -effects." +`(todo-mode) Inserting New Items' for details of the parameters, +their associated keys and their effects." (interactive "P") (setq todo-insert-item--keys-so-far "i") (todo-insert-item--next-param nil (list arg) todo-insert-item--parameters)) -(defun todo-basic-insert-item (&optional arg diary nonmarking date-type time - region-or-here) - "Insert a new todo item into a category. -This is the function from which the generated Todo mode item -insertion commands derive. - -The generated commands have mnemonic key bindings based on the -arguments' values and their order in the command's argument list, -as follows: (1) for DIARY `d', (2) for NONMARKING `k', (3) for -DATE-TYPE either `c' for calendar or `d' for date or `n' for -weekday name, (4) for TIME `t', (5) for REGION-OR-HERE either `r' -for region or `h' for here. Sequences of these keys are appended -to the insertion prefix key `i'. Keys that allow a following -key (i.e., any but `r' or `h') must be doubled when used finally. -For example, the command bound to the key sequence `i y h' will -insert a new item with today's date, marked according to the -DIARY argument described below, and with priority according to -the HERE argument; `i y y' does the same except that the priority -is not given by HERE but by prompting. - -In command invocations, ARG is passed as a prefix argument as -follows. With no prefix argument, add the item to the current -category; with one prefix argument (`C-u'), prompt for a category -from the current todo file; with two prefix arguments (`C-u C-u'), -first prompt for a todo file, then a category in that file. If -a non-existing category is entered, ask whether to add it to the -todo file; if answered affirmatively, add the category and -insert the item there. - -The remaining arguments are set or left nil by the generated item -insertion commands; their meanings are described in the follows -paragraphs. - -When argument DIARY is non-nil, this overrides the intent of the -user option `todo-include-in-diary' for this item: if -`todo-include-in-diary' is nil, include the item in the Fancy -Diary display, and if it is non-nil, exclude the item from the -Fancy Diary display. When DIARY is nil, `todo-include-in-diary' -has its intended effect. - -When the item is included in the Fancy Diary display and the -argument NONMARKING is non-nil, this overrides the intent of the -user option `todo-diary-nonmarking' for this item: if -`todo-diary-nonmarking' is nil, append `diary-nonmarking-symbol' -to the item, and if it is non-nil, omit `diary-nonmarking-symbol'. - -The argument DATE-TYPE determines the content of the item's -mandatory date header string and how it is added: -- If DATE-TYPE is the symbol `calendar', the Calendar pops up and - when the user puts the cursor on a date and hits RET, that - date, in the format set by `calendar-date-display-form', - becomes the date in the header. -- If DATE-TYPE is a string matching the regexp - `todo-date-pattern', that string becomes the date in the - header. This case is for the command - `todo-insert-item-from-calendar' which is called from the - Calendar. -- If DATE-TYPE is the symbol `date', the header contains the date - in the format set by `calendar-date-display-form', with year, - month and day individually prompted for (month with tab - completion). -- If DATE-TYPE is the symbol `dayname' the header contains a - weekday name instead of a date, prompted for with tab - completion. -- If DATE-TYPE has any other value (including nil or none) the - header contains the current date (in the format set by - `calendar-date-display-form'). - -With non-nil argument TIME prompt for a time string, which must -match `diary-time-regexp'. Typing `' at the prompt -returns the current time, if the user option -`todo-always-add-time-string' is non-nil, otherwise the empty -string (i.e., no time string). If TIME is absent or nil, add or -omit the current time string according as -`todo-always-add-time-string' is non-nil or nil, respectively. - -The argument REGION-OR-HERE determines the source and location of -the new item: -- If the REGION-OR-HERE is the symbol `here', prompt for the text of - the new item and, if the command was invoked with point in the todo - items section of the current category, give the new item the - priority of the item at point, lowering the latter's priority and - the priority of the remaining items. If point is in the done items - section of the category, insert the new item as the first todo item - in the category. Likewise, if the command with `here' is invoked - outside of the current category, jump to the chosen category and - insert the new item as the first item in the category. -- If REGION-OR-HERE is the symbol `region', use the region of the - current buffer as the text of the new item, depending on the - value of user option `todo-use-only-highlighted-region': if - this is non-nil, then use the region only when it is - highlighted; otherwise, use the region regardless of - highlighting. An error is signalled if there is no region in - the current buffer. Prompt for the item's priority in the - category (an integer between 1 and one more than the number of - items in the category), and insert the item accordingly. -- If REGION-OR-HERE has any other value (in particular, nil or - none), prompt for the text and the item's priority, and insert - the item accordingly." +(defun todo-insert-item--basic (&optional arg diary-type date-type time where) + "Function implementing the core of `todo-insert-item'." ;; If invoked outside of Todo mode and there is not yet any Todo ;; file, initialize one. (if (null (funcall todo-files-function)) (todo-show) - (let ((region (eq region-or-here 'region)) - (here (eq region-or-here 'here))) + (let ((copy (eq where 'copy)) + (region (eq where 'region)) + (here (eq where 'here)) + diary-item) + (when copy + (cond + ((not (eq major-mode 'todo-mode)) + (user-error "You must be in Todo mode to copy a todo item")) + ((todo-done-item-p) + (user-error "You cannot copy a done item as a new todo item")) + ((looking-at "^$") + (user-error "Point must be on a todo item to copy it"))) + (setq diary-item (todo-diary-item-p))) (when region (let (use-empty-active-region) (unless (and todo-use-only-highlighted-region (use-region-p)) @@ -1899,10 +1814,10 @@ the new item: todo-default-todo-file)))))) (cat (car cat+file)) (file (cdr cat+file)) - (new-item (if region - (buffer-substring-no-properties - (region-beginning) (region-end)) - (read-from-minibuffer "Todo item: "))) + (new-item (cond (copy (todo-item-string)) + (region (buffer-substring-no-properties + (region-beginning) (region-end))) + (t (read-from-minibuffer "Todo item: ")))) (date-string (cond ((eq date-type 'date) (todo-read-date)) @@ -1941,22 +1856,26 @@ the new item: (let ((buffer-read-only nil) (called-from-outside (not (and todo-mm (equal cat ocat)))) done-only item-added) - (setq new-item - ;; Add date, time and diary marking as required. - (concat (if (not (and diary (not todo-include-in-diary))) - todo-nondiary-start - (when (and nonmarking (not todo-diary-nonmarking)) - diary-nonmarking-symbol)) - date-string (when (and time-string ; Can be empty. - (not (zerop (length - time-string)))) - (concat " " time-string)) - (when (not (and diary (not todo-include-in-diary))) - todo-nondiary-end) - " " new-item)) - ;; Indent newlines inserted by C-q C-j if nonspace char follows. - (setq new-item (replace-regexp-in-string "\\(\n\\)[^[:blank:]]" - "\n\t" new-item nil nil 1)) + (unless copy + (setq new-item + ;; Add date, time and diary marking as required. + (concat (if (not (and diary-type + (not todo-include-in-diary))) + todo-nondiary-start + (when (and (eq diary-type 'nonmarking) + (not todo-diary-nonmarking)) + diary-nonmarking-symbol)) + date-string (when (and time-string ; Can be empty. + (not (zerop (length + time-string)))) + (concat " " time-string)) + (when (not (and diary-type + (not todo-include-in-diary))) + todo-nondiary-end) + " " new-item)) + ;; Indent newlines inserted by C-q C-j if nonspace char follows. + (setq new-item (replace-regexp-in-string "\\(\n\\)[^[:blank:]]" + "\n\t" new-item nil nil 1))) (unwind-protect (progn ;; Make sure the correct category is selected. There @@ -2010,7 +1929,8 @@ the new item: ;; items are displayed in the window. (when item-added (recenter))) (todo-update-count 'todo 1) - (if (or diary todo-include-in-diary) (todo-update-count 'diary 1)) + (when (or diary-item diary-type todo-include-in-diary) + (todo-update-count 'diary 1)) (todo-update-categories-sexp)))))) (defun todo-set-date-from-calendar () @@ -2054,21 +1974,10 @@ prompt for a todo file and then for a category in it." (setq todo-date-from-calendar (calendar-date-string (calendar-cursor-to-date t) t t)) (calendar-exit) - (todo-basic-insert-item arg nil nil todo-date-from-calendar)) + (todo-insert-item--basic arg nil nil todo-date-from-calendar)) (define-key calendar-mode-map "it" 'todo-insert-item-from-calendar) -(defun todo-copy-item () - "Copy item at point and insert the copy as a new item." - (interactive) - (unless (or (todo-done-item-p) (looking-at "^$")) - (let ((copy (todo-item-string)) - (diary-item (todo-diary-item-p))) - (todo-set-item-priority copy (todo-current-category) t) - (todo-update-count 'todo 1) - (when diary-item (todo-update-count 'diary 1)) - (todo-update-categories-sexp)))) - (defun todo-delete-item () "Delete at least one item in this category. If there are marked items, delete all of these; otherwise, delete @@ -2115,64 +2024,91 @@ the item at point." (todo-prefix-overlays))) (if ov (delete-overlay ov))))) +(defvar todo-edit-item--param-key-alist) +(defvar todo-edit-done-item--param-key-alist) + (defun todo-edit-item (&optional arg) - "Edit the todo item at point. -With non-nil prefix argument ARG, include the item's date/time -header, making it also editable; otherwise, include only the item -content. - -If the item consists of only one logical line, edit it in the -minibuffer; otherwise, edit it in Todo Edit mode." + "Choose an editing operation for the current item and carry it out." (interactive "P") - (when (todo-item-string) - (let* ((opoint (point)) - (start (todo-item-start)) - (item-beg (progn - (re-search-forward - (concat todo-date-string-start todo-date-pattern - "\\( " diary-time-regexp "\\)?" - (regexp-quote todo-nondiary-end) "?") - (line-end-position) t) - (1+ (- (point) start)))) - (header (substring (todo-item-string) 0 item-beg)) - (item (if arg (todo-item-string) - (substring (todo-item-string) item-beg))) - (multiline (> (length (split-string item "\n")) 1)) - (buffer-read-only nil)) - (if multiline - (todo-edit-multiline-item) - (let ((new (concat (if arg "" header) - (read-string "Edit: " (if arg - (cons item item-beg) - (cons item 0)))))) - (when arg - (while (not (string-match (concat todo-date-string-start - todo-date-pattern) new)) - (setq new (read-from-minibuffer - "Item must start with a date: " new)))) - ;; Ensure lines following hard newlines are indented. - (setq new (replace-regexp-in-string "\\(\n\\)[^[:blank:]]" - "\n\t" new nil nil 1)) - ;; If user moved point during editing, make sure it moves back. - (goto-char opoint) - (todo-remove-item) - (todo-insert-with-overlays new) - (move-to-column item-beg)))))) + (cond ((todo-done-item-p) + (todo-edit-item--next-key todo-edit-done-item--param-key-alist)) + ((todo-item-string) + (todo-edit-item--next-key todo-edit-item--param-key-alist arg)))) -(defun todo-edit-multiline-item () - "Edit current todo item in Todo Edit mode. -Use of newlines invokes `todo-indent' to insure compliance with -the format of Diary entries." - (interactive) - (when (todo-item-string) - (let ((buf todo-edit-buffer)) - (set-window-buffer (selected-window) - (set-buffer (make-indirect-buffer (buffer-name) buf))) - (narrow-to-region (todo-item-start) (todo-item-end)) - (todo-edit-mode) - (message "%s" (substitute-command-keys - (concat "Type \\[todo-edit-quit] " - "to return to Todo mode.\n")))))) +(defun todo-edit-item--text (&optional arg) + "Function providing the text editing facilities of `todo-edit-item'." + (let* ((opoint (point)) + (start (todo-item-start)) + (end (save-excursion (todo-item-end))) + (item-beg (progn + (re-search-forward + (concat todo-date-string-start todo-date-pattern + "\\( " diary-time-regexp "\\)?" + (regexp-quote todo-nondiary-end) "?") + (line-end-position) t) + (1+ (- (point) start)))) + (include-header (eq arg 'include-header)) + (comment-edit (eq arg 'comment-edit)) + (comment-delete (eq arg 'comment-delete)) + (header-string (substring (todo-item-string) 0 item-beg)) + (item (if (or include-header comment-edit comment-delete) + (todo-item-string) + (substring (todo-item-string) item-beg))) + (multiline (> (length (split-string item "\n")) 1)) + (comment (save-excursion + (todo-item-start) + (re-search-forward + (concat " \\[" (regexp-quote todo-comment-string) + ": \\([^]]+\\)\\]") end t))) + (prompt (if comment "Edit comment: " "Enter a comment: ")) + (buffer-read-only nil)) + (cond + ((or comment-edit comment-delete) + (save-excursion + (todo-item-start) + (if (re-search-forward (concat " \\[" (regexp-quote todo-comment-string) + ": \\([^]]+\\)\\]") end t) + (if comment-delete + (when (todo-y-or-n-p "Delete comment? ") + (delete-region (match-beginning 0) (match-end 0))) + (replace-match (read-string prompt (cons (match-string 1) 1)) + nil nil nil 1)) + (if comment-delete + (user-error "There is no comment to delete") + (insert " [" todo-comment-string ": " + (prog1 (read-string prompt) + ;; If user moved point during editing, + ;; make sure it moves back. + (goto-char opoint) + (todo-item-end)) + "]"))))) + ((or multiline (eq arg 'multiline)) + (let ((buf todo-edit-buffer)) + (set-window-buffer (selected-window) + (set-buffer (make-indirect-buffer (buffer-name) buf))) + (narrow-to-region (todo-item-start) (todo-item-end)) + (todo-edit-mode) + (message "%s" (substitute-command-keys + (concat "Type \\[todo-edit-quit] " + "to return to Todo mode.\n"))))) + (t + (let ((new (concat (if include-header "" header-string) + (read-string "Edit: " (if include-header + (cons item item-beg) + (cons item 0)))))) + (when include-header + (while (not (string-match (concat todo-date-string-start + todo-date-pattern) new)) + (setq new (read-from-minibuffer + "Item must start with a date: " new)))) + ;; Ensure lines following hard newlines are indented. + (setq new (replace-regexp-in-string "\\(\n\\)[^[:blank:]]" + "\n\t" new nil nil 1)) + ;; If user moved point during editing, make sure it moves back. + (goto-char opoint) + (todo-remove-item) + (todo-insert-with-overlays new) + (move-to-column item-beg)))))) (defun todo-edit-quit () "Return from Todo Edit mode to Todo mode. @@ -2225,35 +2161,15 @@ made in the number or names of categories." (todo-category-select) (goto-char (point-min)))))) -(defun todo-basic-edit-item-header (what &optional inc) - "Function underlying commands to edit item date/time header. - -The argument WHAT (passed by invoking commands) specifies what -part of the header to edit; possible values are these symbols: -`date', to edit the year, month, and day of the date string; -`time', to edit just the time string; `calendar', to select the -date from the Calendar; `today', to set the date to today's date; -`dayname', to set the date string to the name of a day or to -change the day name; and `year', `month' or `day', to edit only -these respective parts of the date string (`day' is the number of -the given day of the month, and `month' is either the name of the -given month or its number, depending on the value of -`calendar-date-display-form'). - -The optional argument INC is a positive or negative integer -\(passed by invoking commands as a numerical prefix argument) -that in conjunction with the WHAT values `year', `month' or -`day', increments or decrements the specified date string -component by the specified number of suitable units, i.e., years, -months, or days, with automatic adjustment of the other date -string components as necessary. - -If there are marked items, apply the same edit to all of these; -otherwise, edit just the item at point." +(defun todo-edit-item--header (what &optional inc) + "Function providing header editing facilities of `todo-edit-item'." (let* ((cat (todo-current-category)) (marked (assoc cat todo-categories-with-marks)) (first t) (todo-date-from-calendar t) + ;; INC must be an integer, but users could pass it via + ;; `todo-edit-item' as e.g. `-' or `C-u'. + (inc (prefix-numeric-value inc)) (buffer-read-only nil) ndate ntime year monthname month day dayname) ; Needed by calendar-date-display-form. @@ -2372,7 +2288,8 @@ otherwise, edit just the item at point." ((or (string= omonth "*") (string= omonthname "*")) (setq dd (+ dd inc)) (if (> dd 31) - (user-error "A month cannot have more than 31 days") + (user-error + "A month cannot have more than 31 days") (number-to-string dd))) ;; Increment or decrement day by INC, ;; adjusting month and year if necessary @@ -2414,65 +2331,8 @@ otherwise, edit just the item at point." (todo-forward-item) (goto-char (point-max)))))))) -(defun todo-edit-item-header () - "Interactively edit at least the date of item's date/time header. -If user option `todo-always-add-time-string' is non-nil, also -edit item's time string." - (interactive) - (todo-basic-edit-item-header 'date) - (when todo-always-add-time-string - (todo-edit-item-time))) - -(defun todo-edit-item-time () - "Interactively edit the time string of item's date/time header." - (interactive) - (todo-basic-edit-item-header 'time)) - -(defun todo-edit-item-date-from-calendar () - "Interactively edit item's date using the Calendar." - (interactive) - (todo-basic-edit-item-header 'calendar)) - -(defun todo-edit-item-date-to-today () - "Set item's date to today's date." - (interactive) - (todo-basic-edit-item-header 'today)) - -(defun todo-edit-item-date-day-name () - "Replace item's date with the name of a day of the week." - (interactive) - (todo-basic-edit-item-header 'dayname)) - -(defun todo-edit-item-date-year (&optional inc) - "Interactively edit the year of item's date string. -With prefix argument INC a positive or negative integer, -increment or decrement the year by INC." - (interactive "p") - (todo-basic-edit-item-header 'year inc)) - -(defun todo-edit-item-date-month (&optional inc) - "Interactively edit the month of item's date string. -With prefix argument INC a positive or negative integer, -increment or decrement the month by INC." - (interactive "p") - (todo-basic-edit-item-header 'month inc)) - -(defun todo-edit-item-date-day (&optional inc) - "Interactively edit the day of the month of item's date string. -With prefix argument INC a positive or negative integer, -increment or decrement the day by INC." - (interactive "p") - (todo-basic-edit-item-header 'day inc)) - -(defun todo-edit-item-diary-inclusion () - "Change diary status of one or more todo items in this category. -That is, insert `todo-nondiary-marker' if the candidate items -lack this marking; otherwise, remove it. - -If there are marked todo items, change the diary status of all -and only these, otherwise change the diary status of the item at -point." - (interactive) +(defun todo-edit-item--diary-inclusion (&optional nonmarking) + "Function providing diary marking facilities of `todo-edit-item'." (let ((buffer-read-only) (marked (assoc (todo-current-category) todo-categories-with-marks))) @@ -2488,17 +2348,30 @@ point." (end (save-excursion (or (todo-time-string-matcher lim) (todo-date-string-matcher lim))))) - (if (looking-at (regexp-quote todo-nondiary-start)) - (progn - (replace-match "") - (search-forward todo-nondiary-end (1+ end) t) - (replace-match "") - (todo-update-count 'diary 1)) - (when end - (insert todo-nondiary-start) - (goto-char (1+ end)) - (insert todo-nondiary-end) - (todo-update-count 'diary -1))))) + (if nonmarking + (if (looking-at (regexp-quote diary-nonmarking-symbol)) + (replace-match "") + (when (looking-at (regexp-quote todo-nondiary-start)) + (save-excursion + (replace-match "") + (search-forward todo-nondiary-end (1+ end) t) + (replace-match "") + (todo-update-count 'diary 1))) + (insert diary-nonmarking-symbol)) + (if (looking-at (regexp-quote todo-nondiary-start)) + (progn + (replace-match "") + (search-forward todo-nondiary-end (1+ end) t) + (replace-match "") + (todo-update-count 'diary 1)) + (when end + (when (looking-at (regexp-quote diary-nonmarking-symbol)) + (replace-match "") + (setq end (1- end))) ; Since we deleted nonmarking symbol. + (insert todo-nondiary-start) + (goto-char (1+ end)) + (insert todo-nondiary-end) + (todo-update-count 'diary -1)))))) (unless marked (throw 'stop nil)) (todo-forward-item))))) (todo-update-categories-sexp))) @@ -2524,6 +2397,9 @@ items." (todo-date-string-matcher lim))))) (if arg (unless (looking-at (regexp-quote todo-nondiary-start)) + (when (looking-at (regexp-quote diary-nonmarking-symbol)) + (replace-match "") + (setq end (1- end))) ; Since we deleted nonmarking symbol. (insert todo-nondiary-start) (goto-char (1+ end)) (insert todo-nondiary-end)) @@ -2538,33 +2414,6 @@ items." (- todo-count diary-count)))) (todo-update-categories-sexp))))) -(defun todo-edit-item-diary-nonmarking () - "Change non-marking of one or more diary items in this category. -That is, insert `diary-nonmarking-symbol' if the candidate items -lack this marking; otherwise, remove it. - -If there are marked todo items, change the non-marking status of -all and only these, otherwise change the non-marking status of -the item at point." - (interactive) - (let ((buffer-read-only) - (marked (assoc (todo-current-category) - todo-categories-with-marks))) - (catch 'stop - (save-excursion - (when marked (goto-char (point-min))) - (while (not (eobp)) - (if (todo-done-item-p) - (throw 'stop (message "Done items cannot be edited")) - (unless (and marked (not (todo-marked-item-p))) - (todo-item-start) - (unless (looking-at (regexp-quote todo-nondiary-start)) - (if (looking-at (regexp-quote diary-nonmarking-symbol)) - (replace-match "") - (insert diary-nonmarking-symbol)))) - (unless marked (throw 'stop nil)) - (todo-forward-item))))))) - (defun todo-edit-category-diary-nonmarking (arg) "Add `diary-nonmarking-symbol' to all diary items in this category. With prefix ARG, remove `diary-nonmarking-symbol' from all diary @@ -2574,16 +2423,16 @@ items in this category." (goto-char (point-min)) (let (buffer-read-only) (catch 'stop - (while (not (eobp)) - (if (todo-done-item-p) ; We've gone too far. - (throw 'stop nil) - (unless (looking-at (regexp-quote todo-nondiary-start)) - (if arg - (when (looking-at (regexp-quote diary-nonmarking-symbol)) - (replace-match "")) - (unless (looking-at (regexp-quote diary-nonmarking-symbol)) - (insert diary-nonmarking-symbol)))) - (todo-forward-item))))))) + (while (not (eobp)) + (if (todo-done-item-p) ; We've gone too far. + (throw 'stop nil) + (unless (looking-at (regexp-quote todo-nondiary-start)) + (if arg + (when (looking-at (regexp-quote diary-nonmarking-symbol)) + (replace-match "")) + (unless (looking-at (regexp-quote diary-nonmarking-symbol)) + (insert diary-nonmarking-symbol)))) + (todo-forward-item))))))) (defun todo-set-item-priority (&optional item cat new arg) "Prompt for and set ITEM's priority in CATegory. @@ -2970,32 +2819,6 @@ visible." ;; When done items are shown, put cursor on first just done item. (when opoint (goto-char opoint))))))) -(defun todo-edit-done-item-comment (&optional arg) - "Add a comment to this done item or edit an existing comment. -With prefix ARG delete an existing comment." - (interactive "P") - (when (todo-done-item-p) - (let ((item (todo-item-string)) - (opoint (point)) - (end (save-excursion (todo-item-end))) - comment buffer-read-only) - (save-excursion - (todo-item-start) - (if (re-search-forward (concat " \\[" - (regexp-quote todo-comment-string) - ": \\([^]]+\\)\\]") end t) - (if arg - (when (todo-y-or-n-p "Delete comment? ") - (delete-region (match-beginning 0) (match-end 0))) - (setq comment (read-string "Edit comment: " - (cons (match-string 1) 1))) - (replace-match comment nil nil nil 1)) - (setq comment (read-string "Enter a comment: ")) - ;; If user moved point during editing, make sure it moves back. - (goto-char opoint) - (todo-item-end) - (insert " [" todo-comment-string ": " comment "]")))))) - (defun todo-item-undone () "Restore at least one done item to this category's todo section. Prompt for the new priority. If there are marked items, undo all @@ -5451,7 +5274,7 @@ of each other." (forward-line))))) ;; ----------------------------------------------------------------------------- -;;; Utilities for generating item insertion commands and key bindings +;;; Generating and applying item insertion and editing key sequences ;; ----------------------------------------------------------------------------- ;; Thanks to Stefan Monnier for suggesting dynamically generating item @@ -5462,7 +5285,7 @@ of each other." ;; uses dynamic binding. (defconst todo-insert-item--parameters - '((default copy) diary nonmarking (calendar date dayname) time (here region)) + '((default copy) (diary nonmarking) (calendar date dayname) time (here region)) "List of all item insertion parameters. Passed by `todo-insert-item' to `todo-insert-item--next-param' to dynamically create item insertion commands.") @@ -5527,25 +5350,20 @@ occupied by `nil'." (list (car (todo-insert-item--argsleft (todo-insert-item--this-key) todo-insert-item--argsleft))))) - (arglist (unless (= 5 (length args)) - (let ((v (make-vector 5 nil)) elt) + (arglist (unless (= 4 (length args)) + (let ((v (make-vector 4 nil)) elt) (while args (setq elt (pop args)) - (cond ((eq elt 'diary) + (cond ((memq elt '(diary nonmarking)) (aset v 0 elt)) - ((eq elt 'nonmarking) + ((memq elt '(calendar date dayname)) (aset v 1 elt)) - ((or (eq elt 'calendar) - (eq elt 'date) - (eq elt 'dayname)) - (aset v 2 elt)) ((eq elt 'time) - (aset v 3 elt)) - ((or (eq elt 'here) - (eq elt 'region)) - (aset v 4 elt)))) + (aset v 2 elt)) + ((memq elt '(copy here region)) + (aset v 3 elt)))) (append v nil))))) - (apply #'todo-basic-insert-item (nconc arg arglist)))) + (apply #'todo-insert-item--basic (nconc arg arglist)))) (defun todo-insert-item--next-param (last args argsleft) "Build item insertion command from LAST, ARGS and ARGSLEFT and call it. @@ -5554,35 +5372,31 @@ already entered and those still available." (cl-assert argsleft) (let* ((map (make-sparse-keymap)) (prompt nil) - (addprompt (lambda (k name) - (setq prompt (concat prompt - (format (concat - (if (or (eq name 'default) - (eq name 'calendar) - (eq name 'here)) - " { " " ") - "%s=>%s" - (when (or (eq name 'copy) - (eq name 'dayname) - (eq name 'region)) - " }")) - (propertize k 'face - 'todo-key-prompt) - name)))))) + (addprompt + (lambda (k name) + (setq prompt + (concat prompt + (format + (concat + (if (memq name '(default diary calendar here)) + " { " " ") + "%s=>%s" + (when (memq name '(copy nonmarking dayname region)) + " }")) + (propertize k 'face 'todo-key-prompt) + name)))))) (setq todo-insert-item--args args) (setq todo-insert-item--argsleft argsleft) (when last - (cond ((eq last 'default) - (apply #'todo-basic-insert-item (car todo-insert-item--args)) - (setq todo-insert-item--argsleft nil)) - ((eq last 'copy) - (todo-copy-item) - (setq todo-insert-item--argsleft nil)) - (t (let ((k (todo-insert-item--keyof last))) - (funcall addprompt k 'GO!) - (define-key map (todo-insert-item--keyof last) - (lambda () (interactive) - (todo-insert-item--apply-args))))))) + (if (memq last '(default copy)) + (progn + (setq todo-insert-item--argsleft nil) + (todo-insert-item--apply-args)) + (let ((k (todo-insert-item--keyof last))) + (funcall addprompt k (make-symbol (concat (symbol-name last) ":GO!"))) + (define-key map (todo-insert-item--keyof last) + (lambda () (interactive) + (todo-insert-item--apply-args)))))) (while todo-insert-item--argsleft (let ((x (car todo-insert-item--argsleft))) (setq todo-insert-item--newargsleft (cdr todo-insert-item--argsleft)) @@ -5594,14 +5408,6 @@ already entered and those still available." (lambda () (interactive) (todo-insert-item--apply-args)) (lambda () (interactive) - (when (equal "k" (todo-insert-item--this-key)) - (unless (string-match "y" todo-insert-item--keys-so-far) - (when (y-or-n-p (concat "`k' only takes effect with `y';" - " add `y'? ")) - (setq todo-insert-item--keys-so-far - (concat todo-insert-item--keys-so-far " y")) - (setq todo-insert-item--args - (nconc todo-insert-item--args (list 'diary)))))) (setq todo-insert-item--keys-so-far (concat todo-insert-item--keys-so-far " " (todo-insert-item--this-key))) @@ -5617,11 +5423,74 @@ already entered and those still available." (todo-insert-item--this-key) todo-insert-item--argsleft))))))))) (setq todo-insert-item--argsleft todo-insert-item--newargsleft)) - (when prompt (message "Enter a key (so far `%s'): %s" + (when prompt (message "Press a key (so far `%s'): %s" todo-insert-item--keys-so-far prompt)) (set-transient-map map) (setq todo-insert-item--argsleft argsleft))) +(defconst todo-edit-item--param-key-alist + '((edit . "e") + (header . "h") + (multiline . "m") + (diary . "y") + (nonmarking . "k") + (date . "d") + (time . "t")) + "Alist of item editing parameters and their keys.") + +(defconst todo-edit-item--date-param-key-alist + '((full . "f") + (calendar . "c") + (today . "a") + (dayname . "n") + (year . "y") + (month . "m") + (daynum . "d")) + "Alist of item date editing parameters and their keys.") + +(defconst todo-edit-done-item--param-key-alist + '((add/edit . "c") + (delete . "d")) + "Alist of done item comment editing parameters and their keys.") + +(defvar todo-edit-item--prompt "Press a key (so far `e'): ") + +(defun todo-edit-item--next-key (params &optional arg) + (let* ((map (make-sparse-keymap)) + (p->k (mapconcat (lambda (elt) + (format "%s=>%s" + (propertize (cdr elt) 'face + 'todo-key-prompt) + (concat (symbol-name (car elt)) + (when (memq (car elt) + '(add/edit delete)) + " comment")))) + params " ")) + (this-key (char-to-string + (read-key (concat todo-edit-item--prompt p->k)))) + (this-param (car (rassoc this-key params)))) + (pcase this-param + (`edit (todo-edit-item--text)) + (`header (todo-edit-item--text 'include-header)) + (`multiline (todo-edit-item--text 'multiline)) + (`add/edit (todo-edit-item--text 'comment-edit)) + (`delete (todo-edit-item--text 'comment-delete)) + (`diary (todo-edit-item--diary-inclusion)) + (`nonmarking (todo-edit-item--diary-inclusion 'nonmarking)) + (`date (let ((todo-edit-item--prompt "Press a key (so far `e d'): ")) + (todo-edit-item--next-key + todo-edit-item--date-param-key-alist arg))) + (`full (progn (todo-edit-item--header 'date) + (when todo-always-add-time-string + (todo-edit-item--header 'time)))) + (`calendar (todo-edit-item--header 'calendar)) + (`today (todo-edit-item--header 'today)) + (`dayname (todo-edit-item--header 'dayname)) + (`year (todo-edit-item--header 'year arg)) + (`month (todo-edit-item--header 'month arg)) + (`daynum (todo-edit-item--header 'day arg)) + (`time (todo-edit-item--header 'time))))) + ;; ----------------------------------------------------------------------------- ;;; Todo minibuffer utilities ;; ----------------------------------------------------------------------------- @@ -6322,19 +6191,7 @@ Filtered Items mode following todo (not done) items." ("Fym" todo-filter-diary-items-multifile) ("Fxx" todo-filter-regexp-items) ("Fxm" todo-filter-regexp-items-multifile) - ("ee" todo-edit-item) - ("em" todo-edit-multiline-item) - ("edt" todo-edit-item-header) - ("edc" todo-edit-item-date-from-calendar) - ("eda" todo-edit-item-date-to-today) - ("edn" todo-edit-item-date-day-name) - ("edy" todo-edit-item-date-year) - ("edm" todo-edit-item-date-month) - ("edd" todo-edit-item-date-day) - ("et" todo-edit-item-time) - ("eyy" todo-edit-item-diary-inclusion) - ("eyk" todo-edit-item-diary-nonmarking) - ("ec" todo-edit-done-item-comment) + ("e" todo-edit-item) ("d" todo-item-done) ("i" todo-insert-item) ("k" todo-delete-item) From 7bd9ce641f414853e5a2d2fe83b8cadea1a47d44 Mon Sep 17 00:00:00 2001 From: Stephen Berman Date: Fri, 2 May 2014 16:10:11 +0200 Subject: [PATCH 10/20] Add a warning and a menu. * calendar/todo-mode.el (todo-edit-file): Use display-warning. (todo-menu): Uncomment and update. --- lisp/ChangeLog | 5 ++ lisp/calendar/todo-mode.el | 142 +++++++++++++++++++++---------------- 2 files changed, 86 insertions(+), 61 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 816c25cf716..9edc7641c74 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2014-05-02 Stephen Berman + + * calendar/todo-mode.el (todo-edit-file): Use display-warning. + (todo-menu): Uncomment and update. + 2014-05-02 Stephen Berman * calendar/todo-mode.el: Reimplement item editing to have the same diff --git a/lisp/calendar/todo-mode.el b/lisp/calendar/todo-mode.el index df9f379a185..ddc3a4843c9 100644 --- a/lisp/calendar/todo-mode.el +++ b/lisp/calendar/todo-mode.el @@ -1216,9 +1216,19 @@ this command should be used with caution." (widen) (todo-edit-mode) (remove-overlays) - (message "%s" (substitute-command-keys - (concat "Type \\[todo-edit-quit] to check file format " - "validity and return to Todo mode.\n")))) + (display-warning 'todo (format "\ + +Type %s to return to Todo mode. + +This also runs a file format check and signals an error if +the format has become invalid. However, this check cannot +tell if the number of items or categories changed, which +could result in the file containing inconsistent information. +You can repair this inconsistency by invoking the command +`todo-repair-categories-sexp', but this will revert any +renumbering of the categories you have made, so you will +have to renumber them again (see `(todo-mode) Reordering +Categories')." (substitute-command-keys "\\[todo-edit-quit]")))) (defun todo-add-category (&optional file cat) "Add a new category to a todo file. @@ -6309,64 +6319,74 @@ Filtered Items mode following todo (not done) items." map) "Todo Filtered Items mode keymap.") -;; FIXME: Is it worth having a menu and if so, which commands? -;; (easy-menu-define -;; todo-menu todo-mode-map "Todo Menu" -;; '("Todo" -;; ("Navigation" -;; ["Next Item" todo-forward-item t] -;; ["Previous Item" todo-backward-item t] -;; "---" -;; ["Next Category" todo-forward-category t] -;; ["Previous Category" todo-backward-category t] -;; ["Jump to Category" todo-jump-to-category t] -;; "---" -;; ["Search Todo File" todo-search t] -;; ["Clear Highlighting on Search Matches" todo-category-done t]) -;; ("Display" -;; ["List Current Categories" todo-show-categories-table t] -;; ;; ["List Categories Alphabetically" todo-display-categories-alphabetically t] -;; ["Turn Item Highlighting on/off" todo-toggle-item-highlighting t] -;; ["Turn Item Numbering on/off" todo-toggle-prefix-numbers t] -;; ["Turn Item Time Stamp on/off" todo-toggle-item-header t] -;; ["View/Hide Done Items" todo-toggle-view-done-items t] -;; "---" -;; ["View Diary Items" todo-filter-diary-items t] -;; ["View Top Priority Items" todo-filter-top-priorities t] -;; ["View Multifile Top Priority Items" todo-filter-top-priorities-multifile t] -;; "---" -;; ["Print Category" todo-print-buffer t]) -;; ("Editing" -;; ["Insert New Item" todo-insert-item t] -;; ["Insert Item Here" todo-insert-item-here t] -;; ("More Insertion Commands") -;; ["Edit Item" todo-edit-item t] -;; ["Edit Multiline Item" todo-edit-multiline-item t] -;; ["Edit Item Header" todo-edit-item-header t] -;; ["Edit Item Date" todo-edit-item-date t] -;; ["Edit Item Time" todo-edit-item-time t] -;; "---" -;; ["Lower Item Priority" todo-lower-item-priority t] -;; ["Raise Item Priority" todo-raise-item-priority t] -;; ["Set Item Priority" todo-set-item-priority t] -;; ["Move (Recategorize) Item" todo-move-item t] -;; ["Delete Item" todo-delete-item t] -;; ["Undo Done Item" todo-item-undone t] -;; ["Mark/Unmark Item for Diary" todo-toggle-item-diary-inclusion t] -;; ["Mark/Unmark Items for Diary" todo-edit-item-diary-inclusion t] -;; ["Mark & Hide Done Item" todo-item-done t] -;; ["Archive Done Items" todo-archive-category-done-items t] -;; "---" -;; ["Add New Todo File" todo-add-file t] -;; ["Add New Category" todo-add-category t] -;; ["Delete Current Category" todo-delete-category t] -;; ["Rename Current Category" todo-rename-category t] -;; "---" -;; ["Save Todo File" todo-save t] -;; ) -;; "---" -;; ["Quit" todo-quit t] -;; )) +(easy-menu-define + todo-menu todo-mode-map "Todo Menu" + '("Todo" + ("Navigation" + ["Next Item" todo-next-item t] + ["Previous Item" todo-previous-item t] + "---" + ["Next Category" todo-forward-category t] + ["Previous Category" todo-backward-category t] + ["Jump to Another Category" todo-jump-to-category t] + "---" + ["Visit Another Todo File" todo-show t] + ["Visit Archive" todo-find-archive t] + ["Visit Filtered Items File" todo-find-filtered-items-file t] + ) + ("Editing" + ["Insert New Item" todo-insert-item t] + ["Edit Item" todo-edit-item t] + ["Lower Item Priority" todo-lower-item-priority t] + ["Raise Item Priority" todo-raise-item-priority t] + ["Set Item Priority" todo-set-item-priority t] + ["Mark/Unmark Item" todo-toggle-mark-item t] + ["Move (Recategorize) Item" todo-move-item t] + ["Delete Item" todo-delete-item t] + ["Mark and Bury Done Item" todo-item-done t] + ["Undo Done Item" todo-item-undone t] + ["Archive Done Item" todo-archive-done-item t] + "---" + ["Add New Category" todo-add-category t] + ["Rename Current Category" todo-rename-category t] + ["Delete Current Category" todo-delete-category t] + ["Move Current Category" todo-move-category t] + ["Merge Current Category" todo-merge-category t] + "---" + ["Add New Todo File" todo-add-file t] + ["Rename Todo File" todo-rename-file t] + ["Delete Todo File" todo-delete-file t] + ["Edit Todo File" todo-edit-file t] + ) + ("Searching and Item Filtering" + ["Search Todo File" todo-search t] + ["Clear Match Highlighting" todo-clear-matches t] + "---" + ["Set Top Priorities in File" todo-set-top-priorities-in-file t] + ["Set Top Priorities in Category" todo-set-top-priorities-in-category t] + ["Filter Top Priorities" todo-filter-top-priorities t] + ["Filter Multifile Top Priorities" todo-filter-top-priorities-multifile t] + ["Filter Diary Items" todo-filter-diary-items t] + ["Filter Multifile Diary Items" todo-filter-diary-items-multifile t] + ["Filter Regexp" todo-filter-regexp-items t] + ["Filter Multifile Regexp" todo-filter-regexp-items-multifile t] + ) + ("Display and Printing" + ["Show/Hide Done Items" todo-toggle-view-done-items t] + ["Show/Hide Done Items Only" todo-toggle-view-done-only t] + ["Show/Hide Item Highlighting" todo-toggle-item-highlighting t] + ["Show/Hide Item Numbering" todo-toggle-prefix-numbers t] + ["Show/Hide Item Header" todo-toggle-item-header t] + "---" + ["Display Table of Categories" todo-show-categories-table t] + "---" + ["Print Category" todo-print-buffer t] + ["Print Category to File" todo-print-buffer-to-file t] + ) + "---" + ["Save Todo File" todo-save t] + ["Quit Todo Mode" todo-quit t] + )) ;; ----------------------------------------------------------------------------- ;;; Hook functions and mode definitions From cb9af965374fd1537b1b82705642c5c03d04c4d2 Mon Sep 17 00:00:00 2001 From: Stephen Berman Date: Fri, 2 May 2014 16:17:41 +0200 Subject: [PATCH 11/20] Update, improve exposition, add cross references, fix typos. * todo-mode.texi: Update, improve exposition, add cross references, fix typos. (Inserting New Items, Editing Item Headers and Text): Rewrite to document new user interface. --- doc/misc/ChangeLog | 7 + doc/misc/todo-mode.texi | 827 ++++++++++++++++++++++++---------------- 2 files changed, 500 insertions(+), 334 deletions(-) diff --git a/doc/misc/ChangeLog b/doc/misc/ChangeLog index 86ae8c99782..68f748f595e 100644 --- a/doc/misc/ChangeLog +++ b/doc/misc/ChangeLog @@ -1,3 +1,10 @@ +2014-05-02 Stephen Berman + + * todo-mode.texi: Update, improve exposition, add cross + references, fix typos. + (Inserting New Items, Editing Item Headers and Text): Rewrite to + document new user interface. + 2014-05-01 Glenn Morris * autotype.texi (Skeleton Language): diff --git a/doc/misc/todo-mode.texi b/doc/misc/todo-mode.texi index 5a903f7dee4..3ff205865ae 100644 --- a/doc/misc/todo-mode.texi +++ b/doc/misc/todo-mode.texi @@ -188,13 +188,15 @@ diary, date and time stamps, whether it is done or still to do. @node Todo Items as Diary Entries, , Levels of Organization, Overview @section Todo Items as Diary Entries -Each todo item is also a potential diary item: if you include a todo -file in the Emacs diary file (@pxref{Fancy Diary Display,,, emacs}), the -Fancy Diary display will show those todo items that are not marked with -@code{todo-nondiary-marker}. This effectively augments the Emacs diary -with categorized diary entries. For the various options available for -making a todo item a diary entry, see @ref{Inserting New Items} and -@ref{Editing Item Headers and Text}. +You can have todo items show up in the Emacs Fancy Diary display by +including the todo file in your diary file (@pxref{Fancy Diary +Display,,, emacs}). This effectively augments the Emacs diary with +categorized diary entries. All items in an included todo file will +appear in the Fancy Diary display except for those that are marked +with @code{todo-nondiary-marker}. You can add or omit this marking +upon creating a new todo item, or you can do so by editing an existing +item, see @ref{Inserting New Items} and @ref{Editing Item Headers and +Text} for details. To ensure the proper display of todo items in the Fancy Diary display, they must have the format of diary entries, i.e., they have to begin @@ -245,20 +247,16 @@ default todo file. If you want to enter Todo mode and go directly to a specific category instead the first or current category in the current or default todo -file, use the command @code{todo-jump-to-category}; @ref{Navigation}, for -details. You can also enter Todo mode by invoking a todo item insertion -command; @ref{Inserting New Items}, for details. +file, use the command @code{todo-jump-to-category}; @ref{Navigation}, +for details. You can also enter Todo mode by invoking the command +@code{todo-insert-item}; @ref{Inserting New Items}, for details. The most convenient way to use these commands to enter Todo mode is to -define global key bindings for them in your init file. Good choices are -for @code{todo-show} and @code{todo-jump-to-category} are @kbd{C-c t} -and @kbd{C-c j}, since these commands are bound to @kbd{t} and @kbd{j}, -respectively, in Todo mode. For invoking item insertion from outside of -Todo mode, it is useful to bind @code{todo-insertion-map}, which is the -key map containing the bindings of all Todo item insertion commands, to -@kbd{C-c i}, since it is bound to @kbd{i} in Todo mode; to complete the -invocation, supply the rest of the key sequence (@pxref{Inserting New -Items}). +define global key bindings for them in your init file. Good choices +are @kbd{C-c t} for @code{todo-show}, @kbd{C-c j} for +@code{todo-jump-to-category} and @kbd{C-c i} for +@code{todo-insert-item}, since these commands are bound to @kbd{t}, +@kbd{j} and @kbd{i}, respectively, in Todo mode. You can also visit a Todo file via @code{find-file} or Dired, like any other file, and since Emacs recognizes it, the buffer will automatically @@ -297,12 +295,12 @@ for the shift key for capitalization and the raw prefix argument number key. The predefined key bindings in Todo are more or less mnemonic. As a -rule, key sequences beginning with @kbd{C} are bound to commands -applying to categories, sequences beginning with @kbd{F} apply to -(non-archive) file-level commands, and those beginning with @kbd{A} -apply to archives (a special type of Todo file; @ref{Todo Archive -Mode}). Todo commands applying to items, which constitute the majority, -are bound to lower case key sequences. +rule, key sequences beginning with @kbd{C} (capital `C', not the +control key) are bound to commands applying to categories, sequences +beginning with @kbd{F} apply to (non-archive) file-level commands, and +those beginning with @kbd{A} apply to archives (a special type of Todo +file; @ref{Todo Archive Mode}). Todo commands applying to items, +which constitute the majority, are bound to lower case key sequences. @node Navigation, Editing, Key Binding Conventions, Top @chapter Navigation @@ -315,8 +313,8 @@ commands are likely to be used frequently and repetitively, it is convenient for their key bindings to be single lower case keys, even for navigation commands applying to categories and files. -Two of the navigation commands were already mentioned in the section on -Todo mode entry points: +Two of the navigation commands were already mentioned in @ref{Todo +Mode Entry Points}: @table @kbd @@ -397,11 +395,17 @@ sections below. Editing in Todo mode means making structural or textual changes at one of the levels of organization (file, category, or item). Structural -editing includes adding, relocating and removing, textual editing includes -renaming files or categories and changing an item's content or date, or -adding certain kinds of marks or tags to items. To save changes you -make to the current todo file, type @kbd{s} (@code{todo-save}). Changes -are also saved on quitting Todo mode with @kbd{q}. +editing includes adding, relocating and removing units of information +at a level; textual editing includes renaming files or categories and +changing an item's content or date/time stamp, or adding certain kinds +of marks or tags to items. Todo mode provides commands, detailed in +the following sections, which enable you to quickly and safely make +changes to your todo lists, without having to worry about preserving +the file format. + +To save changes you make to the current todo file, +type @kbd{s} (@code{todo-save}). Changes are also saved on quitting +Todo mode with @kbd{q}. @menu * File Editing:: @@ -417,12 +421,12 @@ There are four file-level editing commands: @table @kbd @item F a -Add a new todo file (@code{todo-add-file}). This command prompts for a -name and creates the file in @code{todo-directory}, adding the +Add a new todo file (@code{todo-add-file}). This command prompts for +a name and creates the file in @code{todo-directory}, adding the @samp{.todo} extension (so you should not include the extension in the -name you enter). The command also prompts for the file's first category and, if -option @code{todo-add-item-if-new-category} is enabled (the default), -for that category's first item. +name you enter). The command also prompts for the file's first +category and, if option @code{todo-add-item-if-new-category} is +enabled (the default), for that category's first item. @item F r Rename the current todo file (@code{todo-rename-file}). If called with @@ -430,15 +434,15 @@ a prefix argument, prompt for a todo file and rename it. If the todo file has an archive (@pxref{Todo Archive Mode}) or there are corresponding filtered items files (@pxref{Todo Filtered Items Mode}), this command renames these accordingly. If there are live buffers -visiting any of these files, the command also rename them accordingly. +visiting any of these files, the command also renames them accordingly. @item F k Delete the current todo file (@code{todo-delete-file}).@footnote{The key binding of this command is mnemonic for ``kill'' to parallel the binding @kbd{k} for item deletion, since @kbd{d} is bound to another item editing command (@pxref{Done Items}).} If the todo file has an archive -(@pxref{Todo Archive Mode}), prompt whether to delete that as well. -This command also kill the buffers visiting the deleted files. +(@pxref{Todo Archive Mode}), prompt for whether to delete that as well. +This command also kills the buffers visiting the deleted files. @item F e This command (@code{todo-edit-file}) changes the buffer's major mode to @@ -458,20 +462,21 @@ text that occurs in different categories throughout the file. The other use case is to recover from a mistake, such as accidentally deleting an item, since this cannot be undone in Todo mode. -Using @kbd{C-x C-q} to quit Todo Edit mode provides a measure of safety, -since it runs a file format check, signaling an error if the format has -become invalid. However, this check cannot tell if the number of items -changed, which could result in the file containing inconsistent -information (see the cautionary note in @ref{Reordering Categories}, for -more details). For this reason @kbd{F e} should be used with caution. +Using @kbd{C-x C-q} to quit Todo Edit mode provides a measure of +safety, since it runs a file format check, signaling an error if the +format has become invalid. However, this check cannot tell if the +number of items or categories changed, which could result in the file +containing inconsistent information (see the cautionary note in +@ref{Reordering Categories}, for more details). Invoking @kbd{F e} +displays a warning to this effect. @end table @node Category Editing, Item Editing, File Editing, Editing @section Category Editing -The following commands are available for editing at the category level -(for additional category-editing commands, which are extensions of item -commands, @pxref{Editing Item Headers and Text}): +The following commands are available for editing specifically at the +category level (for two other category-editing commands, which are +extensions of item commands, @pxref{Editing Item Headers and Text}): @table @kbd @@ -519,8 +524,10 @@ category in that file. @node Item Editing, , Category Editing, Editing @section Item Editing -Todo mode provides a wide variety of commands for adding and textually -changing items, as well as for deleting and relocating items. +Todo mode provides commands for adding new items as well as textually +changing, deleting and relocating existing items. The commands and +associated options for adding and editing items, in particular, offer +you a lot of flexibility to fine-tune these operations to your needs. @menu * Inserting New Items:: @@ -531,282 +538,388 @@ changing items, as well as for deleting and relocating items. @node Inserting New Items, Editing Item Headers and Text, , Item Editing @subsection Inserting New Items -There are many commands for adding new todo items. The command names -contain the word ``insert'' instead of ``add'' and their key bindings are -sequences beginning with @kbd{i}. The motivation for this terminology is -that speaking of adding an item to a category suggests appending it to -the top or bottom, whereas you can insert an item into the category -anywhere, giving each new item any priority in the list. +To add a new todo item to a category, type @kbd{i}, which is bound to +the command @code{todo-insert-item}. @table @kbd -@item i i -This is the basic command for inserting new items into a category -(@code{todo-insert-item}). Called without a prefix argument, it prompts -for the text of the item and its priority (a number between 1 and one -more than the number of items already in the category), both of which -you enter in the minibuffer, and inserts the item into the current -category of the current todo file at the position in the list -corresponding to the priority you chose. Called with one prefix +@item i +This command is the entry point for inserting new items into a +category (@code{todo-insert-item}). It prompts for additional keys +until reaching a complete key sequence, which specifies the insertion +parameters you wish to apply (see below). It then prompts for the +text of the item, which you enter in the minibuffer.@footnote{There +are two insertion parameters that override prompting for and manually +entering the new item's text, see below.} Called with one prefix argument, it also prompts for a category, and called with two prefix -arguments, it prompts for both a file and a category from that file, and -inserts the item accordingly. Category name completion works as with -the navigation command @kbd{j}. +arguments, it prompts for both a file and a category from that file, +and inserts the item accordingly; category name completion works as +with the navigation command @kbd{j}. Finally, it inserts the item +into the current or selected category of the current or selected todo +file at the position in the list corresponding to the priority you +choose, which also depends on the insertion parameters. @end table -Each invocation of @kbd{i i} adds a header string to the item, which +@noindent +The name of this command reflects the fact that you can insert a new +item into the category at any position, giving each new item any +priority in the list, whereas speaking of adding an item to a category +suggests appending it to the top or bottom. + +In addition to its file and category, each newly inserted todo item +has a priority in the category and begins with a header string, which includes at least the current date in the same format used by @code{diary-insert-entry} (@pxref{Date Formats,,, emacs}). You can -control what other information is included in the header by customizing -the following options: +specify the priority and the content of the header string in two ways. +First, you can set the following item insertion options, which apply +on every invocation of @code{todo-insert-item}. @itemize @bullet @item -@code{todo-always-add-time-string} is for including or omitting the -current time. The time string is omitted by default. +@code{todo-default-priority} is for automatically assigning a new item +the highest or lowest priority in the category, if you do not +explicitly assign it a priority on invoking @code{todo-insert-item}. +By default, such new items are given highest priority, i.e., inserted +at the top of the list. @item -@code{todo-include-in-diary} is for specifying whether the item appears -in the Fancy Diary display by adding or omitting -@code{todo-nondiary-marker}. By default, new todo items are marked for -exclusion from the diary. +@code{todo-always-add-time-string} is for including or omitting the +current time in the new item's header. By default, this time string +is omitted. + +@item +@code{todo-include-in-diary} is for specifying whether the item +appears in the Fancy Diary display (when the todo file is included in +the Emacs diary file) by adding or omitting +@code{todo-nondiary-marker}. By default, new todo items are so +marked, thus excluded from the diary. @item @code{todo-diary-nonmarking} is for adding or omitting @code{diary-nonmarking-symbol} to items displayed in the diary, to -control whether they are marked in the calendar (@pxref{Format of Diary -File,,, emacs}). By default, todo items that are diary entries are -marked in the calendar. +control whether they are marked in the calendar (@pxref{Format of +Diary File,,, emacs}). By default, todo items that are diary entries +lack this symbol, thus are marked in the calendar. @end itemize -Instead of always adding the same header information to a new item, you -can use more specific insertion commands that let you decide what to -include in the item header each time you insert a new item. And instead -of always being prompted to choose the new item's priority, you can -invoke a command to insert it at the position (hence with the priority) -of the item at point. Finally, instead of always typing the text of the -new item in the minibuffer, you can invoke a command that makes the -selected region in an Emacs buffer automatically become the new item's -text. The following paragraphs discuss how to invoke these commands by -typing certain key sequences. +Beside setting these options, for more flexibility you can also pass +certain parameters on each invocation of @code{todo-insert-item}. +These parameters concern not only the new item's priority and header, +but also its textual content. You pass these parameters by typing a +sequence of one or more keys after the initial @kbd{i}. -There are eight parameters of item insertion in Todo mode, six -concerning the item header, and one each concerning its priority and its -text. Each unique combination of these parameters produces a different -insertion command. The command @kbd{i i} realizes one of these -combinations. For the commands that realize the remaining combinations -it is convenient to associate each parameter with a mnemonically chosen -key. Then by typing certain sequences of these keys, you complete the -insertion command invocation that realizes the specified combination. -As with @kbd{i i}, the effect of many of these commands also depends on -the values of the item insertion options mentioned above (see the -examples below). - -Here is a list of the parameters and their associated keys, in the order -in which you must type them when building a key sequence (this order -roughly reflects the order in which the corresponding parts of the item -occur in a category listing): +Here is a list of the item insertion parameters together with their +mnemonically associated keys@footnote{The non-mnemonic choice of +@kbd{i} for the parameter @samp{default} is motivated by the +convenience of repeating the @kbd{i} used to invoke +@code{todo-insert-item}.} and descriptions of their effect in +@code{todo-insert-item}: @enumerate @item -@kbd{y} for diary (non)inclusion; +@samp{default} (@kbd{i}): Prompt for the new item's priority +(a number between 1 and one more than the number of items already in +the category) and add a header string conforming to the values of the +above options. + +@samp{copy} (@kbd{p}): Make an exact copy of the item at point, +including its header string, and prompt for its priority. (This is +useful for quickly making a new todo item whose text or header you +want to differ only partly from that of an existing item: after +inserting the copy, you can quickly edit it as needed by using +operations described in the next section.) + @item -@kbd{k} for adding or omitting `diary-nonmarking-symbol'; +@samp{diary} (@kbd{y}): Override the option +@code{todo-include-in-diary}; that is, add @code{todo-nondiary-marker} +if the option is non-nil, omit this marker if the option is nil. + +@samp{nonmarking} (@kbd{k}): Override the option +@code{todo-diary-nonmarking}; that is, add +@code{diary-nonmarking-symbol} if the option is non-nil, omit this +symbol if the option is nil. Since this symbol only applies to diary +items, the new item is automatically marked as such, i.e., lacks +@code{todo-nondiary-marker}. + @item -@kbd{c} for adding the date header by clicking a date in the Emacs -calendar, or@* -@kbd{d} for interactively entering the date header as a string of year, -month and day number components in the minibuffer, or@* -@kbd{n} for interactively entering the date header as a weekday name in -the minibuffer; +@samp{calendar} (@kbd{c}): Pop up the Emacs calendar and click a date +in it to use that date in the new todo item's header. + +@samp{date} (@kbd{d}): Prompt for entering in the minibuffer +the year, month (with completion) and day number components of the +header. + +@samp{dayname} (@kbd{n}): Prompt for entering in the minibuffer +a weekday name as the date header instead of a year-month-day string. + @item -@kbd{t} for adding a time string to the header in the minibuffer -(including the empty string, which amounts to omitting the time); +@samp{time} (@kbd{t}): Prompt for entering a time string in +the minibuffer instead of automatically inserting the current time; +however, typing @key{RET} at the prompt enters the current time if +@code{todo-always-add-time-string} is non-nil, otherwise it enters the +empty string (i.e., no time string). + @item -@kbd{h} for inserting the new item in the position of the item at point -(``here''), or@* -@kbd{r} to use the text of the selected region as the item's text. +@samp{here} (@kbd{h}): Insert the new item in the position of +the item at point, pushing that and all lower items in the category +down, i.e., lowering their priority, by one. + +@samp{region} (@kbd{r}): Use the text of the selected region as the +text of the new item, and insert this in accordance with the item +insertion options and other parameters passed. If the option +`todo-use-only-highlighted-region' is non-nil, then use the region +only when it is highlighted; otherwise, use the region regardless of +highlighting. @end enumerate -Each insertion command key sequence begins (disregarding prefix -arguments) with @kbd{i}, followed by one or more of these eight keys, in -the order listed. But as you can see in the above table, since some of -the insertion parameters are mutually exclusive, they occupy only five -positions, so the complete (unprefixed) sequences are maximally six keys -long. Shorter sequences are also possible, since a parameter may be -omitted. But since the order in any key sequence is fixed, if the last -key in the sequence could be followed by another insertion key, i.e., if -the last key is not @kbd{h} or @kbd{r}, it has to be doubled to complete -the sequence, otherwise it would be interpreted as a prefix sequence -(this is why the binding for the basic item insertion command is @kbd{i -i} and not @kbd{i}). +Note that the parameters are divided into five numbered groups; within +a group, the parameters are mutually exclusive. Hence, to build a +complete insertion operation, you select at most one parameter from at +least one of these groups, by typing the corresponding key. If you +want to apply more than one parameter, you must type the corresponding +keys in the order of the numbered groups, subject to the following +constraints. -Here are some examples of item insertion command key sequences: +The keys of groups 2-4 are continuation keys, that is, each can be +followed by a key from a following group. If you want to finish the +sequence with a continuation key, you must double the final key. For +example, @kbd{i y} is not a complete key sequence; rather, you must +type @kbd{i y y}. -@itemize @bullet +By contrast, the keys of groups 1 and 5 are final keys; for example, +@kbd{i i} and @kbd{i h} are complete sequences. The reason for making +two separate groups of the final keys is that the parameters +@samp{default} and @samp{copy} cannot be combined with any other +parameters, while @samp{here} and @samp{region} can be combined with +any of the parameters from groups 2-4. -@item -@kbd{i h} inserts a new item at the position of the item at point (pushing -the latter down) with a header containing the current date and, -depending on the values of the mentioned options, possibly the current -time and diary-related markings. -@item -@kbd{i y h} does the same as the preceding command, except that -@code{todo-nondiary-marker} is added if @code{todo-include-in-diary} is -non-nil and omitted if that option is nil; that is, the diary key @kbd{y} -overrides the setting of this option. -@item -@kbd{i y t h} does the same as the preceding command, except that it -prompts for a time string instead of automatically inserting the -current time; however, typing @key{RET} at the prompt returns the -current time if @code{todo-always-add-time-string} is non-nil, otherwise -the empty string (i.e., no time string). -@item -@kbd{i y t t} does the same as the preceding command, except that it -prompts for the item's priority and inserts it accordingly. -@end itemize +To aid you in building item insertion key sequences, when you type an +insertion key, this displays a prompt in the echo area showing pairs +of the remaining possible keys and their associated parameters, +grouped and ordered in accordance with the above list. The initial +prompt, after typing @kbd{i} to invoke @code{todo-insert-item}, looks +like this: -Note that the commands whose key sequences include @kbd{y}, @kbd{k} or @kbd{t} -reverse the effect of the options @code{todo-include-in-diary}, -@code{todo-diary-nonmarking} and @code{todo-always-add-time-string}, -respectively, thus temporarily overriding their values. +@example +Press a key (so far `i'): @{ i=>default p=>copy @} @{ y=>diary k=>nonmarking @} @{ c=>calendar d=>date n=>dayname @} t=>time @{ h=>here r=>region @} +@end example -The names of the item insertion commands correspond to their key -bindings, e.g., @kbd{i h} is bound to @code{todo-insert-item-here}, @kbd{i y h} to -@code{todo-insert-item-diary-here}, etc. But since there are so many -combinations, instead of trying to memorize either the names or the key -sequences, you can, as usual, just type an initial part of a key -sequence (minimally @kbd{i}), followed by @kbd{C-h} to see the valid -completions. +@noindent If you now type @kbd{y}, the prompt changes to this: -An alternative to using the key @kbd{c} for choosing the item's date -from the calendar is also available: if point is on a date in the -calendar, typing @kbd{i t} (@code{todo-insert-item-from-calendar}) will -prompt for a new item and its priority and insert it in the current -category. Like @kbd{i i} and the other item insertion commands, this -also accepts one or two prefix arguments for choosing the category via -minibuffer completion. Note, however, that the key sequence @kbd{i t} -is not defined in Todo mode but in the Calendar mode keymap. It is a -convenient shortcut if you happen to be using the calendar when you -decide to make a new todo item. (Contrast this with a command like -@kbd{i c c}, which pops open the calendar after you have entered the -item's text, and then you can choose a date from the calendar.) +@example +Press a key (so far `i y'): y=>diary:GO! @{ c=>calendar d=>date n=>dayname @} t=>time @{ h=>here r=>region @} +@end example -There is one more item insertion command, which does not derive from the -item insertion parameters: +@noindent Notice that the pair @samp{k=>nonmarking} is now absent, since it +belongs to the same group as the selected pair @samp{y=>diary}, hence +is no longer available for this sequence. Since @kbd{y} is a +continuation key, it is still available, but now the string ":GO!" is +appended to the pair to remind you that pressing this key again will +complete the sequence. -@table @kbd -@item i p -This command (@code{todo-copy-item}) makes a complete copy of the item -at point, including its header, prompts for its priority in the current -category and inserts it accordingly. -@end table -@noindent -This command is useful for quickly adding a todo item whose text or -header you want to differ only partly from that of an existing item: -after inserting the copy, you can quickly edit it as needed by using -commands described in the next section. +@c Here are some examples of item insertion command key sequences: + +@c @itemize @bullet + +@c @item +@c @kbd{i h} inserts a new item at the position of the item at point (pushing +@c the latter down) with a header containing the current date and, +@c depending on the values of the mentioned options, possibly the current +@c time and diary-related markings. +@c @item +@c @kbd{i y h} does the same as the preceding command, except that +@c @code{todo-nondiary-marker} is added if @code{todo-include-in-diary} is +@c non-nil and omitted if that option is nil; that is, the diary key @kbd{y} +@c overrides the setting of this option. +@c @item +@c @kbd{i y t h} does the same as the preceding command, except that it +@c prompts for a time string instead of automatically inserting the +@c current time; however, typing @key{RET} at the prompt returns the +@c current time if @code{todo-always-add-time-string} is non-nil, otherwise +@c the empty string (i.e., no time string). +@c @item +@c @kbd{i y t t} does the same as the preceding command, except that it +@c prompts for the item's priority and inserts it accordingly. +@c @end itemize + + +An alternative to the key sequence @kbd{i c c} for choosing the item's +date from the calendar is also available: when point is already on a +date in the calendar, typing @kbd{i t} +(@code{todo-insert-item-from-calendar}) prompts for a new item and its +priority and inserts it in the current category. This command, like +@code{todo-insert-item}, also accepts one or two prefix arguments for +choosing the category via minibuffer completion. Note, however, that +the key sequence @kbd{i t} is not defined in Todo mode but in the +Calendar mode keymap. It is a convenient shortcut if you happen to be +using the calendar when you decide to make a new todo item. (Contrast +this with passing the @samp{calendar} parameter, which pops open the +calendar after you have entered the item's text, and then you can +choose a date from the calendar.) + @node Editing Item Headers and Text, Relocating and Removing Items, Inserting New Items, Item Editing @subsection Editing Item Headers and Text -There are a number of commands for editing an existing item's text or -header; these commands are bound to key sequences with @kbd{e}. - -There are two commands for editing an item's text (and manually editing -its header), one appropriate for short items and simple edits and one -better suited for more complex changes or for editing lengthy items: +To make changes to an existing item's content or header, type @kbd{e}, +which is bound to the command @code{todo-edit-item}. @table @kbd -@item e e -Edit the text of the current item in the minibuffer -(@code{todo-edit-item}). If called with a prefix argument (@kbd{C-u e -e}), the item's header is also included in the minibuffer and so can be -edited manually. +@item e +This command is the entry point for textually editing existing items +in a category (@code{todo-edit-item}). It prompts for additional keys +until reaching a complete key sequence, which specifies the editing +parameters you wish to apply (see below), and then executes the +editing operation accordingly. +@end table -@item e m -Edit the text of the current item in a special buffer in Todo Edit mode -(@code{todo-edit-multiline-item}). When you have finished editing, type -@kbd{C-x C-q} to return to Todo mode; this runs a format check to ensure -the item is well-formed.@footnote{Unlike the command @kbd{F e} +Here is a list of the item editing parameters together with their +mnemonically associated keys and descriptions of their effect in +@code{todo-edit-item}. The list is divided into three groups, for +reasons explained below. + +@enumerate 1 + +@item +@samp{edit} (@kbd{e}): Edit the text of the current item in the +minibuffer; the item's header is omitted. + +@samp{header} (@kbd{h}): Edit the text and header of the current item +in the minibuffer. + +@samp{multiline} (@kbd{m}): Edit the text of the current item in a +special buffer in Todo Edit mode. After editing, type @kbd{C-x C-q} +to return to Todo mode.@footnote{This runs a format check to ensure +the item is well-formed. However, unlike the command @kbd{F e} (@pxref{File Editing}), @kbd{e m} does not expose you to the risk of putting the file in an inconsistent state, since it puts only the current item in Todo Edit mode.} -@end table -A number of commands are available for interactively editing all or part -of the item header, permitting quick edits and helping avoid formatting -errors. +@samp{diary} (@kbd{y}): Change the current item's diary inclusion +status by adding @code{todo-nondiary-marker} if the item lacks this, +or by removing it if present. -The following three commands are for editing any or all of the year, -month and day components of a date header: +@samp{nonmarking} (@kbd{k}): Change the current item's calendar +marking status by adding @code{diary-nonmarking-symbol} if the item +lacks this, or by removing it if present. Since this symbol only +applies to diary items, the item is automatically marked as such, +i.e., if @code{todo-nondiary-marker} is present, it is removed. -@table @kbd +@samp{date} (@kbd{d}): Prompt for a final key from the second group +of item editing parameters to edit the current item's date string. -@item e d t -Successively prompt for changes to the date's year, month and -day number, and if the option @code{todo-always-add-time-string} is -non-nil, also for editing the time string (see also @kbd{e t} below). - -@item e d a -Change the date to today's date. - -@item e d c -This command pops up the Emacs calendar, and after you type @key{RET} on -a date in the calendar makes that date the item's date. -@end table +@samp{time} (@kbd{t}): Edit the current item's time string, if +present; otherwise, add one. Typing @key{RET} at the prompt enters +the current time if @code{todo-always-add-time-string} is non-nil, +otherwise it enters the empty string (i.e., no time string). +@end enumerate @noindent -You can also use these commands on items whose date header consists of a -weekday name, which then changes to a header with year, month and day -components. +Editing the text of a lengthy item in the minibuffer can be +inconvenient; therefore, if you type `e e' or `e h' on an item whose +text contains more than one logical line, the effect is the same as if +you had typed `e m', that is, you switch a special buffer in Todo Edit +mode. -Each of the following three commands, in contrast to the preceding -three, changes only a single date component and has no effect on a date -header consisting of a weekday name: +When you pass any of the parameters of the preceding group, except for +the @samp{date} parameter, this completes the item editing invocation +begun by typing @kbd{e}. Pressing @kbd{d} to pass the @samp{date} +parameter, however, prompts you with the following parameters and +their associated keys, and pressing any of these completes the +invocation. -@table @kbd -@item e d y -@itemx e d m -@itemx e d d -Prompt for changing just the year, month or day number, respectively; if -invoked with a positive or negative numeric prefix argument, directly -increment or decrement the date component accordingly and automatically -adjust the other date component if necessary. For example, if the date -string is ``January 1, 2013'', typing @kbd{- 3 e d d} results in -``December 29, 2012''. -@end table +@enumerate 2 -@table @kbd -@item e d n -Prompt for a weekday name and make it the item's date header. Note that -this replaces an existing date string, it does not add the day name to -the date string. +@item +@samp{full} (@kbd{f}): Successively prompt for editing the year, month +(with completion) and day number parts of the current item's date +string, and, if the option @code{todo-always-add-time-string} is +non-nil, also for editing its time string. -@item e t -Edit just the item's time string. A time string can be added both to a -date string and to a weekday name. If you type @key{RET} at the -prompt, this omits a time string from the header, or deletes an existing -time string. +@samp{calendar} (@kbd{c}): This pops up the Emacs calendar, and after +you type @key{RET} on a date in the calendar makes that date the +item's date. -@item e y y -Change the item's diary inclusion status by adding or removing -@code{todo-nondiary-marker}. +@samp{today} (@kbd{a}): Make the item's date today's date. -@item e y k -Change the item's diary marking status by adding or removing -@code{diary-nonmarking-symbol} (this command has an effect only if the -item is not marked for exclusion from the diary). -@end table +@samp{dayname} (@kbd{n}): Prompt for a weekday name (with completion) +and make it the item's date header. Note that this replaces an +existing date string, it does not add the day name to the date string. + +@samp{year} (@kbd{y}): Edit just the year component of the current +item's date string. + +@samp{month} (@kbd{m}): Edit just the month component of the current +item's date string (with completion). + +@samp{daynum} (@kbd{d}): Edit just the day number component of the +current item's date string. +@end enumerate @noindent -Parallel to the latter two item-level commands are the -following category-level commands: +With the latter three parameters you can add a positive or negative +numeric prefix argument to the invocation: this increments or +decrements the selected date component by the given number and +automatically adjusts the other date components if necessary. For +example, if the item's date string is ``January 1, 2013'', then typing +@kbd{- 3 e d d} results in ``December 29, 2012''. + +The first two groups of parameters apply only to todo items that are +not marked as done (@pxref{Done Items}); the two parameters of the +third group, in contrast, apply only to done todo items. You cannot +edit the text of such items, but you can edit or delete the comment +you may have added on marking the item as done (@pxref{Done Items, +@code{todo-item-done}},), or retroactively add a comment, by passing +either of these parameters. + +@enumerate 3 + +@item +@samp{add/edit comment} (@kbd{c}): Edit the current done item's +comment, if it has one; otherwise, prompt for and add a comment. + +@samp{delete comment} (@kbd{d}): Delete the current done item's +comment, if it has one. +@end enumerate + +The command @code{todo-edit-item} is sensitive to the distinction +between not done and done todo items. If you type @kbd{e} when point +is on a done item, this displays the following prompt in the echo +area: + +@example +Press a key (so far `e'): c=>add/edit comment d=>delete comment +@end example + +@noindent +Only by typing @kbd{c} or @kbd{d} in response to this prompt can you +complete the invocation. In contrast, if you type @kbd{e} when point +is on a non-done todo item, this displays the following prompt in the +echo area, and you can continue or complete the invocation only by +typing one of the listed keys: + +@example +Press a key (so far `e'): e=>edit h=>header m=>multiline y=>diary k=>nonmarking d=>date t=>time +@end example + +As noted above, passing the @samp{date} parameter does not complete +the invocation of @code{todo-edit-item}; rather, it displays the +following prompt, and typing any of these keys does complete the +invocation: + +@example +Press a key (so far `e d'): f=>full c=>calendar a=>today n=>dayname y=>year m=>month d=>daynum +@end example + +In addition to the item-level invocations `e y', to change the current +item's diary inclusion status, and `e k', to change the current item's +calendar marking status, Todo mode also has two related category-level +commands: @table @kbd @@ -818,6 +931,21 @@ a prefix argument, these markings are removed from all items in the category. @end table +@noindent +Like `e k', `C e k' automatically removes @code{todo-nondiary-marker} +from all items it is present on, since only diary items can bear +@code{diary-nonmarking-symbol}. + +Since categories often contain a mix of items marked for diary +inclusion and exclusion, and of the former, a mix of those to be +marked and those not to be marked in the calendar, it is more useful +for these category-level commands, unlike the item-level commands, not +to be toggles, but to have the same effect on all items in the +category, and take a prefix argument to reverse the effect. (If you +really want to toggle the diary-inclusion and calendar-marking status +of all items in the category, you can do this by marking all the items +and then invoking `e y' or `e k', @pxref{Marked Items}). + @node Relocating and Removing Items, , Editing Item Headers and Text, Item Editing @subsection Relocating and Removing Items @@ -849,10 +977,11 @@ Lower the current item's priority by one, exchanging its position in the list with that of the item directly below it (@code{todo-lower-item-priority}). @item # -Prompt for a number and relocate the item to the corresponding position -in the list (@code{todo-set-item-priority}). For example, entering -@kbd{3} at the prompt makes the item the third in the category, i.e., -gives it third highest priority. You can also pass the desired priority +Prompt for a number and relocate the item to the corresponding +position in the list (@code{todo-set-item-priority}). For example, +entering @kbd{3} at the prompt makes the item the third in the +category, i.e., gives it third highest priority; all lower priority +items are pushed down by one. You can also pass the desired priority as a numeric prefix argument, e.g., @kbd{3 #} gives the item third highest priority without prompting. (Prefix arguments have no effect with @kbd{r} or @kbd{l}.) @@ -877,7 +1006,8 @@ enter is new, then you are asked whether to add the category to the file, and if you affirm, the item is moved to the new category. @end table -You delete an item, thereby permanently removing it: +You can delete an item, thereby permanently (and, as far as Todo mode +is concerned, irrevocably) removing it from the todo file: @table @kbd @@ -918,6 +1048,7 @@ Archive Mode}). @table @kbd +@anchor{todo-item-done} @item d This command (@code{todo-item-done}) removes the todo item at point from the todo list, appends to the original header a header consisting of @@ -954,23 +1085,30 @@ this is visible, hide it again and display only the todo items section (@code{todo-toggle-view-done-only}). @end table -Three editing commands for done items are available: +Since done items are meant to be a record of your finished todo items, +you cannot apply to them the same kinds of editing operations +available to unfinished todo items. However, as explained in +@ref{Editing Item Headers and Text} and repeated below for +convenience, you can edit or delete a done item's comment, or +retroactively add a comment. You can also relocate a done item, and +you can revert its done status, making it an unfinished item again. @table @kbd @item e c -If you type this command (@code{todo-edit-done-item-comment}) when point is -on a done item that has a comment, you can edit the text of the -comment. If you invoke it with a prefix argument (@kbd{C-u e c}), the -comment is deleted on confirmation. If the done item does not have a -comment, this command allows you to add one. +Edit the current done item's comment, if it has one; otherwise, prompt +for and add a comment. + +@item e d +Delete the current done item's comment, if it has one. @item m Move the done item at point to the top of the done items section of -another category (@code{todo-move-item}). This is useful in case, after -having relocated an item to its category's done items section, you -create a category that is better suited to the content of the done item -than its current category, so you can recategorize the done item. +another category (@code{todo-move-item}). This is useful in case, +after having finished a todo item and relocated it to its category's +done items section, you create a category that is better suited to the +content of the done item than its current category; in other words, +you can retroactively recategorize the done item. @item u If you decide the done item at point is not done after all, this command @@ -1156,18 +1294,34 @@ You can also use the last two commands to mark or unmark all done items in the category, but only when only the done items section is being displayed, i.e., after invoking @kbd{C V} or @kbd{V}. -The following commands operate on marked items: @kbd{k} (deleting), @kbd{m} -(moving to another category), @kbd{d} (moving to the done items section; -note that @kbd{C-u d} adds the same comment to all marked items), @kbd{A d} -(archiving), @kbd{u} (both in Todo mode for undoing a done item and in -Todo Archive mode for unarchiving an item), as well as the commands for -editing the item header (those beginning with the prefix @kbd{e d} as well -as @kbd{e t}, @kbd{e y y} and @kbd{e y k}). The item insertion, textual editing and -priority changing commands do not operate on marked items. +The following commands operate on marked items: -If you use @kbd{m}, @kbd{d}, @kbd{A d} or @kbd{u} on multiple noncontiguous marked -items, the relocated items retain their relative order but are now -listed consecutively en bloc. +@itemize @bullet + +@item +@kbd{k} (deleting) +@item +@kbd{m} (moving to another category) +@item +@kbd{d} (moving to the done items section; note that @kbd{C-u d} adds +the same comment to all marked items) +@item +@kbd{A d} (archiving) +@item +@kbd{u} (both in Todo mode for undoing a done item and in Todo Archive +mode for unarchiving an item) +@item +the commands for editing the item header (those beginning with the +prefix @kbd{e d} as well as @kbd{e t}, @kbd{e y} and @kbd{e k}) +@end itemize + +@noindent +The item insertion, textual editing and priority changing commands do +not operate on marked items. + +If you use @kbd{m}, @kbd{d}, @kbd{A d} or @kbd{u} on multiple +noncontiguous marked items, the relocated items retain their relative +order but are now listed consecutively en bloc. You can mark both todo and done items, but note that only @kbd{m} can apply to both; other commands only affect either marked todo or marked done @@ -1177,9 +1331,9 @@ has no effect and informs you of your erroneous attempt. @node Todo Categories Mode, Searching for Items, Marked Items, Top @chapter Todo Categories Mode -It can be helpful to have a compact overview of the categories in a todo -file and the types of items it contains; Todo provides a tabular view -of this information. +It can be helpful to have a compact overview of the categories in a +todo file and the types of items it contains; the Todo package +provides a tabular view of this information. @table @kbd @@ -1251,7 +1405,7 @@ the archive category instead of the empty todo category. You can recognize such categories by their items counts in the table---all columns but the archived one have counts of zero---and in addition, their lines in the table are also distinguished from the others by a -different face. +different face (@pxref{Faces}). You can navigate around the table: @@ -1313,14 +1467,15 @@ or archive file after reordering, in subsequent sessions as well. It is important to be aware that renumbering the categories does not change the textual order of the categories in the file. This is significant if you should invoke @kbd{F e} to edit the entire file -manually and in so doing alter the number of items in a category: this -will make the item count shown in the table of categories of this file -inconsistent with the actual number. You can repair this inconsistency -by invoking the command @code{todo-repair-categories-sexp} (which lacks -a key binding, since it is meant to be a rarely needed rescue -operation). But this will revert any renumbering of the categories you -have made, so you will have to renumber them again. This is the reason -why you should exercise caution when using @kbd{F e}. +manually and in so doing alter the number of categories or the number +of items in a category: this will make the information shown in the +table of categories of this file inconsistent with its actual state. +You can repair this inconsistency by invoking the command +@code{todo-repair-categories-sexp} (which lacks a key binding, since +it is meant to be a rarely needed rescue operation). But this will +revert any renumbering of the categories you have made, so you will +have to renumber them again. This is one reason why you should +exercise caution when using @kbd{F e}. @end quotation @node Searching for Items, Todo Filtered Items Mode, Todo Categories Mode, Top @@ -1525,7 +1680,8 @@ use the values of @code{todo-top-priorities-overrides} or Aside from explicitly invoking an item filtering command to display a saved list of items filtered by a given method from given todo files, -there are two other ways to visit a saved file of filtered items: +there are two other ways to visit a saved file of filtered items. You +can invoke a command similar to `find-file': @table @kbd @item F f @@ -1533,15 +1689,13 @@ Visit a saved file of filtered items, which you choose via minibuffer completion (@code{todo-find-filtered-items-file}). @end table -@itemize @bullet -@item -As with tables of categories, by customizing @code{todo-show-first} you -can have the first invocation of @code{todo-show} for a given todo file -display the corresponding saved file of filtered items. If there is -no saved filtered items list for the file, @code{todo-show} simply -defaults to visiting the file and displaying its first category, as -usual. -@end itemize +@noindent +Alternatively, as with tables of categories, by customizing +@code{todo-show-first} you can have the first invocation of +@code{todo-show} for a given todo file display the corresponding saved +file of filtered items. If there is no saved filtered items list for +the file, @code{todo-show} simply defaults to visiting the file and +displaying its first category, as usual. The command @kbd{F k} (@pxref{File Editing}) is also available in Todo Filtered Items mode. It deletes the current filtered items file. @@ -1560,20 +1714,23 @@ You can change the appearance of Todo mode buffers in a variety of ways. @node Faces, Item Prefix, , Todo Display Features @section Faces -Each of the Todo modes uses faces to distinguish various aspects of the -display, both structural and informational. For example, the faces for -the date and time strings of todo item headers by default inherit the -attributes of the corresponding faces used by the Emacs diary; but when -the date and time of a Todo diary item (i.e., an item lacking -@code{todo-nondiary-marker}) is earlier than the current date and time, -they are displayed in a different face. In this way, you can readily -recognize diary items that have ``expired'' and act accordingly (e.g., -by tagging them as done or by updating the deadlines). +Each of the Todo modes uses faces to distinguish various aspects of +the display, both structural and informational. For example, the +faces for the date and time strings of todo item headers +(@code{todo-date} and @code{todo-time}, respectively) by default +inherit the attributes of the corresponding faces used by the Emacs +diary; but when the date and time of a Todo diary item (i.e., an item +lacking @code{todo-nondiary-marker}) is earlier than the current date +and time, they are displayed in a different face +(@code{todo-diary-expired}). In this way, you can readily recognize +diary items that have ``expired'' and act accordingly (e.g., by +tagging them as done or by updating the deadlines). -Another example of an informational face is the face used to distinguish -top priority items. A third case is the face used in Todo Categories -mode to mark rows of the table containing categories with only archived -items. +Another example of an informational face is the face used to +distinguish top priority items (@code{todo-top-priority}). A third +case is the face used in Todo Categories mode to mark rows of the +table containing categories with only archived items +(@code{todo-archived-only}). The @code{todo-faces} customization group contains a complete list of Todo mode faces and brief descriptions of their use. @@ -1607,15 +1764,16 @@ temporarily hide the item numbering: @itemx N Toggle between displaying item numbering and displaying the @code{todo-prefix} string in the current Todo file (todo, archive, or -saved virtual category of filtered items. This command also works in +saved virtual category of filtered items). (This command also works in buffers of filtered items that have not yet been written to a file.) @end table In the todo items section of each Todo mode category, the item prefix -(whether a priority number or a fixed string) of the top priority items -(determined as specified in @pxref{Filtering Items}) is displayed in a -different face from the prefix of the other items, so you see at a -glance how many items in the category are top priorities. +(whether a priority number or a fixed string) of the top priority +items (determined as specified in @pxref{Filtering Items}) is +displayed in a face (@code{todo-top-priority}) different from the face +of the prefix of non-top-priority items, so you see at a glance how +many items in the category are top priorities. @node Other Display Commands and Options, , Item Prefix, Todo Display Features @section Other Display Commands and Options @@ -1635,11 +1793,12 @@ category-file) tag is not hidden. @item F H @itemx H -Highlight the current item if unhighlighted, or remove its highlighting. -When item highlighting is enabled, it follows navigation by @kbd{n} or -@kbd{p}. If you want to have current item highlighting by default, -enable the option @code{todo-highlight-item}. @kbd{F H} or @kbd{H} will -still toggle it. +Highlight the current item (with the face @code{hl-line}) if +unhighlighted, or remove its highlighting. When item highlighting is +enabled, it follows navigation by @kbd{n} or @kbd{p}. If you want to +have current item highlighting by default, enable the option +@code{todo-highlight-item}. @kbd{F H} or @kbd{H} will still toggle +it. @end table There are two options which affect the display of items whose content is @@ -1675,7 +1834,7 @@ By default, the todo and done items sections of a todo category are visually separated by a line as wide as the window the buffer is displayed in. You can change the appearance and width of the separator by customizing @code{todo-done-separator-string}; you can also change the -face of the separator string. +face of the separator string (@code{todo-done-sep}). There are also several options for changing the appearance in Todo Categories mode and Todo Filtered Items mode, beyond those mentioned @@ -1750,7 +1909,7 @@ do so later by invoking the command @code{todo-convert-legacy-files} (there is no key binding for it, since it shouldn't be necessary to use it often). (A delicate part of the conversion concerns the customizable format of item date/time headers in the old-style; see the documentation -string of @code{todo-todo-mode-date-time-regexp} for details.) +string of @code{todo-legacy-date-time-regexp} for details.) @node GNU Free Documentation License, , Legacy Todo Mode Files, Top @appendix GNU Free Documentation License From 6f074205d30c6922db52fdf9a63b9e0467fd82c1 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Fri, 2 May 2014 12:34:03 -0700 Subject: [PATCH 12/20] Consult libpng-config more consistently. * configure.ac (edit_cflags): Move this up and to the top level, so that PNG_CFLAGS can use it too. (PNG_CFLAGS): New var. (png_longjmp): Use PNG_CFLAGS when checking. (LIBPNG): Be consistent about -lpng16 etc; e.g., don't use -lpng16 in some places and -lpng in others. Test libpng-config's exit status. If it succeeds, use its output rather than appending -lz -lm. * src/Makefile.in (PNG_CFLAGS): New var. (ALL_CFLAGS): Use it. * src/image.c [HAVE_PNG]: Don't worry about , as CFLAGS now handles this. Fixes: debbugs:17339 --- ChangeLog | 11 ++++++ configure.ac | 97 +++++++++++++++++++++++-------------------------- src/ChangeLog | 8 ++++ src/Makefile.in | 2 + src/image.c | 4 -- 5 files changed, 66 insertions(+), 56 deletions(-) diff --git a/ChangeLog b/ChangeLog index c79e1b01976..5b583849bd7 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,14 @@ +2014-05-02 Paul Eggert + + Consult libpng-config more consistently (Bug#17339). + * configure.ac (edit_cflags): Move this up and to the top level, + so that PNG_CFLAGS can use it too. + (PNG_CFLAGS): New var. + (png_longjmp): Use PNG_CFLAGS when checking. + (LIBPNG): Be consistent about -lpng16 etc; e.g., don't use -lpng16 + in some places and -lpng in others. Test libpng-config's exit + status. If it succeeds, use its output rather than appending -lz -lm. + 2014-05-01 Glenn Morris * configure.ac (LIBPNG): Consult libpng-config for the precise diff --git a/configure.ac b/configure.ac index 5aed265849e..ee4826f1574 100644 --- a/configure.ac +++ b/configure.ac @@ -897,6 +897,12 @@ else AC_SUBST([GNULIB_WARN_CFLAGS]) fi +edit_cflags=" + s,///*,/,g + s/^/ / + s/ -I/ $isystem/g + s/^ // +" dnl Some other nice autoconf tests. @@ -1340,12 +1346,6 @@ AC_DEFUN([PKG_CHECK_MODULES], [ if "$PKG_CONFIG" --exists "$2" 2>&AS_MESSAGE_LOG_FD && $1_CFLAGS=`"$PKG_CONFIG" --cflags "$2" 2>&AS_MESSAGE_LOG_FD` && $1_LIBS=`"$PKG_CONFIG" --libs "$2" 2>&AS_MESSAGE_LOG_FD`; then - edit_cflags=" - s,///*,/,g - s/^/ / - s/ -I/ $isystem/g - s/^ // - " $1_CFLAGS=`AS_ECHO(["$$1_CFLAGS"]) | sed -e "$edit_cflags"` $1_LIBS=`AS_ECHO(["$$1_LIBS"]) | sed -e 's,///*,/,g'` AC_MSG_RESULT([yes CFLAGS='$$1_CFLAGS' LIBS='$$1_LIBS']) @@ -3070,62 +3070,55 @@ AC_SUBST(LIBJPEG) ### mingw32 doesn't use -lpng, since it loads the library dynamically. HAVE_PNG=no LIBPNG= +PNG_CFLAGS= if test "${opsys}" = "mingw32"; then if test "${with_png}" != "no"; then - AC_CHECK_HEADER(png.h, HAVE_PNG=yes, HAVE_PNG=no) - fi - if test "${HAVE_PNG}" = "yes"; then - AC_DEFINE(HAVE_PNG, 1, [Define to 1 if you have the png library (-lpng).]) - - AC_CHECK_DECL(png_longjmp, - [], - [AC_DEFINE(PNG_DEPSTRUCT, [], - [Define to empty to suppress deprecation warnings when building - with --enable-gcc-warnings and with libpng versions before 1.5, - which lack png_longjmp.])], - [[#ifdef HAVE_LIBPNG_PNG_H - # include - #else - # include - #endif - ]]) + AC_CHECK_HEADER([png.h], [HAVE_PNG=yes]) fi elif test "${HAVE_X11}" = "yes" || test "${HAVE_W32}" = "yes"; then if test "${with_png}" != "no"; then - # Debian unstable as of July 2003 has multiple libpngs, and puts png.h - # in /usr/include/libpng. - AC_CHECK_HEADERS(png.h libpng/png.h, break) - if test "$ac_cv_header_png_h" = yes || test "$ac_cv_header_libpng_png_h" = yes ; then - AC_CHECK_LIB(png, png_get_channels, HAVE_PNG=yes, , -lz -lm) + + dnl NetBSD 6 provides libpng16, not libpng. + if png_cflags=`(libpng-config --cflags) 2>&AS_MESSAGE_LOG_FD` && + png_libs=`(libpng-config --libs) 2>&AS_MESSAGE_LOG_FD` + then + HAVE_PNG=yes + PNG_CFLAGS=`AS_ECHO(["$png_cflags"]) | sed -e "$edit_cflags"` + LIBPNG=$png_libs + else + # libpng-config does not work; configure it by hand. + # Debian unstable as of July 2003 has multiple libpngs, and puts png.h + # in /usr/include/libpng. + AC_CHECK_HEADERS([png.h libpng/png.h], + [AC_CHECK_LIB([png], [png_get_channels], + [HAVE_PNG=yes + LIBPNG='-lpng -lz -lm' + if test "$ac_cv_header_libpng_png_h" = yes; then + PNG_CFLAGS=-I/usr/include/libpng + fi], + [], + [-lz -lm]) + break]) fi fi +fi +if test $HAVE_PNG = yes; then + AC_DEFINE([HAVE_PNG], [1], [Define to 1 if you have the png library.]) - if test "${HAVE_PNG}" = "yes"; then - AC_DEFINE(HAVE_PNG, 1, [Define to 1 if you have the png library.]) - - dnl Some systems, eg NetBSD 6, only provide eg "libpng16", not "libpng". - lpng=`libpng-config --libs 2> /dev/null` - case $lpng in - -l*) : ;; - *) lpng="-lpng" ;; - esac - LIBPNG="$lpng -lz -lm" - - AC_CHECK_DECL(png_longjmp, - [], - [AC_DEFINE(PNG_DEPSTRUCT, [], - [Define to empty to suppress deprecation warnings when building - with --enable-gcc-warnings and with libpng versions before 1.5, - which lack png_longjmp.])], - [[#ifdef HAVE_LIBPNG_PNG_H - # include - #else - # include - #endif - ]]) - fi + SAVE_CFLAGS=$CFLAGS + CFLAGS="$CFLAGS $PNG_CFLAGS" + AC_CHECK_DECL([png_longjmp], + [], + [AC_DEFINE([PNG_DEPSTRUCT], [], + [Define to empty to suppress deprecation warnings when building + with --enable-gcc-warnings and with libpng versions before 1.5, + which lack png_longjmp.])], + [[#include + ]]) + CFLAGS=$SAVE_CFLAGS fi AC_SUBST(LIBPNG) +AC_SUBST(PNG_CFLAGS) HAVE_ZLIB=no LIBZ= diff --git a/src/ChangeLog b/src/ChangeLog index 12a0cd63dc0..29fb2dd1edf 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,11 @@ +2014-05-02 Paul Eggert + + Consult libpng-config more consistently (Bug#17339). + * Makefile.in (PNG_CFLAGS): New var. + (ALL_CFLAGS): Use it. + * image.c [HAVE_PNG]: Don't worry about , as + CFLAGS now handles this. + 2014-05-01 Glenn Morris * floatfns.c (Fisnan): diff --git a/src/Makefile.in b/src/Makefile.in index 388923596c9..c35e38bb290 100644 --- a/src/Makefile.in +++ b/src/Makefile.in @@ -77,6 +77,7 @@ C_SWITCH_MACHINE=@C_SWITCH_MACHINE@ C_SWITCH_SYSTEM=@C_SWITCH_SYSTEM@ GNUSTEP_CFLAGS=@GNUSTEP_CFLAGS@ +PNG_CFLAGS=@PNG_CFLAGS@ ## Define C_SWITCH_X_SITE to contain any special flags your compiler ## may need to deal with X Windows. For instance, if you've defined @@ -325,6 +326,7 @@ ALL_CFLAGS=-Demacs $(MYCPPFLAGS) -I. -I$(srcdir) \ -I$(lib) -I$(srcdir)/../lib \ $(C_SWITCH_MACHINE) $(C_SWITCH_SYSTEM) $(C_SWITCH_X_SITE) \ $(GNUSTEP_CFLAGS) $(CFLAGS_SOUND) $(RSVG_CFLAGS) $(IMAGEMAGICK_CFLAGS) \ + $(PNG_CFLAGS) \ $(LIBXML2_CFLAGS) $(DBUS_CFLAGS) $(XRANDR_CFLAGS) $(XINERAMA_CFLAGS) \ $(SETTINGS_CFLAGS) $(FREETYPE_CFLAGS) $(FONTCONFIG_CFLAGS) \ $(LIBOTF_CFLAGS) $(M17N_FLT_CFLAGS) $(DEPFLAGS) \ diff --git a/src/image.c b/src/image.c index 4133aaa7621..dcbe5942b32 100644 --- a/src/image.c +++ b/src/image.c @@ -22,12 +22,8 @@ along with GNU Emacs. If not, see . */ #include #ifdef HAVE_PNG -#if defined HAVE_LIBPNG_PNG_H -# include -#else # include #endif -#endif #include #include From 283d38edc96eb5e764ccc094d6affaef9e9d2c95 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 2 May 2014 15:45:17 -0400 Subject: [PATCH 13/20] admin/make-tarball.txt: Misc small updates/edits --- admin/make-tarball.txt | 75 +++++++++++++++++++++++------------------- 1 file changed, 41 insertions(+), 34 deletions(-) diff --git a/admin/make-tarball.txt b/admin/make-tarball.txt index 50183f75561..a2e8a9e7da3 100644 --- a/admin/make-tarball.txt +++ b/admin/make-tarball.txt @@ -5,6 +5,11 @@ Instructions to create pretest or release tarballs. -*- coding: utf-8 -*- Steps to take before starting on the first pretest in any release sequence: +0. The release branch (e.g. emacs-24) should already have been made + and you should use it for all that follows. Diffs from this + branch should be going to the emacs-diffs mailing list (see + admin/notes/bzr section on bzr-email plugin). + 1. Decide on versions of automake and autoconf, and ensure you will have them available for the duration of the release process. @@ -14,17 +19,15 @@ Steps to take before starting on the first pretest in any release sequence: when preparing the first pretest for a major Emacs release.) Commit cus-edit.el if changed. +3. Remove any old pretests from ftp://alpha.gnu.org/gnu/emacs/pretest. + You can use `gnupload --delete' (see below for more gnupload details). General steps (for each step, check for possible errors): 1. `bzr update' (for a bound branch), or `bzr pull'. bzr status # check for locally modified files -2. Bootstrap to make 100% sure all elc files are up-to-date, and to - make sure that the later tagged version will bootstrap, should it be - necessary to check it out. - -3. Regenerate the etc/AUTHORS file: +2. Regenerate the etc/AUTHORS file: M-: (require 'authors) RET M-x authors RET @@ -39,7 +42,7 @@ General steps (for each step, check for possible errors): authors-ambiguous-files or authors-aliases, and repeat. Commit any fixes to ChangeLogs or authors.el. -4. Set the version number (M-x load-file RET admin/admin.el RET, then +3. Set the version number (M-x load-file RET admin/admin.el RET, then M-x set-version RET). For a release, add released ChangeLog entries (M-x add-release-logs RET). @@ -54,31 +57,37 @@ General steps (for each step, check for possible errors): emacs-XX.Y-rc1.tar. If all goes well in the following week, you can simply rename the file and use it for the actual release. -5. autoreconf -i -I m4 --force +4. autoreconf -i -I m4 --force make bootstrap make -C etc/refcards make -C etc/refcards clean -6. Copy lisp/loaddefs.el to lisp/ldefs-boot.el. +5. Copy lisp/loaddefs.el to lisp/ldefs-boot.el. Commit etc/AUTHORS, lisp/ldefs-boot.el, and the files changed - by M-x set-version. + by M-x set-version. Use a commit log message that bzrmerge.el + will ignore (eg "Bump version..."). For a release, also commit the ChangeLog files in all directories. -7. ./make-dist --snapshot --no-compress + If someone else made a commit between step 1 and now, + you need to repeat from step 4 onwards. (You can commit the files + from step 2 and 3 earlier to reduce the chance of this.) - Check the contents of the new tar with - admin/diff-tar-files against an older tar file. Some old pretest - tarballs may be found at ; - old release tarballs are at . +6. ./make-dist --snapshot --no-compress + + Check the contents of the new tar with admin/diff-tar-files + against the previous release (if this is the first pretest) or the + previous pretest. If you did not make the previous pretest + yourself, find it at . + Releases are of course at . If this is the first pretest of a major release, just comparing with the previous release may overlook many new files. You can try something like `find . | sort' in a clean bzr tree, and compare the results against the new tar contents. -8. tar -xf emacs-NEW.tar; cd emacs-NEW +7. tar -xf emacs-NEW.tar; cd emacs-NEW ./configure --prefix=/tmp/emacs && make && make install Use `script' or M-x compile to save the compilation log in compile-NEW.log and compare it against an old one. The easiest way @@ -87,25 +96,21 @@ General steps (for each step, check for possible errors): M-x ediff. Especially check that Info files aren't built, and that no autotools (autoconf etc) run. -9. cd EMACS_ROOT_DIR && bzr tag TAG +8. cd EMACS_ROOT_DIR && bzr tag TAG TAG is emacs-XX.Y.ZZ for a pretest, emacs-XX.Y for a release. - Shortly before the release, cut the version branch also, and open - a Savannah support request asking for commits to the new branch to - be sent to the emacs-diffs mailing list (by default, the list - normally only gets commits to the trunk). - -10. Decide what compression schemes to offer. +9. Decide what compression schemes to offer. For a release, at least gz and xz: gzip --best -c emacs-NEW.tar > emacs-NEW.tar.gz xz -c emacs-NEW.tar > emacs-NEW.tar.xz + For pretests, just xz is probably fine (saves bandwidth). Now you should upload the files to the GNU ftp server. In order to do that, you must be registered as an Emacs maintainer and have your GPG key acknowledged by the ftp people. For instructions, see http://www.gnu.org/prep/maintain/html_node/Automated-Upload-Registration.html - The simplest method is to use the gnulib - script "build-aux/gnupload" to upload each FILE, like this: + The simplest method to upload is to use the gnulib + script "build-aux/gnupload": For a pretest: gnupload [--user your@gpg.key.email] --to alpha.gnu.org:emacs/pretest \ @@ -136,19 +141,21 @@ General steps (for each step, check for possible errors): For a pretest, place the files in /incoming/alpha instead, so that they appear on ftp://alpha.gnu.org/. -11. After five minutes, verify that the files are visible at +10. After five minutes, verify that the files are visible at ftp://alpha.gnu.org/gnu/emacs/pretest/ for a pretest, or ftp://ftp.gnu.org/gnu/emacs/ for a release. Download them and check the signatures. Check they build. -12. For a pretest, announce it on emacs-devel and info-gnu-emacs@gnu.org. - Probably should also include the platform-testers list: - https://lists.gnu.org/mailman/listinfo/platform-testers - For a release, also announce it on info-gnu@gnu.org. (Probably - bcc the info- addresses to make it less likely that people will - followup on those lists.) +11. Send an announcement to: emacs-devel, and bcc: info-gnu-emacs@gnu.org. + For a pretest, also bcc: platform-testers@gnu.org. + (The reason for using bcc: is to make it less likely that people + will followup on the wrong list.) + See the info-gnu-emacs mailing list archives for the form + of past announcements. The first pretest announcement, and the + release announcement, should have more detail. -13. For a release, update the Emacs homepage in the web repository. - Also add the new NEWS file as NEWS.xx.y. - Maybe regenerate the html manuals, update the FAQ, etc, etc. +12. For a release, update the Emacs homepage in the web repository. + Also update history.html, and add the new NEWS file as NEWS.xx.y. + Regenerate the html manuals (use make-manuals from admin.el). + If there are new manuals, add appropriate index pages. From e6cf6ca050891610596a559a2fb707570c4c1fe5 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Fri, 2 May 2014 22:27:46 -0400 Subject: [PATCH 14/20] * lisp/vc/ediff-diff.el (ediff-set-fine-diff-properties-in-one-buffer): Use nil rather than `default' for the "default" appearance. * lisp/vc/ediff-util.el (ediff-inferior-compare-regions) (ediff-toggle-autorefine, ediff-unselect-difference): Don't use a misleading `default' value when it's really a boolean. * lisp/vc/ediff-init.el (ediff-set-overlay-face): Don't set help-echo if the overlay is not visible. Fixes: debbugs:17388 --- lisp/ChangeLog | 10 ++++++++++ lisp/vc/ediff-diff.el | 5 ++--- lisp/vc/ediff-init.el | 2 +- lisp/vc/ediff-util.el | 6 +++--- 4 files changed, 16 insertions(+), 7 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 9edc7641c74..b16c370e4e4 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,13 @@ +2014-05-03 Stefan Monnier + + * vc/ediff-diff.el (ediff-set-fine-diff-properties-in-one-buffer): + Use nil rather than `default' for the "default" appearance (bug#17388). + * vc/ediff-util.el (ediff-inferior-compare-regions) + (ediff-toggle-autorefine, ediff-unselect-difference): Don't use + a misleading `default' value when it's really a boolean. + * vc/ediff-init.el (ediff-set-overlay-face): Don't set help-echo if the + overlay is not visible. + 2014-05-02 Stephen Berman * calendar/todo-mode.el (todo-edit-file): Use display-warning. diff --git a/lisp/vc/ediff-diff.el b/lisp/vc/ediff-diff.el index ed248fbf835..d21b4cc6d0b 100644 --- a/lisp/vc/ediff-diff.el +++ b/lisp/vc/ediff-diff.el @@ -818,10 +818,9 @@ one optional arguments, diff-number to refine.") n &optional default) (let ((fine-diff-vector (ediff-get-fine-diff-vector n buf-type)) (face (if default - 'default + nil (ediff-get-symbol-from-alist - buf-type ediff-fine-diff-face-alist) - ))) + buf-type ediff-fine-diff-face-alist)))) (mapc (lambda (overl) (ediff-set-overlay-face overl face)) fine-diff-vector))) diff --git a/lisp/vc/ediff-init.el b/lisp/vc/ediff-init.el index f3781c53885..dd0d76485bf 100644 --- a/lisp/vc/ediff-init.el +++ b/lisp/vc/ediff-init.el @@ -807,7 +807,7 @@ TYPE-OF-EMACS is either 'xemacs or 'emacs." (defun ediff-set-overlay-face (extent face) (ediff-overlay-put extent 'face face) - (ediff-overlay-put extent 'help-echo 'ediff-region-help-echo)) + (ediff-overlay-put extent 'help-echo (if face 'ediff-region-help-echo))) (defun ediff-region-help-echo (extent-or-window &optional overlay _point) (unless overlay diff --git a/lisp/vc/ediff-util.el b/lisp/vc/ediff-util.el index 649ef884059..dbf52479527 100644 --- a/lisp/vc/ediff-util.el +++ b/lisp/vc/ediff-util.el @@ -958,7 +958,7 @@ On a dumb terminal, switches between ASCII highlighting and no highlighting." (message "Auto-refining is OFF") (setq ediff-auto-refine 'off)) (t ;; nix 'em - (ediff-set-fine-diff-properties ediff-current-difference 'default) + (ediff-set-fine-diff-properties ediff-current-difference t) (message "Refinements are HIDDEN") (setq ediff-auto-refine 'nix)) )) @@ -2973,7 +2973,7 @@ Hit \\[ediff-recenter] to reset the windows afterward." )) ;; unhighlight fine diffs - (ediff-set-fine-diff-properties ediff-current-difference 'default) + (ediff-set-fine-diff-properties ediff-current-difference t) (run-hooks 'ediff-unselect-hook)))) @@ -3492,7 +3492,7 @@ Ediff Control Panel to restore highlighting." (if (ediff-valid-difference-p ediff-current-difference) (progn - (ediff-set-fine-diff-properties ediff-current-difference 'default) + (ediff-set-fine-diff-properties ediff-current-difference t) (ediff-unhighlight-diff))) (ediff-paint-background-regions 'unhighlight) From 74a9022aba2055c1b4487eb5f69a274d108d893b Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 3 May 2014 11:47:50 +0300 Subject: [PATCH 15/20] Minor fixes for comments. src/buffer.c (overlay_strings): Fix the wording of the commentary. lisp/mail/rmailsum.el (rmail-new-summary-1): Fix a typo in a comment. --- lisp/ChangeLog | 4 ++++ lisp/mail/rmailsum.el | 4 ++-- src/ChangeLog | 4 ++++ src/buffer.c | 21 +++++++++++---------- 4 files changed, 21 insertions(+), 12 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b16c370e4e4..e1a0ee66dd7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2014-05-03 Eli Zaretskii + + * mail/rmailsum.el (rmail-new-summary-1): Fix a typo in a comment. + 2014-05-03 Stefan Monnier * vc/ediff-diff.el (ediff-set-fine-diff-properties-in-one-buffer): diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el index cbffb18f69f..ca884136a34 100644 --- a/lisp/mail/rmailsum.el +++ b/lisp/mail/rmailsum.el @@ -473,8 +473,8 @@ message." (widen) (goto-char (point-min)) (while (>= total msgnum) - ;; Go back to the Rmail buffer so - ;; so FUNCTION and rmail-get-summary can see its local vars. + ;; Go back to the Rmail buffer so FUNCTION and + ;; rmail-get-summary can see its local vars. (with-current-buffer main-buffer ;; First test whether to include this message. (if (or (null function) diff --git a/src/ChangeLog b/src/ChangeLog index 29fb2dd1edf..ca867c99599 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,7 @@ +2014-05-03 Eli Zaretskii + + * buffer.c (overlay_strings): Fix the wording of the commentary. + 2014-05-02 Paul Eggert Consult libpng-config more consistently (Bug#17339). diff --git a/src/buffer.c b/src/buffer.c index 3e1359707cd..8077e47fa0b 100644 --- a/src/buffer.c +++ b/src/buffer.c @@ -3333,17 +3333,18 @@ record_overlay_string (struct sortstrlist *ssl, Lisp_Object str, } } -/* Return the concatenation of the strings associated with overlays that - begin or end at POS, ignoring overlays that are specific to a window - other than W. The strings are concatenated in the appropriate order: - shorter overlays nest inside longer ones, and higher priority inside - lower. Normally all of the after-strings come first, but zero-sized - overlays have their after-strings ride along with the before-strings - because it would look strange to print them inside-out. +/* Concatenate the strings associated with overlays that begin or end + at POS, ignoring overlays that are specific to windows other than W. + The strings are concatenated in the appropriate order: shorter + overlays nest inside longer ones, and higher priority inside lower. + Normally all of the after-strings come first, but zero-sized + overlays have their after-strings ride along with the + before-strings because it would look strange to print them + inside-out. - Returns the string length, and stores the contents indirectly through - PSTR, if that variable is non-null. The string may be overwritten by - subsequent calls. */ + Returns the concatenated string's length, and return the pointer to + that string via PSTR, if that variable is non-NULL. The storage of + the concatenated strings may be overwritten by subsequent calls. */ ptrdiff_t overlay_strings (ptrdiff_t pos, struct window *w, unsigned char **pstr) From 8494d3796ca3fc153f65f13869d823beaddf07a2 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sat, 3 May 2014 07:21:19 -0400 Subject: [PATCH 16/20] Auto-commit of loaddefs files. --- lisp/mail/rmail.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 486c06053b3..52f4845eecb 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -4773,7 +4773,7 @@ If prefix argument REVERSE is non-nil, sorts in reverse order. ;;;*** -;;;### (autoloads nil "rmailsum" "rmailsum.el" "9baf491e4facec07debcb6aa55a11b54") +;;;### (autoloads nil "rmailsum" "rmailsum.el" "1278ff9911aa307f30dd57c20adbcdc6") ;;; Generated autoloads from rmailsum.el (autoload 'rmail-summary "rmailsum" "\ From d355cad6b78c35050ba94016bb7ee12acbd257ee Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sat, 3 May 2014 13:13:10 -0700 Subject: [PATCH 17/20] Handle systems without WCONTINUED consistently. * lib-src/emacsclient.c (WCONTINUED): Move to ../src/syswait.h. * src/process.c (handle_child_signal): Remove WCONTINUED ifdef, because WCONTINUED is always defined now. * src/syswait.h (WCONTINUED): Move here from ../lib-src/emacsclient.c. Fixes: debbugs:15110 debbugs:17339 --- lib-src/ChangeLog | 5 +++++ lib-src/emacsclient.c | 4 ---- src/ChangeLog | 7 +++++++ src/process.c | 6 +----- src/syswait.h | 4 ++++ 5 files changed, 17 insertions(+), 9 deletions(-) diff --git a/lib-src/ChangeLog b/lib-src/ChangeLog index 22722046436..2176549a351 100644 --- a/lib-src/ChangeLog +++ b/lib-src/ChangeLog @@ -1,3 +1,8 @@ +2014-05-03 Paul Eggert + + Handle systems without WCONTINUED consistently. (Bug#15110, 17339) + * emacsclient.c (WCONTINUED): Move to ../src/syswait.h. + 2014-04-29 Glenn Morris * Makefile.in ($(DESTDIR)${archlibdir}): diff --git a/lib-src/emacsclient.c b/lib-src/emacsclient.c index bd0aa121836..a1177f54576 100644 --- a/lib-src/emacsclient.c +++ b/lib-src/emacsclient.c @@ -65,10 +65,6 @@ char *w32_getenv (char *); # define CLOSE_SOCKET close # define INITIALIZE() -# ifndef WCONTINUED -# define WCONTINUED 8 -# endif - #define egetenv(VAR) getenv(VAR) #endif /* !WINDOWSNT */ diff --git a/src/ChangeLog b/src/ChangeLog index ca867c99599..15b7c202034 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,10 @@ +2014-05-03 Paul Eggert + + Handle systems without WCONTINUED consistently. (Bug#15110, 17339) + * process.c (handle_child_signal): Remove WCONTINUED ifdef, + because WCONTINUED is always defined now. + * syswait.h (WCONTINUED): Move here from ../lib-src/emacsclient.c. + 2014-05-03 Eli Zaretskii * buffer.c (overlay_strings): Fix the wording of the commentary. diff --git a/src/process.c b/src/process.c index 07b690e6ebd..2c66b9e976e 100644 --- a/src/process.c +++ b/src/process.c @@ -6225,11 +6225,7 @@ handle_child_signal (int sig) int status; if (p->alive -#ifndef WCONTINUED - && child_status_changed (p->pid, &status, WUNTRACED)) -#else - && child_status_changed (p->pid, &status, WUNTRACED | WCONTINUED)) -#endif + && child_status_changed (p->pid, &status, WUNTRACED | WCONTINUED)) { /* Change the status of the process that was found. */ p->tick = ++process_tick; diff --git a/src/syswait.h b/src/syswait.h index db197b82fb7..9c8cbd51f00 100644 --- a/src/syswait.h +++ b/src/syswait.h @@ -29,6 +29,10 @@ along with GNU Emacs. If not, see . */ #include #endif /* !HAVE_SYS_WAIT_H */ +#ifndef WCONTINUED +#define WCONTINUED 8 +#endif + #ifndef WCOREDUMP /* not POSIX */ #define WCOREDUMP(status) ((status) & 0x80) #endif From 7e00998fbc3e04e5bb613076cec816eccfa8bb3e Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sat, 3 May 2014 14:06:04 -0700 Subject: [PATCH 18/20] Require ImageMagick >= 6.3.5, due to PixelSetMagickColor. * configure.ac (IMAGEMAGICK_MODULE): Bump prereq from 6.2.8 to 6.3.5. A more-complicated fix would be to remove uses of PixelSetMagickColor, introduced in ImageMagick 6.3.5 (Sept. 2007). Fixes: debbugs:17339 --- ChangeLog | 7 +++++++ configure.ac | 6 ++---- 2 files changed, 9 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index 5b583849bd7..83d378374b9 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,10 @@ +2014-05-03 Paul Eggert + + Require ImageMagick >= 6.3.5, due to PixelSetMagickColor (Bug#17339). + * configure.ac (IMAGEMAGICK_MODULE): Bump prereq from 6.2.8 to 6.3.5. + A more-complicated fix would be to remove uses of PixelSetMagickColor, + introduced in ImageMagick 6.3.5 (Sept. 2007). + 2014-05-02 Paul Eggert Consult libpng-config more consistently (Bug#17339). diff --git a/configure.ac b/configure.ac index ee4826f1574..4fd842817b6 100644 --- a/configure.ac +++ b/configure.ac @@ -2225,11 +2225,9 @@ fi HAVE_IMAGEMAGICK=no if test "${HAVE_X11}" = "yes" || test "${HAVE_NS}" = "yes" || test "${HAVE_W32}" = "yes"; then if test "${with_imagemagick}" != "no"; then - ## 6.2.8 is the earliest version known to work, but earlier versions - ## might work - let us know if you find one. - ## 6.0.7 does not work. See bug#7955. + ## 6.3.5 is the earliest version known to work; see Bug#17339. ## 6.8.2 makes Emacs crash; see Bug#13867. - IMAGEMAGICK_MODULE="Wand >= 6.2.8 Wand != 6.8.2" + IMAGEMAGICK_MODULE="Wand >= 6.3.5 Wand != 6.8.2" PKG_CHECK_MODULES(IMAGEMAGICK, $IMAGEMAGICK_MODULE, HAVE_IMAGEMAGICK=yes, :) AC_SUBST(IMAGEMAGICK_CFLAGS) AC_SUBST(IMAGEMAGICK_LIBS) From ec5f5b309d86d33a978a2419015e9aaaa31758b9 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sat, 3 May 2014 23:34:04 -0700 Subject: [PATCH 19/20] * configure.ac (LIBPNG): Add -lz -lm on platforms where they're needed but libpng-config --libs omits them. Problem reported by Glenn Morris. --- ChangeLog | 6 ++++++ configure.ac | 23 +++++++++++++++++++---- 2 files changed, 25 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index 83d378374b9..8589f412385 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2014-05-04 Paul Eggert + + * configure.ac (LIBPNG): Add -lz -lm on platforms where they're needed + but libpng-config --libs omits them. Problem reported by Glenn + Morris. + 2014-05-03 Paul Eggert Require ImageMagick >= 6.3.5, due to PixelSetMagickColor (Bug#17339). diff --git a/configure.ac b/configure.ac index 4fd842817b6..1f458771bbd 100644 --- a/configure.ac +++ b/configure.ac @@ -3080,10 +3080,25 @@ elif test "${HAVE_X11}" = "yes" || test "${HAVE_W32}" = "yes"; then if png_cflags=`(libpng-config --cflags) 2>&AS_MESSAGE_LOG_FD` && png_libs=`(libpng-config --libs) 2>&AS_MESSAGE_LOG_FD` then - HAVE_PNG=yes - PNG_CFLAGS=`AS_ECHO(["$png_cflags"]) | sed -e "$edit_cflags"` - LIBPNG=$png_libs - else + # On some platforms, LIBPNG must also contain -lz -lm. + SAVE_CFLAGS=$CFLAGS + SAVE_LIBS=$LIBS + CFLAGS="$CFLAGS $png_cflags" + for png_libextras in '' ' -lz -lm'; do + LIBS="$png_libs$png_libextras $SAVE_LIBS" + AC_LINK_IFELSE( + [AC_LANG_PROGRAM([[#include + ]], + [[return png_get_channels (0, 0);]])], + [HAVE_PNG=yes + PNG_CFLAGS=`AS_ECHO(["$png_cflags"]) | sed -e "$edit_cflags"` + LIBPNG=$png_libs$png_libextras]) + test $HAVE_PNG = yes && break + done + CFLAGS=$SAVE_CFLAGS + LIBS=$SAVE_LIBS + fi + if test $HAVE_PNG != yes; then # libpng-config does not work; configure it by hand. # Debian unstable as of July 2003 has multiple libpngs, and puts png.h # in /usr/include/libpng. From 61febcb6e32860575316b8a539a2e9f13f70e3c2 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sun, 4 May 2014 11:51:32 -0700 Subject: [PATCH 20/20] Revert recent libpng changes. They fix only bugs that aren't being reported, so it may be better to do them on the trunk. * configure.ac (PNG_CFLAGS): Remove. All uses removed. (LIBPNG): Don't be consistent about -lpng16 versus -lpng. Ignore libpng-config's exit status. Always append -lz -lm. * src/Makefile.in (PNG_CFLAGS): Remove; all uses removed. * src/image.c [HAVE_LIBPNG_PNG_H]: Include , not . Fixes: debbugs:17339 --- ChangeLog | 7 ++++ configure.ac | 100 ++++++++++++++++++++++-------------------------- src/ChangeLog | 6 +++ src/Makefile.in | 2 - src/image.c | 4 ++ 5 files changed, 63 insertions(+), 56 deletions(-) diff --git a/ChangeLog b/ChangeLog index 8589f412385..7df946dd9ef 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,12 @@ 2014-05-04 Paul Eggert + Revert recent libpng changes (Bug#17339). + They fix only bugs that aren't being reported, so it may be better + to do them on the trunk. + * configure.ac (PNG_CFLAGS): Remove. All uses removed. + (LIBPNG): Don't be consistent about -lpng16 versus -lpng. + Ignore libpng-config's exit status. Always append -lz -lm. + * configure.ac (LIBPNG): Add -lz -lm on platforms where they're needed but libpng-config --libs omits them. Problem reported by Glenn Morris. diff --git a/configure.ac b/configure.ac index 1f458771bbd..8b042d23e3c 100644 --- a/configure.ac +++ b/configure.ac @@ -3068,70 +3068,62 @@ AC_SUBST(LIBJPEG) ### mingw32 doesn't use -lpng, since it loads the library dynamically. HAVE_PNG=no LIBPNG= -PNG_CFLAGS= if test "${opsys}" = "mingw32"; then if test "${with_png}" != "no"; then - AC_CHECK_HEADER([png.h], [HAVE_PNG=yes]) + AC_CHECK_HEADER(png.h, HAVE_PNG=yes, HAVE_PNG=no) + fi + if test "${HAVE_PNG}" = "yes"; then + AC_DEFINE(HAVE_PNG, 1, [Define to 1 if you have the png library (-lpng).]) + + AC_CHECK_DECL(png_longjmp, + [], + [AC_DEFINE(PNG_DEPSTRUCT, [], + [Define to empty to suppress deprecation warnings when building + with --enable-gcc-warnings and with libpng versions before 1.5, + which lack png_longjmp.])], + [[#ifdef HAVE_LIBPNG_PNG_H + # include + #else + # include + #endif + ]]) fi elif test "${HAVE_X11}" = "yes" || test "${HAVE_W32}" = "yes"; then if test "${with_png}" != "no"; then - - dnl NetBSD 6 provides libpng16, not libpng. - if png_cflags=`(libpng-config --cflags) 2>&AS_MESSAGE_LOG_FD` && - png_libs=`(libpng-config --libs) 2>&AS_MESSAGE_LOG_FD` - then - # On some platforms, LIBPNG must also contain -lz -lm. - SAVE_CFLAGS=$CFLAGS - SAVE_LIBS=$LIBS - CFLAGS="$CFLAGS $png_cflags" - for png_libextras in '' ' -lz -lm'; do - LIBS="$png_libs$png_libextras $SAVE_LIBS" - AC_LINK_IFELSE( - [AC_LANG_PROGRAM([[#include - ]], - [[return png_get_channels (0, 0);]])], - [HAVE_PNG=yes - PNG_CFLAGS=`AS_ECHO(["$png_cflags"]) | sed -e "$edit_cflags"` - LIBPNG=$png_libs$png_libextras]) - test $HAVE_PNG = yes && break - done - CFLAGS=$SAVE_CFLAGS - LIBS=$SAVE_LIBS - fi - if test $HAVE_PNG != yes; then - # libpng-config does not work; configure it by hand. - # Debian unstable as of July 2003 has multiple libpngs, and puts png.h - # in /usr/include/libpng. - AC_CHECK_HEADERS([png.h libpng/png.h], - [AC_CHECK_LIB([png], [png_get_channels], - [HAVE_PNG=yes - LIBPNG='-lpng -lz -lm' - if test "$ac_cv_header_libpng_png_h" = yes; then - PNG_CFLAGS=-I/usr/include/libpng - fi], - [], - [-lz -lm]) - break]) + # Debian unstable as of July 2003 has multiple libpngs, and puts png.h + # in /usr/include/libpng. + AC_CHECK_HEADERS(png.h libpng/png.h, break) + if test "$ac_cv_header_png_h" = yes || test "$ac_cv_header_libpng_png_h" = yes ; then + AC_CHECK_LIB(png, png_get_channels, HAVE_PNG=yes, , -lz -lm) fi fi -fi -if test $HAVE_PNG = yes; then - AC_DEFINE([HAVE_PNG], [1], [Define to 1 if you have the png library.]) - SAVE_CFLAGS=$CFLAGS - CFLAGS="$CFLAGS $PNG_CFLAGS" - AC_CHECK_DECL([png_longjmp], - [], - [AC_DEFINE([PNG_DEPSTRUCT], [], - [Define to empty to suppress deprecation warnings when building - with --enable-gcc-warnings and with libpng versions before 1.5, - which lack png_longjmp.])], - [[#include - ]]) - CFLAGS=$SAVE_CFLAGS + if test "${HAVE_PNG}" = "yes"; then + AC_DEFINE(HAVE_PNG, 1, [Define to 1 if you have the png library.]) + + dnl Some systems, eg NetBSD 6, only provide eg "libpng16", not "libpng". + lpng=`libpng-config --libs 2> /dev/null` + case $lpng in + -l*) : ;; + *) lpng="-lpng" ;; + esac + LIBPNG="$lpng -lz -lm" + + AC_CHECK_DECL(png_longjmp, + [], + [AC_DEFINE(PNG_DEPSTRUCT, [], + [Define to empty to suppress deprecation warnings when building + with --enable-gcc-warnings and with libpng versions before 1.5, + which lack png_longjmp.])], + [[#ifdef HAVE_LIBPNG_PNG_H + # include + #else + # include + #endif + ]]) + fi fi AC_SUBST(LIBPNG) -AC_SUBST(PNG_CFLAGS) HAVE_ZLIB=no LIBZ= diff --git a/src/ChangeLog b/src/ChangeLog index 15b7c202034..0f6aaf93598 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,9 @@ +2014-05-04 Paul Eggert + + Revert recent libpng changes (Bug#17339). + * Makefile.in (PNG_CFLAGS): Remove; all uses removed. + * image.c [HAVE_LIBPNG_PNG_H]: Include , not . + 2014-05-03 Paul Eggert Handle systems without WCONTINUED consistently. (Bug#15110, 17339) diff --git a/src/Makefile.in b/src/Makefile.in index c35e38bb290..388923596c9 100644 --- a/src/Makefile.in +++ b/src/Makefile.in @@ -77,7 +77,6 @@ C_SWITCH_MACHINE=@C_SWITCH_MACHINE@ C_SWITCH_SYSTEM=@C_SWITCH_SYSTEM@ GNUSTEP_CFLAGS=@GNUSTEP_CFLAGS@ -PNG_CFLAGS=@PNG_CFLAGS@ ## Define C_SWITCH_X_SITE to contain any special flags your compiler ## may need to deal with X Windows. For instance, if you've defined @@ -326,7 +325,6 @@ ALL_CFLAGS=-Demacs $(MYCPPFLAGS) -I. -I$(srcdir) \ -I$(lib) -I$(srcdir)/../lib \ $(C_SWITCH_MACHINE) $(C_SWITCH_SYSTEM) $(C_SWITCH_X_SITE) \ $(GNUSTEP_CFLAGS) $(CFLAGS_SOUND) $(RSVG_CFLAGS) $(IMAGEMAGICK_CFLAGS) \ - $(PNG_CFLAGS) \ $(LIBXML2_CFLAGS) $(DBUS_CFLAGS) $(XRANDR_CFLAGS) $(XINERAMA_CFLAGS) \ $(SETTINGS_CFLAGS) $(FREETYPE_CFLAGS) $(FONTCONFIG_CFLAGS) \ $(LIBOTF_CFLAGS) $(M17N_FLT_CFLAGS) $(DEPFLAGS) \ diff --git a/src/image.c b/src/image.c index dcbe5942b32..4133aaa7621 100644 --- a/src/image.c +++ b/src/image.c @@ -22,8 +22,12 @@ along with GNU Emacs. If not, see . */ #include #ifdef HAVE_PNG +#if defined HAVE_LIBPNG_PNG_H +# include +#else # include #endif +#endif #include #include