Mercurial > emacs
comparison lisp/vc-hg.el @ 79800:8cc70128affa
(vc-hg-diff): Don't pass an empty string.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Wed, 09 Jan 2008 08:49:59 +0000 |
| parents | 4ceae4ec8fb2 |
| children | 7c7ae81f80df 5d58981e6690 |
comparison
equal
deleted
inserted
replaced
| 79799:57956dd69d3f | 79800:8cc70128affa |
|---|---|
| 284 "diff" | 284 "diff" |
| 285 (append | 285 (append |
| 286 (if oldvers | 286 (if oldvers |
| 287 (if newvers | 287 (if newvers |
| 288 (list "-r" oldvers "-r" newvers) | 288 (list "-r" oldvers "-r" newvers) |
| 289 (list "-r" oldvers)) | 289 (list "-r" oldvers))))))) |
| 290 (list "")))))) | |
| 291 | 290 |
| 292 (defun vc-hg-revision-table (file) | 291 (defun vc-hg-revision-table (file) |
| 293 (let ((default-directory (file-name-directory file))) | 292 (let ((default-directory (file-name-directory file))) |
| 294 (with-temp-buffer | 293 (with-temp-buffer |
| 295 (vc-hg-command t nil file "log" "--template" "{rev} ") | 294 (vc-hg-command t nil file "log" "--template" "{rev} ") |