Mercurial > emacs
changeset 21669:9861518505cb
*** empty log message ***
| author | Dan Nicolaescu <done@ece.arizona.edu> |
|---|---|
| date | Mon, 20 Apr 1998 02:34:53 +0000 |
| parents | 621dd51298ec |
| children | 808ecc2eaa84 |
| files | lisp/calendar/diary-lib.el lisp/cus-edit.el lisp/dabbrev.el lisp/desktop.el lisp/emacs-lisp/debug.el lisp/frame.el lisp/gnus/gnus-art.el lisp/hexl.el lisp/international/ccl.el lisp/mail/rmail.el lisp/progmodes/etags.el lisp/progmodes/octave-mod.el lisp/progmodes/sh-script.el lisp/replace.el lisp/vc-hooks.el lisp/vc.el lisp/vcursor.el |
| diffstat | 17 files changed, 44 insertions(+), 23 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calendar/diary-lib.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/calendar/diary-lib.el Mon Apr 20 02:34:53 1998 +0000 @@ -948,7 +948,8 @@ before those with times; 9999 would place entries with no recognizable time after those with times." :type 'integer - :group 'diary) + :group 'diary + :version "20.3") (defun diary-entry-time (s) "Time at the beginning of the string S in a military-style integer. For
--- a/lisp/cus-edit.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/cus-edit.el Mon Apr 20 02:34:53 1998 +0000 @@ -1781,7 +1781,8 @@ "Default form of displaying variable values." :type '(choice (const edit) (const lisp)) - :group 'custom-buffer) + :group 'custom-buffer + :version "20.3") (define-widget 'custom-variable 'custom "Customize variable." @@ -2226,7 +2227,8 @@ :type '(choice (const all) (const selected) (const lisp)) - :group 'custom-buffer) + :group 'custom-buffer + :version "20.3") (define-widget 'custom-face 'custom "Customize face."
--- a/lisp/dabbrev.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/dabbrev.el Mon Apr 20 02:34:53 1998 +0000 @@ -199,7 +199,8 @@ (defcustom dabbrev-ignored-buffer-names '("*Messages") "*List of buffer names that dabbrev should not check." :type '(repeat (string :tag "Buffer name")) - :group 'dabbrev) + :group 'dabbrev + :version "20.3") (defcustom dabbrev-check-other-buffers t "*Should \\[dabbrev-expand] look in other buffers?\
--- a/lisp/desktop.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/desktop.el Mon Apr 20 02:34:53 1998 +0000 @@ -113,7 +113,8 @@ :group 'desktop :type 'boolean :require 'desktop - :initialize 'custom-initialize-default) + :initialize 'custom-initialize-default + :version "20.3") (defcustom desktop-basefilename (convert-standard-filename ".emacs.desktop")
--- a/lisp/emacs-lisp/debug.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/emacs-lisp/debug.el Mon Apr 20 02:34:53 1998 +0000 @@ -36,7 +36,8 @@ (defcustom debugger-mode-hook nil "*Hooks run when `debugger-mode' is turned on." :type 'hook - :group 'debugger) + :group 'debugger + :version "20.3") (defcustom debug-function-list nil @@ -412,7 +413,8 @@ (defcustom debugger-record-buffer "*Debugger-record*" "*Buffer name for expression values, for \\[debugger-record-expression]." :type 'string - :group 'debugger) + :group 'debugger + :version "20.3") (defun debugger-record-expression (exp) "Display a variable's value and record it in `*Backtrace-record*' buffer."
--- a/lisp/frame.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/frame.el Mon Apr 20 02:34:53 1998 +0000 @@ -500,7 +500,8 @@ (defcustom focus-follows-mouse t "*Non-nil if window system changes focus when you move the mouse." :type 'boolean - :group 'frames) + :group 'frames + :version "20.3") (defun other-frame (arg) "Select the ARG'th different visible frame, and raise it.
--- a/lisp/gnus/gnus-art.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/gnus/gnus-art.el Mon Apr 20 02:34:53 1998 +0000 @@ -412,7 +412,8 @@ (defcustom gnus-article-hide-pgp-hook nil "*A hook called after successfully hiding a PGP signature." :type 'hook - :group 'gnus-article-various) + :group 'gnus-article-various + :version "20.3") (defcustom gnus-article-button-face 'bold "Face used for highlighting buttons in the article buffer.
--- a/lisp/hexl.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/hexl.el Mon Apr 20 02:34:53 1998 +0000 @@ -91,7 +91,8 @@ (defcustom hexl-follow-ascii t "If non-nil then highlight the ASCII character corresponding to point." :type 'boolean - :group 'hexl) + :group 'hexl + :version "20.3") (defvar hexl-max-address 0 "Maximum offset into hexl buffer.")
--- a/lisp/international/ccl.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/international/ccl.el Mon Apr 20 02:34:53 1998 +0000 @@ -176,7 +176,8 @@ ] "Vector of CCL extended compiled codes (symbols)." :type '(vector (repeat :inline t symbol)) - :group 'ccl) + :group 'ccl + :version "20.3") ;; Put a property to each symbol of CCL codes for the disassembler. (let (code (i 0) (len (length ccl-code-table)))
--- a/lisp/mail/rmail.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/mail/rmail.el Mon Apr 20 02:34:53 1998 +0000 @@ -104,7 +104,8 @@ Most commonly used to specify `-g' to enable GSS-API authentication or `-k' to enable Kerberos authentication." :type '(repeat string) - :group 'rmail-retrieve) + :group 'rmail-retrieve + :version "20.3") (defvar rmail-pop-password-error "invalid usercode or password" "Regular expression matching incorrect-password POP server error messages.
--- a/lisp/progmodes/etags.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/progmodes/etags.el Mon Apr 20 02:34:53 1998 +0000 @@ -110,7 +110,8 @@ (defcustom find-tag-marker-ring-length 16 "*Length of marker rings `find-tag-marker-ring' and `tags-location-ring'." :group 'etags - :type 'integer) + :type 'integer + :version "20.3") (defvar find-tag-marker-ring (make-ring find-tag-marker-ring-length) "Ring of markers which are locations from which \\[find-tag] was invoked.")
--- a/lisp/progmodes/octave-mod.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/progmodes/octave-mod.el Mon Apr 20 02:34:53 1998 +0000 @@ -308,7 +308,8 @@ (defcustom octave-auto-indent nil "*Non-nil means indent line after a semicolon or space in Octave mode." :type 'boolean - :group 'octave) + :group 'octave + :version "20.3") (defcustom octave-auto-newline nil "*Non-nil means automatically newline after a semicolon in Octave mode."
--- a/lisp/progmodes/sh-script.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/progmodes/sh-script.el Mon Apr 20 02:34:53 1998 +0000 @@ -170,7 +170,8 @@ See `sh-feature'." :type '(repeat (cons (symbol :tag "Shell") regexp)) - :group 'sh-script) + :group 'sh-script + :version "20.3") (defvar sh-shell-variables nil "Alist of shell variable names that should be included in completion.
--- a/lisp/replace.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/replace.el Mon Apr 20 02:34:53 1998 +0000 @@ -43,7 +43,8 @@ is used as a variable to hold a history list for the strings or patterns to be replaced." :group 'matching - :type 'symbol) + :type 'symbol + :version "20.3") (defcustom query-replace-to-history-variable 'query-replace-history "History list to use for the TO argument of query-replace commands. @@ -51,7 +52,8 @@ is used as a variable to hold a history list for replacement strings or patterns." :group 'matching - :type 'symbol) + :type 'symbol + :version "20.3") (defun query-replace-read-args (string regexp-flag) (let (from to)
--- a/lisp/vc-hooks.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/vc-hooks.el Mon Apr 20 02:34:53 1998 +0000 @@ -5,7 +5,7 @@ ;; Author: Eric S. Raymond <esr@snark.thyrsus.com> ;; Maintainer: Andre Spiegel <spiegel@inf.fu-berlin.de> -;; $Id: vc-hooks.el,v 1.104 1998/04/04 05:21:44 rms Exp spiegel $ +;; $Id: vc-hooks.el,v 1.105 1998/04/05 18:44:35 spiegel Exp done $ ;; This file is part of GNU Emacs. @@ -125,7 +125,8 @@ containing corresponding RCS files but don't have RCS available; similarly for other version control systems." :type 'boolean - :group 'vc) + :group 'vc + :version "20.3") (defun vc-mistrust-permissions (file) ;; Access function to the above.
--- a/lisp/vc.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/vc.el Mon Apr 20 02:34:53 1998 +0000 @@ -5,7 +5,7 @@ ;; Author: Eric S. Raymond <esr@snark.thyrsus.com> ;; Maintainer: Andre Spiegel <spiegel@inf.fu-berlin.de> -;; $Id: vc.el,v 1.222 1998/04/15 09:48:04 schwab Exp spiegel $ +;; $Id: vc.el,v 1.223 1998/04/15 10:13:07 spiegel Exp done $ ;; This file is part of GNU Emacs. @@ -116,7 +116,8 @@ "*A string used as the default version number when a new file is registered. This can be overriden by giving a prefix argument to \\[vc-register]." :type 'string - :group 'vc) + :group 'vc + :version "20.3") (defcustom vc-command-messages nil "*If non-nil, display run messages from back-end commands."
--- a/lisp/vcursor.el Mon Apr 20 02:33:48 1998 +0000 +++ b/lisp/vcursor.el Mon Apr 20 02:34:53 1998 +0000 @@ -337,12 +337,14 @@ interpretation of strings is done: \"\C-x\" is a string of four characters. The default is simply to copy strings." :type 'boolean - :group 'vcursor) + :group 'vcursor + :version "20.3") (defcustom vcursor-string "**>" "String used to show the vcursor position on dumb terminals." :type 'string - :group 'vcursor) + :group 'vcursor + :version "20.3") (defvar vcursor-overlay nil "Overlay for the virtual cursor.