Mercurial > emacs

comparison lisp/vc-sccs.el @ 35179:1b423e7eb1eb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vc-sccs-header): Fix :type.
author Dave Love <fx@gnu.org>
date Tue, 09 Jan 2001 14:55:30 +0000
parents f7a5d39c26f0
children 9396894025fa
comparison
equal deleted inserted replaced
35178:ae1b8d0257a7 35179:1b423e7eb1eb
3 ;; Copyright (C) 1992,93,94,95,96,97,98,99,2000 Free Software Foundation, Inc. 3 ;; Copyright (C) 1992,93,94,95,96,97,98,99,2000 Free Software Foundation, Inc.
4 4
5 ;; Author: FSF (see vc.el for full credits) 5 ;; Author: FSF (see vc.el for full credits)
6 ;; Maintainer: Andre Spiegel <spiegel@gnu.org> 6 ;; Maintainer: Andre Spiegel <spiegel@gnu.org>
7 7
8 ;; $Id: vc-sccs.el,v 1.5 2000/11/16 18:14:41 spiegel Exp $ 8 ;; $Id: vc-sccs.el,v 1.6 2001/01/08 16:26:44 spiegel Exp $
9 9
10 ;; This file is part of GNU Emacs. 10 ;; This file is part of GNU Emacs.
11 11
12 ;; GNU Emacs is free software; you can redistribute it and/or modify 12 ;; GNU Emacs is free software; you can redistribute it and/or modify
13 ;; it under the terms of the GNU General Public License as published by 13 ;; it under the terms of the GNU General Public License as published by
44 :version "21.1" 44 :version "21.1"
45 :group 'vc) 45 :group 'vc)
46 46
47 (defcustom vc-sccs-header (or (cdr (assoc 'SCCS vc-header-alist)) '("%W%")) 47 (defcustom vc-sccs-header (or (cdr (assoc 'SCCS vc-header-alist)) '("%W%"))
48 "*Header keywords to be inserted by `vc-insert-headers'." 48 "*Header keywords to be inserted by `vc-insert-headers'."
49 :type 'string 49 :type '(repeat string)
50 :group 'vc) 50 :group 'vc)
51 51
52 ;;;###autoload 52 ;;;###autoload
53 (defcustom vc-sccs-master-templates 53 (defcustom vc-sccs-master-templates
54 '("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir) 54 '("%sSCCS/s.%s" "%ss.%s" vc-sccs-search-project-dir)