Mercurial > emacs
comparison lisp/log-edit.el @ 49616:43c9ef374660
(cvs-commit-buffer-require-final-newline, cvs-changelog-full-paragraphs): Add
obsolescence declaration and remove redundant info from docstring.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Wed, 05 Feb 2003 23:11:02 +0000 |
| parents | e88404e8f2cf |
| children | 66dd7f2dd70a d7ddb3e565de |
comparison
equal
deleted
inserted
replaced
| 49615:0ddc2f13992e | 49616:43c9ef374660 |
|---|---|
| 2 | 2 |
| 3 ;; Copyright (C) 1999, 2000 Free Software Foundation, Inc. | 3 ;; Copyright (C) 1999, 2000 Free Software Foundation, Inc. |
| 4 | 4 |
| 5 ;; Author: Stefan Monnier <monnier@cs.yale.edu> | 5 ;; Author: Stefan Monnier <monnier@cs.yale.edu> |
| 6 ;; Keywords: pcl-cvs cvs commit log | 6 ;; Keywords: pcl-cvs cvs commit log |
| 7 ;; Revision: $Id: log-edit.el,v 1.17 2001/10/30 04:32:58 monnier Exp $ | 7 ;; Revision: $Id: log-edit.el,v 1.18 2003/02/04 11:34:12 lektu Exp $ |
| 8 | 8 |
| 9 ;; This file is part of GNU Emacs. | 9 ;; This file is part of GNU Emacs. |
| 10 | 10 |
| 11 ;; GNU Emacs is free software; you can redistribute it and/or modify | 11 ;; GNU Emacs is free software; you can redistribute it and/or modify |
| 12 ;; it under the terms of the GNU General Public License as published by | 12 ;; it under the terms of the GNU General Public License as published by |
| 89 (defcustom log-edit-keep-buffer nil | 89 (defcustom log-edit-keep-buffer nil |
| 90 "*If non-nil, don't hide the buffer after `log-edit-done'." | 90 "*If non-nil, don't hide the buffer after `log-edit-done'." |
| 91 :group 'log-edit | 91 :group 'log-edit |
| 92 :type 'boolean) | 92 :type 'boolean) |
| 93 | 93 |
| 94 (defvar cvs-commit-buffer-require-final-newline t | 94 (defvar cvs-commit-buffer-require-final-newline t) |
| 95 "Obsolete, use `log-edit-require-final-newline'.") | 95 (make-obsolete-variable 'cvs-commit-buffer-require-final-newline |
| 96 'log-edit-require-final-newline) | |
| 96 | 97 |
| 97 (defcustom log-edit-require-final-newline | 98 (defcustom log-edit-require-final-newline |
| 98 cvs-commit-buffer-require-final-newline | 99 cvs-commit-buffer-require-final-newline |
| 99 "*Enforce a newline at the end of commit log messages. | 100 "*Enforce a newline at the end of commit log messages. |
| 100 Enforce it silently if t, query if non-nil and don't do anything if nil." | 101 Enforce it silently if t, query if non-nil and don't do anything if nil." |
| 127 can be obtained from `log-edit-files'." | 128 can be obtained from `log-edit-files'." |
| 128 :group 'log-edit | 129 :group 'log-edit |
| 129 :type '(hook :options (log-edit-set-common-indentation | 130 :type '(hook :options (log-edit-set-common-indentation |
| 130 log-edit-add-to-changelog))) | 131 log-edit-add-to-changelog))) |
| 131 | 132 |
| 132 (defvar cvs-changelog-full-paragraphs t | 133 (defvar cvs-changelog-full-paragraphs t) |
| 133 "Obsolete, use `log-edit-changelog-full-paragraphs'.") | 134 (make-obsolete-variable 'cvs-changelog-full-paragraphs |
| 135 'log-edit-changelog-full-paragraphs) | |
| 134 | 136 |
| 135 (defvar log-edit-changelog-full-paragraphs cvs-changelog-full-paragraphs | 137 (defvar log-edit-changelog-full-paragraphs cvs-changelog-full-paragraphs |
| 136 "*If non-nil, include full ChangeLog paragraphs in the log. | 138 "*If non-nil, include full ChangeLog paragraphs in the log. |
| 137 This may be set in the ``local variables'' section of a ChangeLog, to | 139 This may be set in the ``local variables'' section of a ChangeLog, to |
| 138 indicate the policy for that ChangeLog. | 140 indicate the policy for that ChangeLog. |