From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Wojciech Meyer Newsgroups: gmane.emacs.devel Subject: Re: autoload cookies for defcustoms Date: Sun, 29 Aug 2010 10:46:38 +0100 Message-ID: <87fwxxoio1.fsf@gmail.com> References: <2DC911234A9B4A6ABD34459FB8C26C1C@us.oracle.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: dough.gmane.org 1283075347 32670 80.91.229.12 (29 Aug 2010 09:49:07 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Sun, 29 Aug 2010 09:49:07 +0000 (UTC) Cc: Drew Adams , 'Emacs-Devel devel' To: Stefan Monnier Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Sun Aug 29 11:49:02 2010 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1OpeUR-0005Nq-Fg for ged-emacs-devel@m.gmane.org; Sun, 29 Aug 2010 11:49:01 +0200 Original-Received: from localhost ([127.0.0.1]:47840 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OpeUN-0007SB-QX for ged-emacs-devel@m.gmane.org; Sun, 29 Aug 2010 05:47:48 -0400 Original-Received: from [140.186.70.92] (port=41957 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1OpeU8-0007R4-0N for emacs-devel@gnu.org; Sun, 29 Aug 2010 05:47:37 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1OpeU2-0008CD-Bw for emacs-devel@gnu.org; Sun, 29 Aug 2010 05:47:31 -0400 Original-Received: from mail-ww0-f49.google.com ([74.125.82.49]:38627) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1OpeU1-0008C8-Ny for emacs-devel@gnu.org; Sun, 29 Aug 2010 05:47:26 -0400 Original-Received: by wwb24 with SMTP id 24so1678307wwb.30 for ; Sun, 29 Aug 2010 02:47:24 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=googlemail.com; s=gamma; h=domainkey-signature:received:received:from:to:cc:subject:references :date:in-reply-to:message-id:user-agent:mime-version:content-type; bh=DQKmpr5UfJM1+CZ8cao3WWMjT5SP7VI3ZFIGyFjksTs=; b=j36pAknZxtwdseGvqtYRCdL2wOaKGivtfn7vhd+jwbQK0+TYydColwLv3UKFXyAZDY RpUv5UKN7oOX1DQiSZKJGnfWw2NLjD5qzE7H6OguzqaKbOty0TRhh52x7qkaWQB+cZuA K8j1n5myY1rg0rqOePmY1fmTd/2h+xXLXXX2s= DomainKey-Signature: a=rsa-sha1; c=nofws; d=googlemail.com; s=gamma; h=from:to:cc:subject:references:date:in-reply-to:message-id :user-agent:mime-version:content-type; b=CCAJVZCZxPmJavetiK+sgCzzGQfvou5S7j1ba/J0RJb2ndPRw2F16odue9ZPYYZvRl /w9wswEYdJ4Gnp/J+OgXwSFyeHDtPLArvJg4t+1ArIoLRBjmEkgHVvVMCMStCLJtXf2a y0LIV6KSrOgio1GlcX5oG70mbdgNFufKQD2PA= Original-Received: by 10.227.134.194 with SMTP id k2mr3304050wbt.86.1283075242849; Sun, 29 Aug 2010 02:47:22 -0700 (PDT) Original-Received: from spec-desktop.specuu.com (host86-134-71-68.range86-134.btcentralplus.com [86.134.71.68]) by mx.google.com with ESMTPS id e31sm5232808wbe.5.2010.08.29.02.47.15 (version=TLSv1/SSLv3 cipher=RC4-MD5); Sun, 29 Aug 2010 02:47:21 -0700 (PDT) In-Reply-To: (Stefan Monnier's message of "Sun, 24 Jan 2010 21:56:14 -0500") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:129384 Archived-At: --=-=-= Stefan Monnier writes: > More to the point, I welcome patches that remove tham. Yet another patch. (hope they are still welcome, as I am bombarding the list this weekend!). (I put `autoload' cookie inside a comment, if somebody just want to kill the line instead, and use possibly vcs to track it later then let me know) Thanks. Wojciech --=-=-= Content-Type: text/plain; charset=utf-8 Content-Disposition: inline; filename=defcustom-auto-load-remove.txt Content-Transfer-Encoding: quoted-printable # Bazaar merge directive format 2 (Bazaar 0.90) # revision_id: wojciech.meyer@gmail.com-20100829093707-\ # hh1lj9ysl2ccdbzp # target_branch: http://bzr.savannah.gnu.org/r/emacs/trunk # testament_sha1: 55dc9d7c263e76d389610c71869a641530190714 # timestamp: 2010-08-29 10:37:42 +0100 # source_branch: ../autoload/ # base_revision_id: cyd@stupidchicken.com-20100829013145-\ # vbi9k94pz30lkh2w #=20 # Begin patch =3D=3D=3D modified file 'lisp/avoid.el' --- lisp/avoid.el 2010-01-13 08:35:10 +0000 +++ lisp/avoid.el 2010-08-29 09:37:07 +0000 @@ -75,7 +75,7 @@ :prefix "mouse-avoidance-" :group 'mouse) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mouse-avoidance-mode nil "Activate mouse avoidance mode. See function `mouse-avoidance-mode' for possible values. =3D=3D=3D modified file 'lisp/calc/calc.el' --- lisp/calc/calc.el 2010-08-08 03:04:57 +0000 +++ lisp/calc/calc.el 2010-08-29 09:37:07 +0000 @@ -229,7 +229,7 @@ :group 'applications) =20 ;; Do not autoload, so it is evaluated at run-time rather than at dump tim= e. -;; ;;;###autoload +;; `defcustom' should not be autoloaded ;; ;;;###autoload (defcustom calc-settings-file (locate-user-emacs-file "calc.el" ".calc.el") "File in which to record permanent settings." =3D=3D=3D modified file 'lisp/calendar/holidays.el' --- lisp/calendar/holidays.el 2010-01-13 08:35:10 +0000 +++ lisp/calendar/holidays.el 2010-08-29 09:37:07 +0000 @@ -41,7 +41,7 @@ ;; are used to using them to set calendar-holidays without having to ;; explicitly load this file. =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom holiday-general-holidays (mapcar 'purecopy '((holiday-fixed 1 1 "New Year's Day") @@ -71,7 +71,7 @@ (define-obsolete-variable-alias 'general-holidays 'holiday-general-holidays "23.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom holiday-oriental-holidays (mapcar 'purecopy '((holiday-chinese-new-year) @@ -96,7 +96,7 @@ (define-obsolete-variable-alias 'oriental-holidays 'holiday-oriental-holidays "23.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom holiday-local-holidays nil "Local holidays. See the documentation for `calendar-holidays' for details." @@ -107,7 +107,7 @@ ;;;###autoload (define-obsolete-variable-alias 'local-holidays 'holiday-local-holidays "2= 3.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom holiday-other-holidays nil "User defined holidays. See the documentation for `calendar-holidays' for details." @@ -217,7 +217,7 @@ (put 'hebrew-holidays-4 'risky-local-variable t) (make-obsolete-variable 'hebrew-holidays-4 'hebrew-holidays "23.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom holiday-hebrew-holidays (mapcar 'purecopy '((holiday-hebrew-passover) @@ -238,7 +238,7 @@ (define-obsolete-variable-alias 'hebrew-holidays 'holiday-hebrew-holidays "23.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom holiday-christian-holidays (mapcar 'purecopy '((holiday-easter-etc) ; respects calendar-christian-all-holidays-flag @@ -260,7 +260,7 @@ (define-obsolete-variable-alias 'christian-holidays 'holiday-christian-holidays "23.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom holiday-islamic-holidays (mapcar 'purecopy '((holiday-islamic-new-year) @@ -284,7 +284,7 @@ (define-obsolete-variable-alias 'islamic-holidays 'holiday-islamic-holidays "23.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom holiday-bahai-holidays (mapcar 'purecopy '((holiday-bahai-new-year) @@ -307,7 +307,7 @@ ;;;###autoload (define-obsolete-variable-alias 'bahai-holidays 'holiday-bahai-holidays "2= 3.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom holiday-solar-holidays (mapcar 'purecopy '((solar-equinoxes-solstices) =3D=3D=3D modified file 'lisp/cedet/semantic.el' --- lisp/cedet/semantic.el 2010-04-29 15:32:11 +0000 +++ lisp/cedet/semantic.el 2010-08-29 09:37:07 +0000 @@ -1031,7 +1031,7 @@ global-semantic-mru-bookmark-mode) "List of auxiliary minor modes in the Semantic package.") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom semantic-default-submodes '(global-semantic-idle-scheduler-mode global-semanticdb-minor-mode) "List of auxiliary Semantic minor modes enabled by `semantic-mode'. =3D=3D=3D modified file 'lisp/cedet/semantic/db-find.el' --- lisp/cedet/semantic/db-find.el 2010-04-03 00:42:10 +0000 +++ lisp/cedet/semantic/db-find.el 2010-08-29 09:37:07 +0000 @@ -139,7 +139,7 @@ "Customization values for semanticdb find throttle. See `semanticdb-find-throttle' for details.") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom semanticdb-find-default-throttle '(local project unloaded system recursive) "The default throttle for `semanticdb-find' routines. =3D=3D=3D modified file 'lisp/cedet/semantic/imenu.el' --- lisp/cedet/semantic/imenu.el 2010-04-02 02:25:19 +0000 +++ lisp/cedet/semantic/imenu.el 2010-08-29 09:37:07 +0000 @@ -55,7 +55,7 @@ :group 'imenu ) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom semantic-imenu-summary-function 'semantic-format-tag-abbreviate "*Function to use when creating items in Imenu. Some useful functions are found in `semantic-format-tag-functions'." @@ -63,7 +63,7 @@ :type semantic-format-tag-custom-list) (make-variable-buffer-local 'semantic-imenu-summary-function) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom semantic-imenu-bucketize-file t "*Non-nil if tags in a file are to be grouped into buckets." :group 'semantic-imenu @@ -84,7 +84,7 @@ :type 'boolean) (make-variable-buffer-local 'semantic-imenu-buckets-to-submenu) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom semantic-imenu-expand-type-members t "*Non-nil if types should have submenus with members in them." :group 'semantic-imenu =3D=3D=3D modified file 'lisp/cedet/semantic/senator.el' --- lisp/cedet/semantic/senator.el 2010-01-13 08:35:10 +0000 +++ lisp/cedet/semantic/senator.el 2010-08-29 09:37:07 +0000 @@ -54,7 +54,7 @@ "Semantic Navigator." :group 'semantic) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom senator-step-at-tag-classes nil "List of tag classes recognized by Senator's navigation commands. A tag class is a symbol, such as `variable', `function', or `type'. @@ -66,7 +66,7 @@ ;;;###autoload (make-variable-buffer-local 'senator-step-at-tag-classes) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom senator-step-at-start-end-tag-classes nil "List of tag classes at which Senator's navigation commands should stop. A tag class is a symbol, such as `variable', `function', or `type'. =3D=3D=3D modified file 'lisp/cus-edit.el' --- lisp/cus-edit.el 2010-08-21 14:46:43 +0000 +++ lisp/cus-edit.el 2010-08-29 09:37:07 +0000 @@ -651,7 +651,7 @@ =20 ;;; Sorting. =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom custom-browse-sort-alphabetically nil "If non-nil, sort customization group alphabetically in `custom-browse'." :type 'boolean @@ -671,7 +671,7 @@ :type 'boolean :group 'custom-browse) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom custom-buffer-sort-alphabetically t "Whether to sort customization groups alphabetically in Custom buffer." :type 'boolean @@ -687,7 +687,7 @@ (const :tag "none" nil)) :group 'custom-buffer) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom custom-menu-sort-alphabetically nil "If non-nil, sort each customization group alphabetically in menus." :type 'boolean @@ -4216,7 +4216,7 @@ ;;; Reading and writing the custom file. =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom custom-file nil "File used for storing customization information. The default is nil, which means to use your init file =3D=3D=3D modified file 'lisp/desktop.el' --- lisp/desktop.el 2010-06-09 22:08:50 +0000 +++ lisp/desktop.el 2010-08-29 09:37:07 +0000 @@ -312,7 +312,7 @@ :type '(repeat string) :group 'desktop) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom desktop-locals-to-save '(desktop-locals-to-save ; Itself! Think it over. truncate-lines =3D=3D=3D modified file 'lisp/dired.el' --- lisp/dired.el 2010-07-27 02:10:05 +0000 +++ lisp/dired.el 2010-08-29 09:37:07 +0000 @@ -49,7 +49,7 @@ :group 'dired) =20 =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom dired-listing-switches (purecopy "-al") "Switches passed to `ls' for Dired. MUST contain the `l' option. May contain all other options that don't contradict `-l'; @@ -104,7 +104,7 @@ :type 'boolean :group 'dired-mark) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom dired-trivial-filenames (purecopy "^\\.\\.?$\\|^#") "Regexp of files to skip when finding first file of a directory. A value of nil means move to the subdir line. @@ -752,7 +752,7 @@ buffer-read-only (dired-directory-changed-p dirname)))) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom dired-auto-revert-buffer nil "Automatically revert dired buffer on revisiting. If t, revisiting an existing dired buffer automatically reverts it. =3D=3D=3D modified file 'lisp/dnd.el' --- lisp/dnd.el 2010-06-22 07:10:16 +0000 +++ lisp/dnd.el 2010-08-29 09:37:07 +0000 @@ -34,7 +34,7 @@ ;;; Customizable variables =20 =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom dnd-protocol-alist `((,(purecopy "^file:///") . dnd-open-local-file) ; XDND format. (,(purecopy "^file://") . dnd-open-file) ; URL with host =3D=3D=3D modified file 'lisp/emacs-lisp/advice.el' --- lisp/emacs-lisp/advice.el 2010-06-09 01:18:31 +0000 +++ lisp/emacs-lisp/advice.el 2010-08-29 09:37:07 +0000 @@ -1832,7 +1832,7 @@ =20 (defconst ad-version "2.14") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom ad-redefinition-action 'warn "Defines what to do with redefinitions during Advice de/activation. Redefinition occurs if a previously activated function that already has an @@ -1847,7 +1847,7 @@ (other :tag "error" error)) :group 'advice) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom ad-default-compilation-action 'maybe "Defines whether to compile advised definitions during activation. A value of `always' will result in unconditional compilation, `never' will =3D=3D=3D modified file 'lisp/emacs-lisp/edebug.el' --- lisp/emacs-lisp/edebug.el 2010-06-18 14:05:43 +0000 +++ lisp/emacs-lisp/edebug.el 2010-08-29 09:37:07 +0000 @@ -77,7 +77,7 @@ ;; because the byte compiler binds them; as a result, if edebug ;; is first loaded for a require in a compilation, they will be left unbou= nd. =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom edebug-all-defs nil "If non-nil, evaluating defining forms instruments for Edebug. This applies to `eval-defun', `eval-region', `eval-buffer', and @@ -95,7 +95,7 @@ ;; because the byte compiler binds them; as a result, if edebug ;; is first loaded for a require in a compilation, they will be left unbou= nd. =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom edebug-all-forms nil "Non-nil means evaluation of all forms will instrument for Edebug. This doesn't apply to loading or evaluations in the minibuffer. =3D=3D=3D modified file 'lisp/emacs-lisp/eldoc.el' --- lisp/emacs-lisp/eldoc.el 2010-06-01 13:47:14 +0000 +++ lisp/emacs-lisp/eldoc.el 2010-08-29 09:37:07 +0000 @@ -63,7 +63,7 @@ :type 'number :group 'eldoc) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom eldoc-minor-mode-string (purecopy " ElDoc") "String to display in mode line when ElDoc Mode is enabled; nil for none= ." :type '(choice string (const :tag "None" nil)) =3D=3D=3D modified file 'lisp/emacs-lisp/package.el' --- lisp/emacs-lisp/package.el 2010-08-26 03:31:34 +0000 +++ lisp/emacs-lisp/package.el 2010-08-29 09:37:07 +0000 @@ -178,7 +178,7 @@ :group 'applications :version "24.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom package-enable-at-startup t "Whether to activate installed packages when Emacs starts. If non-nil, packages are activated after reading the init file =3D=3D=3D modified file 'lisp/emacs-lisp/trace.el' --- lisp/emacs-lisp/trace.el 2010-03-22 16:50:29 +0000 +++ lisp/emacs-lisp/trace.el 2010-08-29 09:37:07 +0000 @@ -159,7 +159,7 @@ :prefix "trace-" :group 'lisp) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom trace-buffer (purecopy "*trace-output*") "Trace output will by default go to that buffer." :type 'string =3D=3D=3D modified file 'lisp/emulation/crisp.el' --- lisp/emulation/crisp.el 2010-01-13 08:35:10 +0000 +++ lisp/emulation/crisp.el 2010-08-29 09:37:07 +0000 @@ -179,7 +179,7 @@ :type 'string :group 'crisp) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom crisp-mode nil "Track status of CRiSP emulation mode. A value of nil means CRiSP mode is not enabled. A value of t =3D=3D=3D modified file 'lisp/emulation/keypad.el' --- lisp/emulation/keypad.el 2010-01-13 08:35:10 +0000 +++ lisp/emulation/keypad.el 2010-08-29 09:37:07 +0000 @@ -97,7 +97,7 @@ =20 ;;; Customization =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom keypad-setup nil "Specifies the keypad setup for unshifted keypad keys when NumLock is of= f. When selecting the plain numeric keypad setup, the character returned by t= he @@ -120,7 +120,7 @@ :require 'keypad :group 'keyboard) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom keypad-numlock-setup nil "Specifies the keypad setup for unshifted keypad keys when NumLock is on. When selecting the plain numeric keypad setup, the character returned by t= he @@ -143,7 +143,7 @@ :require 'keypad :group 'keyboard) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom keypad-shifted-setup nil "Specifies the keypad setup for shifted keypad keys when NumLock is off. When selecting the plain numeric keypad setup, the character returned by t= he @@ -166,7 +166,7 @@ :require 'keypad :group 'keyboard) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom keypad-numlock-shifted-setup nil "Specifies the keypad setup for shifted keypad keys when NumLock is off. When selecting the plain numeric keypad setup, the character returned by t= he =3D=3D=3D modified file 'lisp/find-dired.el' --- lisp/find-dired.el 2010-03-28 19:31:27 +0000 +++ lisp/find-dired.el 2010-08-29 09:37:07 +0000 @@ -36,7 +36,7 @@ =20 ;; find's -ls corresponds to these switches. ;; Note -b, at least GNU find quotes spaces etc. in filenames -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom find-ls-option (if (eq system-type 'berkeley-unix) (purecopy '("-ls" . "-gilsb")) (purecopy '("-exec ls -ld {} \\;" . "-ld"))) @@ -48,7 +48,7 @@ (string :tag "Ls Switches")) :group 'find-dired) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom find-ls-subdir-switches (purecopy "-al") "`ls' switches for inserting subdirectories in `*Find*' buffers. This should contain the \"-l\" switch. @@ -58,7 +58,7 @@ :group 'find-dired :version "22.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom find-grep-options (purecopy (if (or (eq system-type 'berkeley-unix) (string-match "solaris2" system-configuration) =3D=3D=3D modified file 'lisp/help-at-pt.el' --- lisp/help-at-pt.el 2010-01-13 08:35:10 +0000 +++ lisp/help-at-pt.el 2010-08-29 09:37:07 +0000 @@ -144,7 +144,7 @@ (run-with-idle-timer help-at-pt-timer-delay t #'help-at-pt-maybe-display)))) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom help-at-pt-display-when-idle 'never "Automatically show local help on point-over. If the value is t, the string obtained from any `kbd-help' or =3D=3D=3D modified file 'lisp/help-macro.el' --- lisp/help-macro.el 2010-01-13 08:35:10 +0000 +++ lisp/help-macro.el 2010-08-29 09:37:07 +0000 @@ -69,7 +69,7 @@ =20 (require 'backquote) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom three-step-help nil "Non-nil means give more info about Help command in three steps. The three steps are simple prompt, prompt with all options, and =3D=3D=3D modified file 'lisp/hippie-exp.el' --- lisp/hippie-exp.el 2010-01-13 08:35:10 +0000 +++ lisp/hippie-exp.el 2010-08-29 09:37:07 +0000 @@ -200,7 +200,7 @@ =20 (defvar he-search-window ()) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom hippie-expand-try-functions-list '(try-complete-file-name-partially try-complete-file-name @@ -218,31 +218,31 @@ :type '(repeat function) :group 'hippie-expand) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom hippie-expand-verbose t "Non-nil makes `hippie-expand' output which function it is trying." :type 'boolean :group 'hippie-expand) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom hippie-expand-dabbrev-skip-space nil "Non-nil means tolerate trailing spaces in the abbreviation to expand." :group 'hippie-expand :type 'boolean) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom hippie-expand-dabbrev-as-symbol t "Non-nil means expand as symbols, i.e. syntax `_' is considered a letter= ." :group 'hippie-expand :type 'boolean) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom hippie-expand-no-restriction t "Non-nil means that narrowed buffers are widened during search." :group 'hippie-expand :type 'boolean) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom hippie-expand-max-buffers () "The maximum number of buffers (apart from the current) searched. If nil, all buffers are searched." @@ -250,7 +250,7 @@ integer) :group 'hippie-expand) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom hippie-expand-ignore-buffers (list (purecopy "^ \\*.*\\*$") 'di= red-mode) "A list specifying which buffers not to search (if not current). Can contain both regexps matching buffer names (as strings) and major modes @@ -258,7 +258,7 @@ :type '(repeat (choice regexp (symbol :tag "Major Mode"))) :group 'hippie-expand) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom hippie-expand-only-buffers () "A list specifying the only buffers to search (in addition to current). Can contain both regexps matching buffer names (as strings) and major modes =3D=3D=3D modified file 'lisp/ido.el' --- lisp/ido.el 2010-08-23 10:21:01 +0000 +++ lisp/ido.el 2010-08-29 09:37:07 +0000 @@ -339,7 +339,7 @@ :link '(emacs-commentary-link :tag "Commentary" "ido.el") :link '(emacs-library-link :tag "Lisp File" "ido.el")) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom ido-mode nil "Determines for which functional group \(buffer and files) ido behavior should be enabled. The following values are possible: =3D=3D=3D modified file 'lisp/image-file.el' --- lisp/image-file.el 2010-01-13 08:35:10 +0000 +++ lisp/image-file.el 2010-08-29 09:37:07 +0000 @@ -35,7 +35,7 @@ (require 'image) =20 =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom image-file-name-extensions (purecopy '("png" "jpeg" "jpg" "gif" "tiff" "tif" "xbm" "xpm" "pbm" "pgm= " "ppm" "pnm" "svg")) "A list of image-file filename extensions. @@ -55,7 +55,7 @@ :initialize 'custom-initialize-default :group 'image) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom image-file-name-regexps nil "List of regexps matching image-file filenames. Filenames matching one of these regexps are considered image files, =3D=3D=3D modified file 'lisp/imenu.el' --- lisp/imenu.el 2010-01-13 08:35:10 +0000 +++ lisp/imenu.el 2010-08-29 09:37:07 +0000 @@ -135,7 +135,7 @@ :type 'hook :group 'imenu) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom imenu-sort-function nil "The function to use for sorting the index mouse-menu. =20 =3D=3D=3D modified file 'lisp/informat.el' --- lisp/informat.el 2010-01-13 08:35:10 +0000 +++ lisp/informat.el 2010-08-29 09:37:07 +0000 @@ -152,7 +152,7 @@ "Tagifying %s done" (file-name-nondirectory (buffer-file-name))))) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom Info-split-threshold 262144 "The number of characters by which `Info-split' splits an info file." :type 'integer =3D=3D=3D modified file 'lisp/international/latexenc.el' --- lisp/international/latexenc.el 2010-01-13 08:35:10 +0000 +++ lisp/international/latexenc.el 2010-08-29 09:37:07 +0000 @@ -49,7 +49,7 @@ =20 ;;; Code: =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom latex-inputenc-coding-alist (purecopy '(("ansinew" . windows-1252) ; MS Windows ANSI encoding, extension of La= tin-1 =3D=3D=3D modified file 'lisp/international/latin1-disp.el' --- lisp/international/latin1-disp.el 2010-01-13 08:35:10 +0000 +++ lisp/international/latin1-disp.el 2010-08-29 09:37:07 +0000 @@ -69,7 +69,7 @@ :group 'latin1-display :type 'string) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom latin1-display nil "Set up Latin-1/ASCII display for ISO8859 character sets. This is done for each character set in the list `latin1-display-sets', @@ -739,7 +739,7 @@ =20 (sit-for 0)) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom latin1-display-ucs-per-lynx nil "Set up Latin-1/ASCII display for Unicode characters. This uses the transliterations of the Lynx browser. The display isn't =3D=3D=3D modified file 'lisp/linum.el' --- lisp/linum.el 2010-01-13 08:35:10 +0000 +++ lisp/linum.el 2010-08-29 09:37:07 +0000 @@ -43,7 +43,7 @@ "Show line numbers in the left margin." :group 'convenience) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom linum-format 'dynamic "Format used to display line numbers. Either a format string like \"%7d\", `dynamic' to adapt the width =3D=3D=3D modified file 'lisp/locate.el' --- lisp/locate.el 2010-05-20 22:55:11 +0000 +++ lisp/locate.el 2010-08-29 09:37:07 +0000 @@ -183,7 +183,7 @@ :type '(choice (const :tag "None" nil) face) :group 'locate) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom locate-ls-subdir-switches (purecopy "-al") "`ls' switches for inserting subdirectories in `*Locate*' buffers. This should contain the \"-l\" switch, but not the \"-F\" or \"-b\" switch= es." =3D=3D=3D modified file 'lisp/lpr.el' --- lisp/lpr.el 2010-05-25 02:11:08 +0000 +++ lisp/lpr.el 2010-08-29 09:37:07 +0000 @@ -43,7 +43,7 @@ :group 'wp) =20 =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom printer-name (and (eq system-type 'ms-dos) "PRN") "The name of a local printer to which data is sent for printing. @@ -66,7 +66,7 @@ (file :tag "Name")) :group 'lpr) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom lpr-switches nil "List of strings to pass as extra options for the printer program. It is recommended to set `printer-name' instead of including an explicit @@ -95,7 +95,7 @@ (string :tag "Printer Switch")) :group 'lpr) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom lpr-command (purecopy (cond =3D=3D=3D modified file 'lisp/ls-lisp.el' --- lisp/ls-lisp.el 2010-05-29 07:55:40 +0000 +++ lisp/ls-lisp.el 2010-08-29 09:37:07 +0000 @@ -137,7 +137,7 @@ :group 'ls-lisp) =20 ;;; Autoloaded because it is let-bound in `recover-session', `mail-recover= -1'. -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom ls-lisp-support-shell-wildcards t "Non-nil means ls-lisp treats file patterns as shell wildcards. Otherwise they are treated as Emacs regexps (for backward compatibility)." =3D=3D=3D modified file 'lisp/mail/mail-hist.el' --- lisp/mail/mail-hist.el 2010-01-13 08:35:10 +0000 +++ lisp/mail/mail-hist.el 2010-08-29 09:37:07 +0000 @@ -83,7 +83,7 @@ :type 'integer :group 'mail-hist) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-hist-keep-history t "*Non-nil means keep a history for headers and text of outgoing mail." :type 'boolean =3D=3D=3D modified file 'lisp/mail/mail-utils.el' --- lisp/mail/mail-utils.el 2010-02-04 05:05:37 +0000 +++ lisp/mail/mail-utils.el 2010-08-29 09:37:07 +0000 @@ -32,7 +32,7 @@ ;;; been initialized. (require 'lisp-mode) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-use-rfc822 nil "If non-nil, use a full, hairy RFC822 parser on mail addresses. Otherwise, (the default) use a smaller, somewhat faster, and =3D=3D=3D modified file 'lisp/mail/mailalias.el' --- lisp/mail/mailalias.el 2010-01-13 08:35:10 +0000 +++ lisp/mail/mailalias.el 2010-08-29 09:37:07 +0000 @@ -74,7 +74,7 @@ :group 'mailalias) (put 'mail-complete-alist 'risky-local-variable t) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-complete-style 'angles "Specifies how \\[mail-complete] formats the full name when it completes. If `nil', they contain just the return address like: =3D=3D=3D modified file 'lisp/mail/rmail.el' --- lisp/mail/rmail.el 2010-08-22 20:02:16 +0000 +++ lisp/mail/rmail.el 2010-08-29 09:37:07 +0000 @@ -264,7 +264,7 @@ ;; If so, this can be moved there. (rmail-movemail-variant-p) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom rmail-user-mail-address-regexp nil "Regexp matching user mail addresses. If non-nil, this variable is used to identify the correspondent @@ -282,7 +282,7 @@ :group 'rmail-retrieve :version "21.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom rmail-dont-reply-to-names nil "A regexp specifying addresses to prune from a reply message. If this is nil, it is set the first time you compose a reply, to @@ -304,7 +304,7 @@ used for large mailing lists to broadcast announcements.") ;; Is it really useful to set this site-wide? =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom rmail-ignored-headers (purecopy (concat "^via:\\|^mail-from:\\|^origin:\\|^references:\\|^sender:" @@ -350,7 +350,7 @@ :type '(choice (const nil) (regexp)) :group 'rmail-headers) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom rmail-displayed-headers nil "Regexp to match Header fields that Rmail should display. If nil, display all header fields except those matched by @@ -358,14 +358,14 @@ :type '(choice regexp (const :tag "All")) :group 'rmail-headers) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom rmail-retry-ignored-headers (purecopy "^x-authentication-warnin= g:\\|^x-detected-operating-system:\\|^x-spam[-a-z]*:\\|content-type:\\|cont= ent-transfer-encoding:\\|mime-version:") "Headers that should be stripped when retrying a failed message." :type '(choice regexp (const nil :tag "None")) :group 'rmail-headers :version "23.2") ; added x-detected-operating-system, x-spam =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom rmail-highlighted-headers (purecopy "^From:\\|^Subject:") "Regexp to match Header fields that Rmail should normally highlight. A value of nil means don't highlight. Uses the face `rmail-highlight'." @@ -406,7 +406,7 @@ :type 'boolean :group 'rmail-files) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom rmail-primary-inbox-list nil "List of files that are inboxes for your primary mail file `rmail-file-n= ame'. If this is nil, uses the environment variable MAIL. If that is @@ -430,12 +430,12 @@ :type 'boolean :group 'rmail-reply) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom rmail-secondary-file-directory (purecopy "~/") "Directory for additional secondary Rmail files." :type 'directory :group 'rmail-files) -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom rmail-secondary-file-regexp (purecopy "\\.xmail$") "Regexp for which files are secondary Rmail files." :type 'regexp @@ -459,7 +459,7 @@ (defvar rmail-get-new-mail-hook nil "List of functions to call when Rmail has retrieved new mail.") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom rmail-show-message-hook nil "List of functions to call when Rmail displays a message." :type 'hook =3D=3D=3D modified file 'lisp/mail/sendmail.el' --- lisp/mail/sendmail.el 2010-03-28 03:52:17 +0000 +++ lisp/mail/sendmail.el 2010-08-29 09:37:07 +0000 @@ -57,7 +57,7 @@ :group 'mail :type 'file) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-from-style 'default "Specifies how \"From:\" fields look. =20 @@ -78,7 +78,7 @@ :version "20.3" :group 'sendmail) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-specify-envelope-from nil "If non-nil, specify the envelope-from address when sending mail. The value used to specify it is whatever is found in @@ -105,7 +105,7 @@ (const :tag "Use `user-mail-address'" nil)) :group 'sendmail) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-self-blind nil "Non-nil means insert BCC to self in messages to be sent. This is done when the message is initialized, @@ -113,7 +113,7 @@ :type 'boolean :group 'sendmail) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-interactive t ;; We used to use a default of nil rather than t, but nowadays it is very ;; common for sendmail to be misconfigured, so one cannot rely on the @@ -151,7 +151,7 @@ 'sendmail-send-it))) =20 ;; Useful to set in site-init.el -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom send-mail-function (if (and window-system (memq system-type '(darwin windows-nt))) 'mailclient-send-it @@ -172,7 +172,7 @@ =20 ;;;###autoload(custom-initialize-delay 'send-mail-function nil) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-header-separator (purecopy "--text follows this line--") "Line used to separate headers from text in messages being composed." :type 'string @@ -187,7 +187,7 @@ ;; and other things. So I turned it off. --rms. ;;(put 'mail-header-separator 'read-only t) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-archive-file-name nil "Name of file to write all outgoing messages in, or nil for none. This is normally an mbox file, but for backwards compatibility may also @@ -195,7 +195,7 @@ :type '(choice file (const nil)) :group 'sendmail) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-default-reply-to nil "Address to insert as default Reply-to field of outgoing messages. If nil, it will be initialized from the REPLYTO environment variable @@ -203,7 +203,7 @@ :type '(choice (const nil) string) :group 'sendmail) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-alias-file nil "If non-nil, the name of a file to use instead of `/usr/lib/aliases'. This file defines aliases to be expanded by the mailer; this is a different @@ -212,7 +212,7 @@ :type '(choice (const nil) file) :group 'sendmail) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-personal-alias-file (purecopy "~/.mailrc") "If non-nil, the name of the user's personal mail alias file. This file typically should be in same format as the `.mailrc' file used by @@ -221,7 +221,7 @@ :type '(choice (const nil) file) :group 'sendmail) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-setup-hook nil "Normal hook, run each time a new outgoing message is initialized." :type 'hook @@ -240,14 +240,14 @@ (defvar mail-alias-modtime nil "The modification time of your mail alias file when it was last examined= .") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-yank-prefix "> " "Prefix insert on lines of yanked message being replied to. If this is nil, use indentation, as specified by `mail-indentation-spaces'= ." :type '(choice (const nil) string) :group 'sendmail) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-indentation-spaces 3 "Number of spaces to insert at the beginning of each cited line. Used by `mail-yank-original' via `mail-indent-citation'." @@ -264,7 +264,7 @@ This is a normal hook, misnamed for historical reasons. It is semi-obsolete and mail agents should no longer use it.") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-citation-hook nil "Hook for modifying a citation just inserted in the mail buffer. Each hook function can find the citation between (point) and (mark t), @@ -283,7 +283,7 @@ This enables the hook functions to see the whole message header regardless of what part of it (if any) is included in the cited text.") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-citation-prefix-regexp (purecopy "\\([ \t]*\\(\\w\\|[_.]\\)+>+\\|[ \t]*[]>|}]\\)+") "Regular expression to match a citation prefix plus whitespace. @@ -393,7 +393,7 @@ removed from alias expansions." nil) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-signature t "Text inserted at end of mail buffer when a message is initialized. If t, it means to insert the contents of the file `mail-signature-file'. @@ -409,13 +409,13 @@ :group 'sendmail) (put 'mail-signature 'risky-local-variable t) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-signature-file (purecopy "~/.signature") "File containing the text inserted at end of mail buffer." :type 'file :group 'sendmail) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-default-directory (purecopy "~/") "Value of `default-directory' for Mail mode buffers. This directory is used for auto-save files of Mail mode buffers. @@ -432,7 +432,7 @@ (put 'mail-reply-action 'permanent-local t) (put 'mail-send-actions 'permanent-local t) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-default-headers nil "A string containing header lines, to be inserted in outgoing messages. It can contain newlines, and should end in one. It is inserted @@ -441,7 +441,7 @@ :group 'sendmail) =20 ;; FIXME no need for autoload -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-bury-selects-summary t "If non-nil, try to show Rmail summary buffer after returning from mail. The functions \\[mail-send-on-exit] or \\[mail-dont-send] select @@ -451,7 +451,7 @@ :group 'sendmail) =20 ;; FIXME no need for autoload -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-send-nonascii 'mime "Specify whether to allow sending non-ASCII characters in mail. If t, that means do allow it. nil means don't allow it. @@ -824,7 +824,7 @@ :options '(flyspell-mode-off) :group 'sendmail) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom mail-mailing-lists nil "List of mailing list addresses the user is subscribed to. The variable is used to trigger insertion of the \"Mail-Followup-To\" =3D=3D=3D modified file 'lisp/net/browse-url.el' --- lisp/net/browse-url.el 2010-08-17 08:01:10 +0000 +++ lisp/net/browse-url.el 2010-08-29 09:37:07 +0000 @@ -218,7 +218,7 @@ :group 'external :group 'comm) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom browse-url-browser-function (cond ((memq system-type '(windows-nt ms-dos cygwin)) =3D=3D=3D modified file 'lisp/net/tramp.el' --- lisp/net/tramp.el 2010-08-26 07:33:16 +0000 +++ lisp/net/tramp.el 2010-08-29 09:37:07 +0000 @@ -180,7 +180,7 @@ :version "22.1") =20 ;; Maybe we need once a real Tramp mode, with key bindings etc. -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tramp-mode t "*Whether Tramp is enabled. If it is set to nil, all remote file names are used literally." @@ -1256,7 +1256,7 @@ ;; the other places. =20 ;; Currently, we have the choice between 'ftp, 'sep, and 'url. -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tramp-syntax (if (featurep 'xemacs) 'sep 'ftp) "Tramp filename syntax to be used. =3D=3D=3D modified file 'lisp/newcomment.el' --- lisp/newcomment.el 2010-08-17 19:38:30 +0000 +++ lisp/newcomment.el 2010-08-29 09:37:07 +0000 @@ -92,7 +92,7 @@ :type '(choice (const nil) integer) :group 'comment) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom comment-column 32 "Column to indent right-margin comments to. Each mode may establish a different default value for this variable; you @@ -206,7 +206,7 @@ If INDENT is `multi-char', that means indent multi-character comment starters, but not one-character comment starters.") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom comment-style 'indent "Style to be used for `comment-region'. See `comment-styles' for a list of available styles." @@ -217,7 +217,7 @@ :version "23.1" :group 'comment) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom comment-padding (purecopy " ") "Padding string that `comment-region' puts between comment chars and tex= t. Can also be an integer which will be automatically turned into a string @@ -228,7 +228,7 @@ :type '(choice string integer (const nil)) :group 'comment) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom comment-multi-line nil "Non-nil means `comment-indent-new-line' continues comments. That is, it inserts no new terminator or starter. @@ -1191,7 +1191,7 @@ (insert (comment-padleft comment-end add))) (indent-according-to-mode))))))) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom comment-auto-fill-only-comments nil "Non-nil means to only auto-fill inside comments. This has no effect in modes that do not define a comment syntax." =3D=3D=3D modified file 'lisp/password-cache.el' --- lisp/password-cache.el 2010-05-19 12:52:27 +0000 +++ lisp/password-cache.el 2010-08-29 09:37:07 +0000 @@ -53,13 +53,13 @@ =20 ;; Options are autoloaded since they are used by eg mml-sec.el. =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom password-cache t "Whether to cache passwords." :group 'password :type 'boolean) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom password-cache-expiry 16 "How many seconds passwords are cached, or nil to disable expiring. Whether passwords are cached at all is controlled by `password-cache'." =3D=3D=3D modified file 'lisp/progmodes/compile.el' --- lisp/progmodes/compile.el 2010-08-15 00:04:53 +0000 +++ lisp/progmodes/compile.el 2010-08-29 09:37:07 +0000 @@ -86,13 +86,13 @@ :group 'processes) =20 =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom compilation-mode-hook nil "List of hook functions run by `compilation-mode' (see `run-mode-hooks')= ." :type 'hook :group 'compilation) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom compilation-start-hook nil "List of hook functions run by `compilation-start' on the compilation pr= ocess. \(See `run-hook-with-args'). @@ -103,7 +103,7 @@ :type 'hook :group 'compilation) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom compilation-window-height nil "Number of lines in a compilation window. If nil, use Emacs default." :type '(choice (const :tag "Default" nil) @@ -587,7 +587,7 @@ :type 'boolean :group 'compilation) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom compilation-ask-about-save t "Non-nil means \\[compile] asks which buffers to save before compiling. Otherwise, it saves all modified buffers without asking." @@ -609,7 +609,7 @@ :group 'compilation :version "24.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom compilation-search-path '(nil) "List of directories to search for source files named in error messages. Elements should be directory names, not file names of directories. @@ -618,7 +618,7 @@ (string :tag "Directory"))) :group 'compilation) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom compile-command (purecopy "make -k ") "Last shell command used to do a compilation; default for next compilati= on. =20 @@ -636,7 +636,7 @@ :group 'compilation) ;;;###autoload(put 'compile-command 'safe-local-variable (lambda (a) (and = (stringp a) (or (not (boundp 'compilation-read-command)) compilation-read-c= ommand)))) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom compilation-disable-input nil "If non-nil, send end-of-file as compilation process input. This only affects platforms that support asynchronous processes (see =3D=3D=3D modified file 'lisp/progmodes/etags.el' --- lisp/progmodes/etags.el 2010-08-14 23:01:42 +0000 +++ lisp/progmodes/etags.el 2010-08-29 09:37:07 +0000 @@ -45,7 +45,7 @@ (defgroup etags nil "Tags tables." :group 'tools) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tags-case-fold-search 'default "*Whether tags operations should be case-sensitive. A value of t means case-insensitive, a value of nil means case-sensitive. @@ -67,7 +67,7 @@ :group 'etags :type '(repeat file)) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tags-compression-info-list (purecopy '("" ".Z" ".bz2" ".gz" ".t= gz")) "*List of extensions tried by etags when jka-compr is used. An empty string means search the non-compressed file. @@ -87,7 +87,7 @@ ;; jka-compr-compression-info-list. =20 =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tags-add-tables 'ask-user "*Control whether to add a new tags table to the current list. t means do; nil means don't (always start a new list). @@ -103,6 +103,15 @@ :group 'etags :type 'boolean) =20 +(defcustom tags-major-mode-sensitive 'default + "*Control whether major mode determines allowed file extensions during=20 +tags search." + :group 'etags + :type '(choice (const :tag "Major mode file types only" t) + (const :tag "All files " nil) + (other :tag "Use default" default)) + :version "21.1") + (defvar tags-table-computed-list nil "List of tags tables to search, computed from `tags-table-list'. This includes tables implicitly included by other tables. The list is not @@ -128,7 +137,7 @@ "List of sets of tags table which have been used together in the past. Each element is a list of strings which are file names.") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom find-tag-hook nil "*Hook to be run by \\[find-tag] after finding a tag. See `run-hooks'. The value in the buffer in which \\[find-tag] is done is used, @@ -136,7 +145,7 @@ :group 'etags :type 'hook) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom find-tag-default-function nil "*A function of no arguments used by \\[find-tag] to pick a default tag. If nil, and the symbol that is the value of `major-mode' @@ -879,7 +888,8 @@ ;; Save the current buffer's value of `find-tag-hook' before ;; selecting the tags table buffer. For the same reason, save value ;; of `tags-file-name' in case it has a buffer-local value. - (let ((local-find-tag-hook find-tag-hook)) + (let ((local-find-tag-hook find-tag-hook) + (current-major-mode major-mode)) (if (eq '- next-p) ;; Pop back to a previous location. (if (ring-empty-p tags-location-ring) @@ -919,7 +929,7 @@ find-tag-regexp-next-line-after-failure-p find-tag-next-line-after-failure-p) (if regexp-p "matching" "containing") - (or (not next-p) (not last-tag))) + (or (not next-p) (not last-tag)) current-major-mode) (set-marker marker (point)) (run-hooks 'local-find-tag-hook) (ring-insert tags-location-ring marker) @@ -1061,6 +1071,26 @@ (goto-char (marker-position marker)) (set-marker marker nil nil))) + +(defun tags-file-name-qualified-p (file-name current-major-mode) + "Is file name qualified? Return always t if `tags-major-mode-sensitive'= =20 +is nil. Otherwise return if the file matches major-mode file name regexp." + (if (or=20 + (null tags-major-mode-sensitive)=20 + (eq tags-major-mode-sensitive 'default)) + t + (let ((al auto-mode-alist) + (found nil)) + (while (and (not found) al) + (let* ((x (car al)) + (file-name-regex (car x)) + (major-mode-sym (cdr x))) + (setq al (cdr al)) + (setq found (and + (eq current-major-mode major-mode-sym) + (string-match file-name-regex file-name))))) + found))) + (defvar tag-lines-already-matched nil "Matches remembered between calls.") ; Doc string: calls to what? =20 @@ -1069,7 +1099,8 @@ order next-line-after-failure-p matching - first-search) + first-search + current-major-mode) "Internal tag-finding function. PATTERN is a string to pass to arg SEARCH-FORWARD-FUNC, and to any member of the function list ORDER. If ORDER is nil, use saved state @@ -1129,7 +1160,8 @@ (while order (while (funcall search-forward-func pattern nil t) ;; Naive match found. Qualify the match. - (and (funcall (car order) pattern) + (and (tags-file-name-qualified-p (file-of-tag) current-major-mode) + (funcall (car order) pattern) ;; Make sure it is not a previous qualified match. (not (member (set-marker match-marker (save-excursion (beginning-of-line) =3D=3D=3D modified file 'lisp/progmodes/gdb-mi.el' --- lisp/progmodes/gdb-mi.el 2010-07-29 13:13:11 +0000 +++ lisp/progmodes/gdb-mi.el 2010-08-29 09:37:07 +0000 @@ -456,7 +456,7 @@ Most recent commands are listed first. This list stores only the last `gdb-debug-log-max' values. This variable is used to debug GDB-MI.") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom gdb-enable-debug nil "Non-nil means record the process input and output in `gdb-debug-log'." :type 'boolean =3D=3D=3D modified file 'lisp/progmodes/grep.el' --- lisp/progmodes/grep.el 2010-05-21 20:43:04 +0000 +++ lisp/progmodes/grep.el 2010-08-29 09:37:07 +0000 @@ -60,7 +60,7 @@ (setcar (cdr (assq symbol defaults)) value))) (set-default symbol value)) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom grep-window-height nil "*Number of lines in a grep window. If nil, use `compilation-window-hei= ght'." :type '(choice (const :tag "Default" nil) @@ -112,7 +112,7 @@ :version "22.1" :group 'grep) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom grep-command nil "The default grep command for \\[grep]. If the grep program used supports an option to always include file names @@ -160,7 +160,7 @@ :set 'grep-apply-setting :group 'grep) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom grep-find-command nil "The default find command for \\[grep-find]. In interactive usage, the actual value of this variable is set up @@ -235,7 +235,7 @@ :version "22.1" :group 'grep) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom grep-setup-hook nil "List of hook functions run by `grep-process-setup' (see `run-hooks')." :type 'hook =3D=3D=3D modified file 'lisp/progmodes/inf-lisp.el' --- lisp/progmodes/inf-lisp.el 2010-01-13 08:35:10 +0000 +++ lisp/progmodes/inf-lisp.el 2010-08-29 09:37:07 +0000 @@ -70,7 +70,7 @@ :group 'lisp :version "22.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom inferior-lisp-filter-regexp (purecopy "\\`\\s *\\(:\\(\\w\\|\\s_\\)\\)?\\s *\\'") "*What not to save on inferior Lisp's input history. @@ -140,13 +140,13 @@ (define-key inferior-lisp-mode-map "\C-cv" 'lisp-show-variable-documentation)) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom inferior-lisp-program (purecopy "lisp") "*Program name for invoking an inferior Lisp in Inferior Lisp mode." :type 'string :group 'inferior-lisp) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom inferior-lisp-load-command (purecopy "(load \"%s\")\n") "*Format-string for building a Lisp expression to load a file. This format string should use `%s' to substitute a file name @@ -158,7 +158,7 @@ :type 'string :group 'inferior-lisp) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom inferior-lisp-prompt (purecopy "^[^> \n]*>+:? *") "Regexp to recognize prompts in the Inferior Lisp mode. Defaults to \"^[^> \\n]*>+:? *\", which works pretty good for Lucid, kcl, =3D=3D=3D modified file 'lisp/progmodes/sql.el' --- lisp/progmodes/sql.el 2010-08-10 23:04:32 +0000 +++ lisp/progmodes/sql.el 2010-08-29 09:37:07 +0000 @@ -551,7 +551,7 @@ (defvar sql-indirect-features '(:font-lock :sqli-program :sqli-options :sqli-login)) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom sql-connection-alist nil "An alist of connection parameters for interacting with a SQL product. @@ -600,7 +600,7 @@ :version "24.1" :group 'SQL) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom sql-product 'ansi "Select the SQL database product used so that buffers can be highlighted properly when you open them." =3D=3D=3D modified file 'lisp/ps-bdf.el' --- lisp/ps-bdf.el 2010-01-13 08:35:10 +0000 +++ lisp/ps-bdf.el 2010-08-29 09:37:07 +0000 @@ -41,7 +41,7 @@ (eval-and-compile (require 'ps-mule)) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom bdf-directory-list (if (memq system-type '(ms-dos windows-nt)) (list (expand-file-name "fonts/bdf" installation-directory)) =3D=3D=3D modified file 'lisp/ps-mule.el' --- lisp/ps-mule.el 2010-01-13 08:35:10 +0000 +++ lisp/ps-mule.el 2010-08-29 09:37:07 +0000 @@ -92,7 +92,7 @@ (require 'ps-print)) =20 =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom ps-multibyte-buffer nil "Specifies the multi-byte buffer handling. =20 =3D=3D=3D modified file 'lisp/ps-print.el' --- lisp/ps-print.el 2010-03-12 17:47:22 +0000 +++ lisp/ps-print.el 2010-08-29 09:37:07 +0000 @@ -1830,7 +1830,7 @@ ;; B4 10.125 inch x 14.33 inch ;; B5 7.16 inch x 10.125 inch =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom ps-page-dimensions-database (purecopy (list (list 'a4 (/ (* 72 21.0) 2.54) (/ (* 72 29.7) 2.54) "A4") @@ -1880,7 +1880,7 @@ :version "20" :group 'ps-print-page) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom ps-paper-type 'letter "Specify the size of paper to format for. Should be one of the paper types defined in `ps-page-dimensions-database',= for @@ -2965,7 +2965,7 @@ ;; Printing color requires x-color-values. ;; XEmacs change: Need autoload for the "Options->Printing->Color Printing" ;; widget to work. -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom ps-print-color-p (or (fboundp 'x-color-values) ; Emacs (fboundp 'color-instance-rgb-components)) =3D=3D=3D modified file 'lisp/shell.el' --- lisp/shell.el 2010-06-11 13:28:41 +0000 +++ lisp/shell.el 2010-08-29 09:37:07 +0000 @@ -114,7 +114,7 @@ "Faces in shell buffers." :group 'shell) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom shell-dumb-shell-regexp (purecopy "cmd\\(proxy\\)?\\.exe") "Regexp to match shells that don't save their command history, and don't handle the backslash as a quote character. For shells that =3D=3D=3D modified file 'lisp/textmodes/ispell.el' --- lisp/textmodes/ispell.el 2010-07-07 10:30:57 +0000 +++ lisp/textmodes/ispell.el 2010-08-29 09:37:07 +0000 @@ -481,7 +481,7 @@ :type 'boolean :group 'ispell) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom ispell-personal-dictionary nil "*File name of your personal spelling dictionary, or nil. If nil, the default personal dictionary, (\"~/.ispell_DICTNAME\" for ispel= l or =3D=3D=3D modified file 'lisp/textmodes/table.el' --- lisp/textmodes/table.el 2010-05-25 02:11:08 +0000 +++ lisp/textmodes/table.el 2010-08-29 09:37:07 +0000 @@ -796,7 +796,7 @@ :type 'integer :group 'table) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom table-cell-map-hook nil "*Normal hooks run when finishing construction of `table-cell-map'. User can modify `table-cell-map' by adding custom functions here." @@ -820,19 +820,19 @@ :type 'boolean :group 'table) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom table-load-hook nil "*List of functions to be called after the table is first loaded." :type 'hook :group 'table-hooks) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom table-point-entered-cell-hook nil "*List of functions to be called after point entered a table cell." :type 'hook :group 'table-hooks) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom table-point-left-cell-hook nil "*List of functions to be called after point left a table cell." :type 'hook =3D=3D=3D modified file 'lisp/textmodes/tex-mode.el' --- lisp/textmodes/tex-mode.el 2010-05-13 21:52:20 +0000 +++ lisp/textmodes/tex-mode.el 2010-08-29 09:37:07 +0000 @@ -56,14 +56,14 @@ :prefix "tex-" :group 'tex) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-shell-file-name nil "*If non-nil, the shell file name to run in the subshell used to run TeX= ." :type '(choice (const :tag "None" nil) string) :group 'tex-run) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-directory (purecopy ".") "*Directory in which temporary files are written. You can make this `/tmp' if your TEXINPUTS has no relative directories in = it @@ -72,7 +72,7 @@ :type 'directory :group 'tex-file) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-first-line-header-regexp nil "Regexp for matching a first line which `tex-region' should include. If this is non-nil, it should be a regular expression string; @@ -82,7 +82,7 @@ regexp) :group 'tex-file) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-main-file nil "*The main TeX source file which includes this buffer's file. The command `tex-file' runs TeX on the file specified by `tex-main-file' @@ -91,13 +91,13 @@ file) :group 'tex-file) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-offer-save t "*If non-nil, ask about saving modified buffers before \\[tex-file] is r= un." :type 'boolean :group 'tex-file) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-run-command (purecopy "tex") "*Command used to run TeX subjob. TeX Mode sets `tex-command' to this string. @@ -105,7 +105,7 @@ :type 'string :group 'tex-run) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom latex-run-command (purecopy "latex") "*Command used to run LaTeX subjob. LaTeX Mode sets `tex-command' to this string. @@ -113,7 +113,7 @@ :type 'string :group 'tex-run) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom slitex-run-command (purecopy "slitex") "*Command used to run SliTeX subjob. SliTeX Mode sets `tex-command' to this string. @@ -121,7 +121,7 @@ :type 'string :group 'tex-run) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-start-options (purecopy "") "*TeX options to use when starting TeX. These immediately precede the commands in `tex-start-commands' @@ -131,7 +131,7 @@ :group 'tex-run :version "22.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-start-commands (purecopy "\\nonstopmode\\input") "*TeX commands to use when starting TeX. They are shell-quoted and precede the input file name, with a separating s= pace. @@ -155,14 +155,14 @@ "verbatim" "verbatim*" "verse" "math") "Standard LaTeX block names.") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom latex-block-names nil "*User defined LaTeX block names. Combined with `latex-standard-block-names' for minibuffer completion." :type '(repeat string) :group 'tex-run) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-bibtex-command (purecopy "bibtex") "*Command used by `tex-bibtex-file' to gather bibliographic data. If this string contains an asterisk (`*'), that is replaced by the file na= me; @@ -170,7 +170,7 @@ :type 'string :group 'tex-run) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-dvi-print-command (purecopy "lpr -d") "*Command used by \\[tex-print] to print a .dvi file. If this string contains an asterisk (`*'), that is replaced by the file na= me; @@ -178,7 +178,7 @@ :type 'string :group 'tex-view) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-alt-dvi-print-command (purecopy "lpr -d") "*Command used by \\[tex-print] with a prefix arg to print a .dvi file. If this string contains an asterisk (`*'), that is replaced by the file na= me; @@ -197,7 +197,7 @@ (sexp :tag "Expression")) :group 'tex-view) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-dvi-view-command `(cond ((eq window-system 'x) ,(purecopy "xdvi")) @@ -212,14 +212,14 @@ :type '(choice (const nil) string sexp) :group 'tex-view) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-show-queue-command (purecopy "lpq") "*Command used by \\[tex-show-print-queue] to show the print queue. Should show the queue(s) that \\[tex-print] puts jobs on." :type 'string :group 'tex-view) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-default-mode 'latex-mode "*Mode to enter for a new file that might be either TeX or LaTeX. This variable is used when it can't be determined whether the file @@ -228,14 +228,14 @@ :type 'function :group 'tex) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-open-quote (purecopy "``") "*String inserted by typing \\[tex-insert-quote] to open a quotation." :type 'string :options '("``" "\"<" "\"`" "<<" "=C2=AB") :group 'tex) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom tex-close-quote (purecopy "''") "*String inserted by typing \\[tex-insert-quote] to close a quotation." :type 'string =3D=3D=3D modified file 'lisp/textmodes/texinfo.el' --- lisp/textmodes/texinfo.el 2010-01-13 08:35:10 +0000 +++ lisp/textmodes/texinfo.el 2010-08-29 09:37:07 +0000 @@ -41,13 +41,13 @@ :link '(custom-group-link :tag "Font Lock Faces group" font-lock-faces) :group 'docs) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom texinfo-open-quote (purecopy "``") "String inserted by typing \\[texinfo-insert-quote] to open a quotation." :type 'string :group 'texinfo) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom texinfo-close-quote (purecopy "''") "String inserted by typing \\[texinfo-insert-quote] to close a quotation= ." :type 'string =3D=3D=3D modified file 'lisp/time.el' --- lisp/time.el 2010-07-27 02:10:05 +0000 +++ lisp/time.el 2010-08-29 09:37:07 +0000 @@ -85,7 +85,7 @@ :type 'number :group 'display-time) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom display-time-day-and-date nil "\ Non-nil means \\[display-time] should display day and date as well as time= ." :type 'boolean =3D=3D=3D modified file 'lisp/type-break.el' --- lisp/type-break.el 2010-05-03 02:29:46 +0000 +++ lisp/type-break.el 2010-08-29 09:37:07 +0000 @@ -71,7 +71,7 @@ :prefix "type-break" :group 'keyboard) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom type-break-mode nil "Toggle typing break mode. See the docstring for the `type-break-mode' command for more information. @@ -84,13 +84,13 @@ :group 'type-break :require 'type-break) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom type-break-interval (* 60 60) "Number of seconds between scheduled typing breaks." :type 'integer :group 'type-break) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom type-break-good-rest-interval (/ type-break-interval 6) "Number of seconds of idle time considered to be an adequate typing rest. =20 @@ -103,7 +103,7 @@ :type 'integer :group 'type-break) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom type-break-good-break-interval nil "Number of seconds considered to be an adequate explicit typing rest. =20 @@ -114,7 +114,7 @@ :type 'integer :group 'type-break) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom type-break-keystroke-threshold ;; Assuming typing speed is 35wpm (on the average, do you really ;; type more than that in a minute? I spend a lot of time reading mail =3D=3D=3D modified file 'lisp/url/url-util.el' --- lisp/url/url-util.el 2010-05-19 15:23:53 +0000 +++ lisp/url/url-util.el 2010-08-29 09:37:07 +0000 @@ -41,7 +41,7 @@ (modify-syntax-entry ?{ "(" url-parse-args-syntax-table) (modify-syntax-entry ?} ")" url-parse-args-syntax-table) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom url-debug nil "*What types of debug messages from the URL library to show. Debug messages are logged to the *URL-DEBUG* buffer. =3D=3D=3D modified file 'lisp/vc/add-log.el' --- lisp/vc/add-log.el 2010-08-21 14:09:46 +0000 +++ lisp/vc/add-log.el 2010-08-29 09:37:07 +0000 @@ -62,7 +62,7 @@ :group 'change-log) =20 ;; Many modes set this variable, so avoid warnings. -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom add-log-current-defun-function nil "If non-nil, function to guess name of surrounding function. It is used by `add-log-current-defun' in preference to built-in rules. @@ -70,7 +70,7 @@ :type '(choice (const nil) function) :group 'change-log) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom add-log-full-name nil "Full name of user, for inclusion in ChangeLog daily headers. This defaults to the value returned by the function `user-full-name'." @@ -78,7 +78,7 @@ string) :group 'change-log) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom add-log-mailing-address nil "Email addresses of user, for inclusion in ChangeLog headers. This defaults to the value of `user-mail-address'. In addition to =3D=3D=3D modified file 'lisp/vc/diff.el' --- lisp/vc/diff.el 2010-06-11 19:09:57 +0000 +++ lisp/vc/diff.el 2010-08-29 09:37:07 +0000 @@ -35,13 +35,13 @@ "Comparing files with `diff'." :group 'tools) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom diff-switches (purecopy "-c") "A string or list of strings specifying switches to be passed to diff." :type '(choice string (repeat string)) :group 'diff) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom diff-command (purecopy "diff") "The command to use to run diff." :type 'string =3D=3D=3D modified file 'lisp/vc/pcvs.el' --- lisp/vc/pcvs.el 2010-06-11 19:09:57 +0000 +++ lisp/vc/pcvs.el 2010-08-29 09:37:07 +0000 @@ -2332,14 +2332,14 @@ ;; Hook to allow calling PCL-CVS by visiting the /CVS subdirectory ;; =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom cvs-dired-action 'cvs-quickdir "The action to be performed when opening a CVS directory. Sensible values are `cvs-examine', `cvs-status' and `cvs-quickdir'." :group 'pcl-cvs :type '(choice (const cvs-examine) (const cvs-status) (const cvs-quickdi= r))) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom cvs-dired-use-hook '(4) "Whether or not opening a CVS directory should run PCL-CVS. A value of nil means never do it. =3D=3D=3D modified file 'lisp/vc/vc-rcs.el' --- lisp/vc/vc-rcs.el 2010-06-11 18:51:00 +0000 +++ lisp/vc/vc-rcs.el 2010-08-29 09:37:07 +0000 @@ -89,7 +89,7 @@ :type '(choice (const :tag "Work out" nil) (const yes) (const no)) :group 'vc) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom vc-rcs-master-templates (purecopy '("%sRCS/%s,v" "%s%s,v" "%sRCS/%s")) "Where to look for RCS master files. =3D=3D=3D modified file 'lisp/vc/vc-sccs.el' --- lisp/vc/vc-sccs.el 2010-06-11 18:51:00 +0000 +++ lisp/vc/vc-sccs.el 2010-08-29 09:37:07 +0000 @@ -75,7 +75,7 @@ :type '(repeat string) :group 'vc) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom vc-sccs-master-templates (purecopy '("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)) "Where to look for SCCS master files. =3D=3D=3D modified file 'lisp/vc/vc.el' --- lisp/vc/vc.el 2010-07-16 15:42:15 +0000 +++ lisp/vc/vc.el 2010-08-29 09:37:07 +0000 @@ -740,7 +740,7 @@ :group 'vc :version "22.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom vc-checkout-hook nil "Normal hook (list of functions) run after checking out a file. See `run-hooks'." @@ -748,7 +748,7 @@ :group 'vc :version "21.1") =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom vc-checkin-hook nil "Normal hook (list of functions) run after commit or file checkin. See also `log-edit-done-hook'." @@ -756,7 +756,7 @@ :options '(log-edit-comment-to-change-log) :group 'vc) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom vc-before-checkin-hook nil "Normal hook (list of functions) run before a commit or a file checkin. See `run-hooks'." =3D=3D=3D modified file 'lisp/view.el' --- lisp/view.el 2010-05-03 02:29:46 +0000 +++ lisp/view.el 2010-08-29 09:37:07 +0000 @@ -74,7 +74,7 @@ :type 'boolean :group 'view) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom view-remove-frame-by-deleting t "Determine how View mode removes a frame no longer needed. If nil, make an icon of the frame. If non-nil, delete the frame." =3D=3D=3D modified file 'lisp/winner.el' --- lisp/winner.el 2010-01-13 08:35:10 +0000 +++ lisp/winner.el 2010-08-29 09:37:07 +0000 @@ -67,7 +67,7 @@ "Restoring window configurations." :group 'windows) =20 -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom winner-mode nil "Toggle Winner mode. Setting this variable directly does not take effect; =3D=3D=3D modified file 'lisp/woman.el' --- lisp/woman.el 2010-08-22 20:02:16 +0000 +++ lisp/woman.el 2010-08-29 09:37:07 +0000 @@ -604,7 +604,7 @@ (nreverse manpath))) =20 ;; Autoload so set-locale-environment can operate on it. -;;;###autoload +;; `defcustom' should not be autoloaded ;;;###autoload (defcustom woman-locale nil "String specifying a manual page locale, or nil. If a manual page is available in the specified locale # Begin bundle IyBCYXphYXIgcmV2aXNpb24gYnVuZGxlIHY0CiMKQlpoOTFBWSZTWWEKQpgAMxzfgHgwWPP///oi koD////wYCyd0+3oBwIAAvn3D3vb26w743jr3uuqD2+ee+mq+gBefb3gdAeQAPe53S5g3LAFm0Av c49B7ma6C65ygvfIKtwVtWBCKWWKratUszYxgbuyjZprK22g0iRswlKhCSQIaExMmmgJiT0yT1NU zSjIMQPRqCUaTRMin6EmlPU9R6g9IPUAaAADQA1PEBKUIYp7VGeigAAZMgGhoAJNSIagEZT0mmU9 TNT1Bppo00aD1BkACKSAE0aJtNSeE0wmhMjQoGgD1B6gVU0CaNAgimmpmgITahAANNABn7DbRDEM CIxUEpPd5PbmFMDyc+2fExYT5qlD+YmYqoEGq+Uu/Pzvb3GMwiI2NnkShdy9+/bN6LuYshZFWDEV BUViiCgMUFYyIsFWAoMFiiIhAiQSnEogf5c877885vxF17X50xzicXVo1TVqoERmoztB5FQPrDs1 TWHMe3E19nq9x9gtSPDL/zGvWzMMw1eqEkkmEkMnTjJJJbZz6vj9fyX4NWY7W1u4UboztnLeHbmc kvbzj21isWkNnHuejPQAOADmCKS4DCSQxoBkEiCAxC4ikuc6EhIhhnhHgmez4q/DxBOQ7GIGjEzN 5Yc0sBhiheKdlbEZRnYwwqgFOFEjUFGXOpG6sEXuyHtXDAiiw7KziV1NS1Cqo28xTmVkFkOagPI5 YIULarBJhzU5TOhSuRDTra0PLrThL3cysN7cuLM5cBU6mUWo7MOZZyEFC+O9XBz0fZ7/5wAOZ+aI IijVQo42+GVJ4zr8p8nbf/Pgv8bb4Nc4uOnp/fF+6QA75ADukAGKEWQVYsUigKSIxRVUkWEWAoLI RQBUYoioCDARUFURiKqooLFBFYLBiKCkQQRAUUUFiJF4++QJJ2zrOyuenC9+xvCz291GMlRBIg/A j4BKFIkqBeCQ0SeUIyYBKoqCyzeqTDUpQDp49Ci0IDROJC0hpjLDGyUGWWSDpw0ZBg0YeIuyNOwh pZsGCMBF1VwyDaqKpQCCGeXa4TZ4Na2lZGaEGUZNnlteBwSu1GwGeExaD23J6RvW3dMSQSiJBJyc ORwWQSjGpkN1mmeWDcKSNhcgHDeDGMOZTFJCgWrfFCkizcjbgPaekUbOHAeIrFyjR0ilbg2aVPXV QzxnQpfKtQRJR2VWIYc2WSDlxFWo0zjrKhSxTQZAojICrh4CKStApCzgIk2cUVkhtVk3IOwtqqyZ o4MmWNMagaKRwiyMI0gnTR49GyZ45EEUXK5pBSk0RRFHToPDjdmyCeaKVyobCS06uSOI6DyAQdC5 cKDhzEjpojSCCHgXESbqiUjp2RehBnTpwgmyIB5ZEne9HdIuuUltdXvRm5xlZ5Fph1eTacqOmAB6 2QklvD1ezIFUy/PyqOWXhwRVM6KpVVnic3RXGiJQccJKAW/myP/XZi+6WfNayIL1AJ4oohFUigmU A1STgQEO4JJHZz6nz1QEgDCl8zI456buXAjzoEPzN3FtVClwoo+9XbP3aiVZQMlO3MwZCi1TnyU0 cFxy9XVAfXDeZkLok5uugciEaoKTA2HDqAturvfl9XOAAZJzq8HggxYXISAJD8S6IqoiIVGK2hZo g2ohU4gRHh6GYAnnT1R7O11r1txHoMdMWfHqjiMV2WxPGItrysjbhfZbRxvc6bat3C3DhoY2Vy90 JBSSTjQVAghzBVPgBVNG8FUoX7QfEJyg9PY+n2niGPS86UhneHclaT5418vKgviiD4HnzScd/cXd 7f0T5vf05zUOsJQjRKNf2/ewZwmQAeBisCTC7JgVxA+wQM5A6IBohRwBaBkCySEHAU40KMPAeFXE bVRoRDItWmUzQblQpgoFwrzgAeUpCehCj16ySJ5GomrzyLpsaZOmsZTocNd4qlPywhARwNmyyzxb 5u366RRCd+gH5YVEc8hWmJ9ZISSIPNRbKl0TKCEb3jQcHra4xhUcSyYpaFy3XReaaM8dLTGOuUVF kG5mGZMzLa5DmBkhAUZrZmxuvWM4NVlCLQfpviPhGP+YUecmV4+77GNzfdU0T4WsHpUaq+d7Tl1u IwaFzQ3bJtWhu2TIarMKO2yhC67ZRshssou2Q1XYTWYcpoTWatU0LOmjls2Lu1my7tZ46eZSSFkp PyRvEyPtv3I/dIAwEAVRrSAH8fY3twdxfz48qJRZpe1HtFSg5y6krfJACk1GKIXGAshZyYGEhkwm jAKTW3SKONWLwLpmws5DCSzIGpkFJkhNGEl0gar1hhmkCzjK2hcka7sBDszYU4sk93m97Y0kaVpt Whpa1i0sMYZQmtpM0kKUcy9BKc7lSAbBISBJFU/7Tz/jdXVRNjNWCo2TUolN9OeeqfwLCmZvksjv pVo2b//rYq0ptmjKGbKptGU8K7t2y5Nyhc98udddZu7verzOj4wZtSXNh7jhQLunwq04ePGlGy1G jhlq/4fa/XGL0riyvKacqRJJIVXI2ZlCZmV6t0DV7oYZgQ3FitPAtrZfyrTXaWsRTCUp2mQromhw 7cMqzVemXCorhnNuy5uVpxZCQC5uTNtLZxme7pMXMr6phuhDLPeiW89cokmgkkZkkto1lhyohDkq 9erM2a6y0Rq74o3klKUllVOkkheqaKS8JtnKhd0iUkmISS8Yl+2qzZ05aPLto4faajRZ/g4WaquW yFn85JPpq683dPL22WbKqsLrPDlogu8nDn3Z8/PL5fDo0esC0vKy0rrwKigidOXttWw2WEzrwurp vbbdHjJw6XnkCSaXy6dC9LFGSKMVRXy1zyx1l75DR8DZXRhFnlyEMOZsZCgg7eTyw6oTbLNHbQby 27BLmgw8vO7eS8qDXiy7Q52d+J+fX7PrfyeX203ULPDENkkXg9csMb2B0K4zFXArCao7MMzCXgkX vc6dxeccF2XQkWtiRiyJLIllsnEv3a+376rmO0eb027zpKPHVKLGhVTVRAk2JQTwlMF1duGi+yKy lEgqFVJRRTZDa6cpJ2SvC0KtO/TL6OVna1NJcJqd7ZlpNdpshVVLV3VGNVFFntps295Xqhjubhx2 9vjrvC7OeeC2X0rh+Z505r1us2zXtU0zRXkpfWqK688uoxxrs0xfivN945LNWGa4z2nCEpP8pSY6 9M2ZFZqnYZmY4N1pwcFhoNHaYE43XrCdSHTRMv5Q7PTZNaU4UV4UlThOvuSQnWJMNrtdaQHJjCqo wgNEQ64rtTh6JtFq2Dj89L+fSc7y2z8pzm4Ih12u9PheNNrIpM62fKkrQquu8WRHynK7WFlJywhD 2ZQ4XNryQ4hDjZVvB4hPhl4c2Lz2oYpiiNFKIhlOZXlVmWLES06ROeuJrOafLwpV4dL2R2m1u6z2 0utDV8OX4xYg+s9NHDwrKXjpwllWVEKQl2llPtCqG2yb6O32qnex4lhCsaySlKSqzVW6K8VYQ532 1fNmMoJeobIcuGph8sbPiUg4evuu3a4XS/VLwxjduqrXy9ukLtmXG6OV307WVW4YZaved3hOmFGi 6H4PDhRquy3Q2dIfhNosw3INnKFiWIhAXWt416/t/H89COvVleOhfF7TslvqAdCqra41wIl+Odnr g3Zut5JmDMpb43aoVELtk9FWQsloxNzssquF5yFkVb21pnQvDzKzvtYA0ar7VpiGDlVjQo2SEgS9 5qx1FpzNpYxnoa7Ekkik3NEvKKhxePrJCoYbdxLSZeYFgUhjbKZKnTatrtyQcQImopcwOV10aAeL aFbYs0dqpvueHTXRK+sRziLa3kvdHV6mXE3SajDKz1CNk0MrXtZmpZZc8NVnLZy4Zk1cP5Stvysr eS8DxdZRTRpWIl1q1dMG6HSHa7Y1csTu6nROecVpZNuhhZRssmfsypJ16so+EO4Mu3bzytJ2smyd JsQ7vNNCzw9Uv7Zdowi62xZR+/nS+rfMRW22HMb0NW52LzRDCG4eSCgiXO9OB07ejdrRe2a25bOX Gj5VShq3Xq1bt3XTlZVbVpamNkc19KqzaaKoMvu9ukIat0Xl4nFJxmnjtWW8JJCuN2FY07YMVZZT eLTYattHtwm2eX5apSF2jCxdUq0cumjRsmw9NFXLVX7jVZ4VfLu0Rwwh03VWYWbOHNXykkMUdu0L stmHbpZ2qmuTIfJlhV2hhNsoo2fRH8/t8+pyxnjra+8cVtSd0cVhcDUk+1+XIG77JwZMjL6cjKnM ZkxRkk1VQVgsQuNXR7A05R9IkEcHF8myOjvELpWOaQ7XTXbNLVQ3YXkk+vhZ+Mo2sJTiDbquMar6 UbfDXnqt4Z8NqyhCnTa7+WGWX0dKv3zaO+J07d099bJUlKUpSRSfOiGLMuFVYXj05aPKqfF6c04T nvXnZmxRhyQo7/D0pFUszxpssnO9Pg+9enpuhdVWUT8POrphZ5VTw5c7PNKTnaSJJPLdjzjptNjd om45bJqtnTTVLXwjr85y71aMo9qMPLR5ZWTOHbNrlIilktMpJDVejVPLhdim2l5+dlWqq0RpmU04 nSfl882Q3lCqedFFl8+VFnptOI7rSJ+lXbNkU8NJbpsqq6tnOzX48h4lKSFUcOmVGGzl00ckOmF2 XLCiayZdNRuw2asNlF1miZVommhso3WQ8tXCZd6TfsmysWlpWJxEpKriQxcSIESoy7iv4ecLDQtt eNdi+otpp2NR3HHdnH5Fwz0rEd+LmIl3fSEXm1HC1tu7dGogKqky4rbp84g1ZYjjmFp7MuY3XEgz QmGxcrKyq6+ICZHrFdBYPpF+Xl+jCr6by7plRPZEkhVlwzmbZcLIdojRczsyskSvowfAYqNheQNC JArmVOqMEJJGJ16dGXTLlhxLdzNwnRCG9frl7rw37WU2Yhy5UdqqpqtvdGVFl12mxzOs5z5T9c17 jZ41KHlrjokjUTIji4rSJATYaENZQTQkmEVazIu5ctLLXYdWalRGiINiJjk2IIOTQTu0Z61Z1Q3u Q3ibG45wNwIc1LifZO96bMrdeIitnhDV2mr4cOVfGWJRWndkFkbJu0b43YVbJeV2Xp++dNkcMtGq zyo0WWhR/PVpn4niWCQ8JdPb4cvbwo7YNWXTn1dHLY2eEMO1lXXvRRRZCsbkYTQ0WIVa6EdP1ws8 u3LynLqrpq0dzuh03dJoazkfcvs+1i7E/LbUljY5xkwwzzdjg6TBltcOGpb1whJEVZn0gkdXZqTp cRtAvvFEVJIRhKRYJupmiYsAvIKMiwwgZ+LBG8sJePHQVD24c95IthUUjcH3G0tOMK+JvLCtGsbD FCNZErhNw7etfEJrN0NnpOIjM9HtZZrs4miU15aovdhE5zURLSbhWbF7076buHTrCI534jiKzheH tnxhLnhs/HV5d7tvL1IeXavPl66lzHDRTecdLT9OVD9tHMqu1E3SF90VYnEo6tdeqia132WSuivq 8vlX4eHt8lFeknvKm20sz5zN5vXh4OVVk5y0apwiMUpHtDCjrRNRRDhVlN7XpGyeOIlROmZzpLtu s0Q5TSo8MmVXlZRyys3ouw0X5csOmi62rRu8MPGGq6qibLhNRyafh/HGqMuGW7ZuoUcPCEkioz0i Yk9NeZx3dzP2QkkeNN2a4VkLYvhc+SHI9fzefB9xqVfY7wxiRNzzWN7cMhVNRInpYm5F32i+UIUY ajMNASZDHwGBgg50eF7jmfqw3Rhndw9q3fa6jiezHvd/JC8l92IifNIe+DPqSNCKwiNB2FPAYgDV FY5J07icCY4q34qNuXrVNyujXXl9Ifg2TbT4w3TTr4cPCpN97R4OW7d7Kt7xr814T5e2buHpts5c NFaxETT9IwiuiFnarpyu6ZdtmEfOUvEmfDp7+KvSlN39X6vZhnt4QhnPUnxE/ayzDDz7Ucl1GW7w 1zxaI9ctVFmHqyPhqqm1UfL856ceG+lkUPN771Too6Q4wjhVqordy/P6+c+EokTJCPS72s8OW01j Dp04dPvUZWfy+Gjp9saqpy+HhmbpN4aOHbwmuss0aGKTR5QQKTUQMrBxOY4xKxxX3Qj4ws2e/b7G RN6t3U8C1+h6ueeCwzHaF10oLIti2L3lnzDi8MCLqcPKJ0atUqxIQouSSspZAx3QphyM7MXOTUNv byhU+2XpC0cHAAs5xB74AN7wq1TZTwkkMSVZfR4aZllpRsm3lvxVwtKN3hErOW27VsxvfaeESzwX s+lXSCyFUKTq3arscRESwtpu0atE5fnOWrhhq0fR4Nyh43WSj8CRvNcEQ/ZLaDtQySmlHJsZKldN EJ4miXVbquF+cVT5ss++xdZo+1MI9uXhnl4iNXj86OEuGO4hSKKuEzXjOhS8I0k229NWG7WeIiPh ym3tt5dKSps6e2X228ySEbNHD4eny28KtU1W7wu9tKIXTTeWibZdVnbpynTDRy796uVVa7KN3D9/ 14fLtdttlYjI1kzUSLTErQkkYmXiV+PYuS2ZugsL9UdUYQzh+7TcnPLhDt6JQ3qkiyMGYItnmJHm 9IQKmInqvmCVNialET2Kw2ql+m59g6Ov0CxHvjXq8r18sKroVU4peCc5Rms7TcvTfnSrWWiEIS2w oo7xtSVGlK6XMo/tl9UURVh9zlRZCQG60tLjEqLlFzM6+i6KUyaESLCgiKZu3an3vloh6zlxOWkQ up4Txl4Xwyoxvw/b8EmzHOE7ohG7mcDnJwSdo5cw264x07KKKUXQjghuxw9HL1Lbe1JxRSE9nK2y ZuhyNJZ9qqaqrofKby5bNhxow1YTT5aNjy5QueH5ecpZ/DVRd933fL5WcLWs+FyGLo9oNzt4PDhw 8NVXrhgmy52TctWqbVhlys4cKWT/Kby+UtHT+7x2brrFGVn7d/fT9HVOu/qWca/KeDnw1npWY3mq ttcpbRKbvxSlEJTFJrWp5u6E7vtzS2dGlVU5VxOZURUwoFubED6VsqxZ6lR6LsYldvf291hmZmLl 941Iu7xRT61zOVZsKiLQvGEICovNNNRM3yndlfZe8c4jGUCkghJIc+rHXjRVfQmVZeWFZiZZYU1Y YE3QcWlr20vfTlZ2w0aQau3v3yz7YypObVhRZ59t3LVJIemvhz/Ofnd6vrFp1nFuuKzcLvSHZTAp LmJFRlM2DGsYwy4Kd6oczlhmFtY1ncUpFK0dPLnxqndljWjdR4Yquq9LvHj+qjDrXSc6MJ+3Hlet FXh9Gii7w+GM5jSL+VJzW+iFWE3lmz+muHbKezCNntNozVRpObT4YaMvq6y8tTZ25avKHTKzddso 0aptDVWbzN20ONHWpTWqy6j6aJuGi2UWavRlc3JFpSVFWKp+Z+OdfSk60eZcxCA0zRc1LJAYstqU 9fUAUTJgKBpn2Ve9SXJ1XjaEgXqCBFdQDKgECewUCqtslIs/egqkvwCqSBVJAqkgQIuT1xZQkEME IEKLIqwYkUVVUVGIjEGCx7FqqoqhZVUq0SqWiqVaJVVVALQFUqoiqqoirFVVWQBVUjGCqqyMYoKq qqokVVUVjFXlIANPf4yAHqt5odayEA9cuKdrJROhwHfWged2Al8KJECwqxCIPv8bXOMfTYOSiQZE kRgkAYwYiEDAQwBAQEQN8KgYcZxQCpFU3cuqCAu5yGMBj3N5kVFpxIFZWdPsUQuQgKSJSCazVwns 0T/OW6jllg1av64cv0aNWVE1mij9WUJrJuFHDd00eGF2V3SrZZ4JtWzlu4UWlNRDR0s3T6bIarOk 1mGjpwwq6ZJrMKsqunDly4flqyhl2yy0Q/jdZlV09y7x5bKU8G7L7/vw/KWWi5NfQfXYD0CSQ9UG woNw8zMSbk8u7tMSST51feraMqPhsyh/Dwuu099MKpvxlRu6fSUu7M8dgoExOpd6zKgn+oF1vL8Q 9DGdD4ZJ/Jely+PUaioDwyQBgsNS+n3K2Au0zg3vrL0CA+1Rg8Cdtn1QNjMyhMDsMNLP2DX+wKpC KSN/Xu1vt0N5u1HzmvzTRT3ifB3IHyWHE4jykyN5Uq2b7b43Q3ZZbofV96rZ4VaLv4TbptF3Tddh ls4QhD+zDpNqy73Ucu03ThDZ04VaOGVv6Q7YXXcO3Tt2cvn6XdunlhVV5cKVRNRVlsq5aJqMNG67 VDy447ctnDLVZNq35f33l27Q8sNGrVDyq9LnCy7Rs4bJrTZeGjlwwcJsNmqi6qbWbPJfwQkkWBQW lJ3sNZA1DiggaxjxsNZAyJDEjIt/K7KKge9PnBCJ789pw6tvogvNyEkjvlmXiEBofoIAQ/blZm6U dizsAZ312g8gPHkDTUTJnAcbx54idfP2pOQ6qnXjrMYKAWkgiHxApVfKNT6yhhq1Vhu+rVd99l2H bpu1cOGGGjd6bIaLpt3L+01GXfb0o4bKtiblDey6zy/pdV4cOHR5cNXCE0KXUcoKmGocfHugiQMi ZUYDzrcPsJG7odWOX3UFErLSbZ4UbPTyo4WekPl5XUWSSFn+PxLZq+6E2jCSQjt+jiUIZ+ro/1au 12rR0/p87bNC0/lvsBpFZeYDE/EC0n4KPPB70hAZBco3gGOz3BQKKYYAKOKgJzdGHGLTpZ5k9ETO nBgoJk6ZWfNK7I5iqnZgvANloKpDsFVG+UJJFmnEi6Jg2yA4pbN45PHDhh5bX7ms6H4t2Haz91nb RDSb+J/j5J7TvFJaO1H7OE1ENm59VHfdX5sLv0eGrpZRRRl5TbqKIYs7XIbO3cqIysu/rdZom96v lZY6fr7YFhSYBtQgNZ0zzyNEIDMzHlBgXlZtLLTFs7m558K7tzZNj9oq8uHxKUgn/eH7ccRHKs2h ka5qj4iVlBecDEwN50nMzEICgqMjmTNm6rkPpX73p6Quyq9Lv7knzKEmT8vll+V5tLiptBVKjAlN H7dIjd1/QKpF2yrATbui62xPrzJlRv0MgeRKKODrG7ggGzqIPfyLl4kcFGmqOD2fXZqPoaSnLLW5 rPNE0oqnfbr9TRnoRVI9Mo+nDkgBhlAg6NXRqqAZqGKGJ4bppSCIr7rW3j+NJtKJk1Ey5ZdSUg/d /ZZw/q6PmfbA3+0j2pG7kpxbPqOORAidi8sskRPB7say0y6Q+x8Q6bPZqhVq449Pto3fC9+GGrt5 91dfLncG2svlsPrY8tocdttz5c+2yEKdMJ/UPEPquq9tneznA0bBq3VRgYbY29+lZA6nF52OJcaG h2MiJUdTWTKk3yuUbvwcquJVXMNXLdh+n6bPweF0N3BeXl95FBoILayxtUA71ALbEXfCoS6KAcRQ JiYqNRaQdd4PkbA7yAyMDLLI4mKsDUMbSkurOAJAUAkkcYueXikP3F5iGRE1kimwtN4xj5aWr4zL UJJFltGb3sTLzkTtMHwvzu+4zJKUpMPTz8Rp7Ww3ZU5apobtULA2ECqlJMfImydWy3lfuH3QQc7u 02Rd/aRht3xu4WQQQOonTgs0jzAJTPm4SfGA2LyYUA8mEQJDDP7Hlxt9Yx2sdq9NKiBUhfOF+q26 tz6xG+pyneUp9K+ss2hXqP3y6vPp4kBqVa9GRkgbtyIwSQB9MH7ZJCA5Jprx9fE53ZfdhiBEYcOO 5QUjiRJR8Sl+Bx9B8no3ETtEgSPkpJk2jdlNdCGGjQm4Qs/xXf4LuFGrR07bPz/vq1ctTLRpphw2 Roy1UVWbrvLXXVrLhzls4XatpJSlJ27aN96NWVk3TZ21cO2rVNNnPazpo3XvZ4UpooqctSGzZdRN qq2ys0JtWizV4VdKocqO10pSlJ7btFVlnhshZDZo3JrOnRIatmqshVMW8oKyozFJWaCgrBA1asJn b/hQCA9nuKprae2QAuEA1Xp2HzXvx+s2npQux3u18a8vyNK6iNXqiZzR4ABhz+qY+qdvM+Kzzzp8 7dGlqRwgBC80dzpjgSVP8iCHcMAsuV2aMuGZTZHv3ds/4RJk+IUQNlA0iIHsH3ij6gIENXBy1QVx ezNv/FCou01iEA8AfRS2ceBQdftO8rqtjZabsEVTH14e5q8ETNI5bh9FVX6Oo3UkdPF5rtfvUN+h otd3IAodn6VALXiAbd0UTZsQUDJmLLkKM76fM9FQL3afHzsPFYgEQtggYct4BDfGBALF4nTxbRKV o3Idg5i6iQDGcqG49k57bipMnGWK4Jj68T97hhIBhp4rQXwgwojvEgK0AXUOHDDhim69npPUFcGq y8PoieFdKgEcK83vTuGkRA7ioFA52G7L2r4gFnOYtBWeLerUrrh4zP06lLlprHrx68PAOfs0cF0r PAkBZ5F2Pbz2XsL0XcrdwxvrSAOEE1ECHnSWEkC0ECqslpaBRAgZJfqe9w4ePBwxEIVpJAsGjDo2 1ihN87dGGbQtTCKpQ0oCSj0gkQSIFAOQ0S9Xj18S+gpdbDmvjpNIF1JzIORMM+mPoIgbPdm/ONI+ 0H9TAvEJJGyzBr/ucLBQi3rmOzUHWhREiatXtqFVIgQEqaTrnvKOapN1J0ub1oEEMLES3BVfQaiK HGtk1yfZiGeVcu7rO3mB0TKliAGThdGmkIBp9SCnLB/EuDpdUzJKBcGQyqQyQ0BIECx1bMpFvE8i 53nSzHWZ4mbQDeGVmc86Nu3wzkAMZVMuQwZADWZSwzGsYIanGGCBQJ4IcOtvFo4GuPCM895tkh2g 0dfYpuQrd45uhntYQ9aUVTo/LxRVKMUghaoYIUAg0DJmQmiSiHBBqnAzQ6LNhzos79s7IkprnNRp 98UVTiCqlbAd4rZlROzDnRM9jVv/WSiBnK6nSAqB81AShhWSQg3760D4DkH703jE5q5z9DIAigQW qzsAHeOVDsAAcrO65FUqDNy75OJlqJAgRzQCg7YTEou2S8IAkSJycrUA40TfXts6dY9WzzFIAZCA hFriG/CEWsBAVGLF1a1PhhiAVqlRtPHXSsohBUxkrqDrcLWywbk5zNJ5LkwvKfgzXRQkkea9+7P9 qfmh3i17KGXnLA4v+ftZG0tOkXPHp80phZd0pEEihEtJ3f4SRENjUKBD59vK4t7yoPvSiVNaHiNR 3WZhgBAxZuPvIEDMAG6CSM9Ba/0dqzWKtdBG0YY6dWtFOIypWKCdQmrdhkuGr6rFXNwuL429jhXG Cc47f4dNoc3JF1kD2YHkcTrHVJh5AHkSJld2O3ixRfYeO1hzv2/xj9+9PhvPOHod7SLkG31mCgAs hA75ADLN1Qip2zCgcEpUAwfkIgYij0hXWm00lNiA8CYwmHLRhGuut0FWE0mfV5VKqkhQMfuAeXu4 L8bjkftif656i+o7iSSOTEXPcRDJL8URG3QNkGHECA4gS3+pRSAKRIA0Fu3tmsAn+L9zH/DQV341 GbL0a7ryjpU2swqTa2ZrRIAzcG17U/xOmFQvNvQU7G2lVSkwbw0PRyxCIuNiQkkVCqnFnZCgaHlM dxowgiKEKYPDCSIGFdo0gFhnRNNt0Y6uZyRVL1Xd0zYlP4+vx4D936/PH81UOKnLSvAW3dedEJJD LHGkHL6QP+GkH6tkAbPHAde0wwN01Z2GoY0MHW+QqpZ2Ig1KKpSbYr+1L1RVN43ueIiI7wz7rXlq 2m/FstigSA36tmK/bNdx7NBjIpWGCEcG08WyV+9COFzM+qbJE6+2nyPM6GXfHKn56ynpvRVKysEC FAPD+j3tNdMUIxXEchJIvOZL9TpvNjGZ6d2TrfQsdnpvf1pNUj3KjtWa7mImLB6ZCQEDpkea7fHT 4be1fb3srJFT78z3P1gsuYBViCQD/WzflIkvCNOWAZCEA8o2/dWnjOnf69uZFCA4cNu46GVAhAZQ MdKJSOBgP/xdyRThQkGEKQpg --=-=-=--