Commit | Line | Data |
---|---|---|
5b467bf4 SM |
1 | ;;; pcvs-info.el --- Internal representation of a fileinfo entry |
2 | ||
e7cff550 | 3 | ;; Copyright (C) 1991, 92, 93, 94, 95, 96, 97, 98, 99, 2000 Free Software Foundation, Inc. |
5b467bf4 SM |
4 | |
5 | ;; Author: Stefan Monnier <monnier@cs.yale.edu> | |
6 | ;; Keywords: pcl-cvs | |
c64c0551 | 7 | ;; Revision: $Id: pcvs-info.el,v 1.5 2000/12/06 19:52:13 fx Exp $ |
5b467bf4 SM |
8 | |
9 | ;; This file is part of GNU Emacs. | |
10 | ||
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 | |
13 | ;; the Free Software Foundation; either version 2, or (at your option) | |
14 | ;; any later version. | |
15 | ||
16 | ;; GNU Emacs is distributed in the hope that it will be useful, | |
17 | ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
18 | ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
19 | ;; GNU General Public License for more details. | |
20 | ||
21 | ;; You should have received a copy of the GNU General Public License | |
22 | ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
23 | ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
24 | ;; Boston, MA 02111-1307, USA. | |
25 | ||
26 | ;;; Commentary: | |
27 | ||
28 | ;; The cvs-fileinfo data structure: | |
29 | ;; | |
30 | ;; When the `cvs update' is ready we parse the output. Every file | |
31 | ;; that is affected in some way is added to the cookie collection as | |
32 | ;; a "fileinfo" (as defined below in cvs-create-fileinfo). | |
33 | ||
34 | ;;; Code: | |
35 | ||
36 | (eval-when-compile (require 'cl)) | |
37 | (require 'pcvs-util) | |
38 | ;;(require 'pcvs-defs) | |
39 | ||
40 | ;;;; | |
41 | ;;;; config variables | |
42 | ;;;; | |
43 | ||
44 | (defcustom cvs-display-full-path t | |
45 | "*Specifies how the filenames should look like in the listing. | |
46 | If t, their full path name will be displayed, else only the filename." | |
47 | :group 'pcl-cvs | |
48 | :type '(boolean)) | |
49 | ||
50 | (defvar global-font-lock-mode) | |
51 | (defvar font-lock-auto-fontify) | |
52 | (defcustom cvs-highlight | |
53 | (or (and (boundp 'font-lock-auto-fontify) font-lock-auto-fontify) | |
54 | (and (boundp 'global-font-lock-mode) global-font-lock-mode)) | |
55 |