[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/vc.el
From: |
Andre Spiegel |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/vc.el |
Date: |
Mon, 26 Nov 2001 11:07:50 -0500 |
Index: emacs/lisp/vc.el
diff -u emacs/lisp/vc.el:1.321 emacs/lisp/vc.el:1.322
--- emacs/lisp/vc.el:1.321 Fri Nov 23 05:11:29 2001
+++ emacs/lisp/vc.el Mon Nov 26 11:07:50 2001
@@ -6,7 +6,7 @@
;; Maintainer: Andre Spiegel <address@hidden>
;; Keywords: tools
-;; $Id: vc.el,v 1.321 2001/11/23 10:11:29 spiegel Exp $
+;; $Id: vc.el,v 1.322 2001/11/26 16:07:50 spiegel Exp $
;; This file is part of GNU Emacs.
@@ -1908,14 +1908,18 @@
(let* ((file buffer-file-name)
(version (if (string-equal rev "")
(vc-workfile-version file)
- rev))
- (automatic-backup (vc-version-backup-file-name file version))
- (manual-backup (vc-version-backup-file-name file version 'manual)))
+ rev)))
+ (switch-to-buffer-other-window (vc-find-version file version))))
+
+(defun vc-find-version (file version)
+ "Read VERSION of FILE into a buffer and return the buffer."
+ (let ((automatic-backup (vc-version-backup-file-name file version))
+ (manual-backup (vc-version-backup-file-name file version 'manual)))
(unless (file-exists-p manual-backup)
(if (file-exists-p automatic-backup)
(rename-file automatic-backup manual-backup nil)
(vc-call checkout file nil version manual-backup)))
- (find-file-other-window manual-backup)))
+ (find-file-noselect manual-backup)))
;; Header-insertion code
- [Emacs-diffs] Changes to emacs/lisp/vc.el, Andre Spiegel, 2001/11/09
- [Emacs-diffs] Changes to emacs/lisp/vc.el, Andre Spiegel, 2001/11/09
- [Emacs-diffs] Changes to emacs/lisp/vc.el, Andre Spiegel, 2001/11/09
- [Emacs-diffs] Changes to emacs/lisp/vc.el, Sam Steingold, 2001/11/12
- [Emacs-diffs] Changes to emacs/lisp/vc.el, Andre Spiegel, 2001/11/14
- [Emacs-diffs] Changes to emacs/lisp/vc.el, Andre Spiegel, 2001/11/15
- [Emacs-diffs] Changes to emacs/lisp/vc.el, Andre Spiegel, 2001/11/15
- [Emacs-diffs] Changes to emacs/lisp/vc.el, Andre Spiegel, 2001/11/23
- [Emacs-diffs] Changes to emacs/lisp/vc.el,
Andre Spiegel <=
- [Emacs-diffs] Changes to emacs/lisp/vc.el, Pavel JanÃk, 2001/11/26