Mercurial > emacs
changeset 92195:c1eed47c8247
(vc-sccs-diff): Fix setting of oldvers and newvers.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Mon, 25 Feb 2008 08:13:23 +0000 |
| parents | 08b13631ff73 |
| children | 1d92a135488f |
| files | lisp/vc-sccs.el |
| diffstat | 1 files changed, 2 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/vc-sccs.el Mon Feb 25 03:54:54 2008 +0000 +++ b/lisp/vc-sccs.el Mon Feb 25 08:13:23 2008 +0000 @@ -7,8 +7,6 @@ ;; Author: FSF (see vc.el for full credits) ;; Maintainer: Andre Spiegel <spiegel@gnu.org> -;; $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"