[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/vc-sccs.el,v
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/vc-sccs.el,v |
Date: |
Mon, 25 Feb 2008 08:13:23 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Glenn Morris <gm> 08/02/25 08:13:23
Index: vc-sccs.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/vc-sccs.el,v
retrieving revision 1.42
retrieving revision 1.43
diff -u -b -r1.42 -r1.43
--- vc-sccs.el 24 Feb 2008 23:06:05 -0000 1.42
+++ vc-sccs.el 25 Feb 2008 08:13:23 -0000 1.43
@@ -7,8 +7,6 @@
;; Author: FSF (see vc.el for full credits)
;; Maintainer: Andre Spiegel <address@hidden>
-;; $Id$
-
;; This file is part of GNU Emacs.
;; GNU Emacs is free software; you can redistribute it and/or modify
@@ -314,9 +312,8 @@
(defun vc-sccs-diff (files &optional oldvers newvers buffer)
"Get a difference report using SCCS between two filesets."
- ;; FIXME this is broken (`file' versus `files').
- (setq oldvers (vc-sccs-lookup-triple file oldvers))
- (setq newvers (vc-sccs-lookup-triple file newvers))
+ (setq oldvers (vc-sccs-lookup-triple (car files) oldvers))
+ (setq newvers (vc-sccs-lookup-triple (car files) newvers))
(apply 'vc-do-command (or buffer "*vc-diff*")
1 "vcdiff" (mapcar 'vc-name (vc-expand-dirs files))
(append (list "-q"