diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2003-02-04 11:26:42 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2003-02-04 11:26:42 +0000 |
| commit | 71296446d3cec5bb2a27bc5ad6da574df38d0ec8 (patch) | |
| tree | 0204c3c252547a44e2404959409034406f7680cd /lisp/cvs-status.el | |
| parent | 693ff6134cb2ec65c7d188696f012662edadfbf0 (diff) | |
| download | emacs-71296446d3cec5bb2a27bc5ad6da574df38d0ec8.tar.gz | |
Trailing whitespace deleted.
Diffstat (limited to 'lisp/cvs-status.el')
| -rw-r--r-- | lisp/cvs-status.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/cvs-status.el b/lisp/cvs-status.el index 27cd78e1daf..27c5c20649a 100644 --- a/lisp/cvs-status.el +++ b/lisp/cvs-status.el @@ -86,7 +86,7 @@ (1 font-lock-function-name-face))))) (defconst cvs-status-font-lock-defaults '(cvs-status-font-lock-keywords t nil nil nil (font-lock-multiline . t))) - + (put 'cvs-status-mode 'mode-class 'special) ;;;###autoload @@ -218,7 +218,7 @@ or a string (in which case it should simply return its argument). A tag cannot be a CONS. The return value can also be a list of strings, if several nodes where merged into one. The tree will be printed no closer than column COLUMN." - + (let* ((eol (save-excursion (end-of-line) (current-column))) (column (max (+ eol 2) column))) (if (null tags) column @@ -487,9 +487,9 @@ Optional prefix ARG chooses between two representations." (setq pe eq))) (nreverse nas)))) -;;;; +;;;; ;;;; Merged trees from different files -;;;; +;;;; (defun cvs-tree-fuzzy-merge-1 (trees tree prev) ) @@ -509,7 +509,7 @@ Optional prefix ARG chooses between two representations." (erase-buffer) (let ((cvs-tag-print-rev nil)) (cvs-tree-print tree 'cvs-tag->string 3))))) - + (provide 'cvs-status) |