Mercurial > emacs
comparison lisp/vc.el @ 49869:f614a2396578
(vc-binary-assoc, vc-binary-suffixes): Removed; these were
accidentally left over.
author | André Spiegel <spiegel@gnu.org> |
---|---|
date | Wed, 19 Feb 2003 18:56:38 +0000 |
parents | b48f8839a782 |
children | 4dc2d45403ec |
comparison
equal
deleted
inserted
replaced
49868:466824c9db4a | 49869:f614a2396578 |
---|---|
4 | 4 |
5 ;; Author: FSF (see below for full credits) | 5 ;; Author: FSF (see below for full credits) |
6 ;; Maintainer: Andre Spiegel <spiegel@gnu.org> | 6 ;; Maintainer: Andre Spiegel <spiegel@gnu.org> |
7 ;; Keywords: tools | 7 ;; Keywords: tools |
8 | 8 |
9 ;; $Id: vc.el,v 1.348 2003/02/04 12:12:09 lektu Exp $ | 9 ;; $Id: vc.el,v 1.349 2003/02/05 23:13:21 lektu Exp $ |
10 | 10 |
11 ;; This file is part of GNU Emacs. | 11 ;; This file is part of GNU Emacs. |
12 | 12 |
13 ;; GNU Emacs is free software; you can redistribute it and/or modify | 13 ;; GNU Emacs is free software; you can redistribute it and/or modify |
14 ;; it under the terms of the GNU General Public License as published by | 14 ;; it under the terms of the GNU General Public License as published by |
814 (pop-to-buffer vc-parent-buffer)) | 814 (pop-to-buffer vc-parent-buffer)) |
815 (if (not (buffer-file-name)) | 815 (if (not (buffer-file-name)) |
816 (error "Buffer %s is not associated with a file" (buffer-name)) | 816 (error "Buffer %s is not associated with a file" (buffer-name)) |
817 (if (not (vc-backend (buffer-file-name))) | 817 (if (not (vc-backend (buffer-file-name))) |
818 (error "File %s is not under version control" (buffer-file-name)))))) | 818 (error "File %s is not under version control" (buffer-file-name)))))) |
819 | |
820 (defvar vc-binary-assoc nil) | |
821 (defvar vc-binary-suffixes | |
822 (if (memq system-type '(ms-dos windows-nt)) | |
823 '(".exe" ".com" ".bat" ".cmd" ".btm" "") | |
824 '(""))) | |
825 | 819 |
826 (defun vc-process-filter (p s) | 820 (defun vc-process-filter (p s) |
827 "An alternative output filter for async process P. | 821 "An alternative output filter for async process P. |
828 The only difference with the default filter is to insert S after markers." | 822 The only difference with the default filter is to insert S after markers." |
829 (with-current-buffer (process-buffer p) | 823 (with-current-buffer (process-buffer p) |