Here is a patch to vc-version-diff against vc.el from the vc-1.15 package. I thought I'd submitted this earlier but it hasn't made it into the latest package. When `C-u C-x v =' is used, you are prompted for the file and revisions to diff against. Defaults are given, but if you just hit return a few times, rel1 and rel2 get the value nil and the diff you expect to see isn't given. This fixes things so the defaults are actually honored. -Barry -------------------- snip snip -------------------- *** vc.el 1999/01/08 06:09:01 1.1 --- vc.el 1999/01/08 06:10:57 1.2 *************** *** 1354,1369 **** (setq rel2-default (vc-workfile-version file)))) ;; construct argument list (list file ! (let ((minibuffer-default rel1-default)) ! (read-string (if rel1-default ! (concat "Older version: (default " ! rel1-default ") ") ! "Older version: "))) ! (let ((minibuffer-default rel2-default)) ! (read-string (if rel2-default ! (concat "Newer version: (default " ! rel2-default ") ") ! "Newer version (default: current source): ")))))) (if (string-equal rel1 "") (setq rel1 nil)) (if (string-equal rel2 "") (setq rel2 nil)) (if (file-directory-p file) --- 1354,1378 ---- (setq rel2-default (vc-workfile-version file)))) ;; construct argument list (list file ! (let ((minibuffer-default rel1-default) ! (rel1-choice ! (read-string (if rel1-default ! (concat "Older version: (default " ! rel1-default ") ") ! "Older version: ")))) ! (if (string-equal rel1-choice "") ! rel1-default ! rel1-choice)) ! (let ((minibuffer-default rel2-default) ! (rel2-choice ! (read-string (if rel2-default ! (concat "Newer version: (default " ! rel2-default ") ") ! "Newer version (default: current source): ") ! ))) ! (if (string-equal rel2-choice "") ! rel2-default ! rel2-choice))))) (if (string-equal rel1 "") (setq rel1 nil)) (if (string-equal rel2 "") (setq rel2 nil)) (if (file-directory-p file)