Mercurial > emacs

comparison lisp/time-stamp.el @ 34395:2f4a4d355834

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(time-stamp-old-format-warn): reorder custom choices to match documentation string.
author Gerd Moellmann <gerd@gnu.org>
date Sat, 09 Dec 2000 13:22:51 +0000
parents b440b63b45d0
children c5a1cf50f5cd
comparison
equal deleted inserted replaced
34394:d6a4dd5cd345 34395:2f4a4d355834
1 ;;; time-stamp.el --- Maintain last change time stamps in files edited by Emacs 1 ;;; time-stamp.el --- Maintain last change time stamps in files edited by Emacs
2 2
3 ;; Copyright 1989, 1993, 1994, 1995, 1997, 2000 3 ;; Copyright 1989, 1993, 1994, 1995, 1997, 2000
4 ;;; Free Software Foundation, Inc. 4 ;;; Free Software Foundation, Inc.
5 5
6 ;; Maintainer's Time-stamp: <2000-10-23 16:08:34 gildea> 6 ;; Maintainer's Time-stamp: <2000-12-04 16:06:50 gildea>
7 ;; Maintainer: Stephen Gildea <gildea@alum.mit.edu> 7 ;; Maintainer: Stephen Gildea <gildea@alum.mit.edu>
8 ;; Keywords: tools 8 ;; Keywords: tools
9 9
10 ;; This file is free software; you can redistribute it and/or modify 10 ;; This file is free software; you can redistribute it and/or modify
11 ;; it under the terms of the GNU General Public License as published by 11 ;; it under the terms of the GNU General Public License as published by
105 (defcustom time-stamp-old-format-warn 'ask 105 (defcustom time-stamp-old-format-warn 'ask
106 "Action if `time-stamp-format' is an old-style list. 106 "Action if `time-stamp-format' is an old-style list.
107 If `error', the format is not used. If `ask', the user is queried about 107 If `error', the format is not used. If `ask', the user is queried about
108 using the time-stamp-format. If `warn', a warning is displayed. 108 using the time-stamp-format. If `warn', a warning is displayed.
109 If nil, no notification is given." 109 If nil, no notification is given."
110 :type '(choice (const :tag "No notification" nil) 110 :type '(choice (const :tag "Don't use the format" error)
111 (const :tag "Don't use the format" error) 111 (const ask)
112 (const ask) (const warn)) 112 (const warn)
113 (const :tag "No notification" nil))
113 :group 'time-stamp) 114 :group 'time-stamp)
114 115
115 (defcustom time-stamp-time-zone nil 116 (defcustom time-stamp-time-zone nil
116 "If non-nil, a string naming the timezone to be used by \\[time-stamp]. 117 "If non-nil, a string naming the timezone to be used by \\[time-stamp].
117 Format is the same as that used by the environment variable TZ on your system." 118 Format is the same as that used by the environment variable TZ on your system."