diff options
| -rw-r--r-- | lisp/vc/vc-hg.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el index 17d38fa4005..5ff1a6204b1 100644 --- a/lisp/vc/vc-hg.el +++ b/lisp/vc/vc-hg.el | |||
| @@ -1378,10 +1378,12 @@ REV is the revision to check out into WORKFILE." | |||
| 1378 | ))) | 1378 | ))) |
| 1379 | 1379 | ||
| 1380 | (defun vc-hg-log-incoming (buffer remote-location) | 1380 | (defun vc-hg-log-incoming (buffer remote-location) |
| 1381 | (vc-setup-buffer buffer) | ||
| 1381 | (vc-hg-command buffer 1 nil "incoming" "-n" (unless (string= remote-location "") | 1382 | (vc-hg-command buffer 1 nil "incoming" "-n" (unless (string= remote-location "") |
| 1382 | remote-location))) | 1383 | remote-location))) |
| 1383 | 1384 | ||
| 1384 | (defun vc-hg-log-outgoing (buffer remote-location) | 1385 | (defun vc-hg-log-outgoing (buffer remote-location) |
| 1386 | (vc-setup-buffer buffer) | ||
| 1385 | (vc-hg-command buffer 1 nil "outgoing" "-n" (unless (string= remote-location "") | 1387 | (vc-hg-command buffer 1 nil "outgoing" "-n" (unless (string= remote-location "") |
| 1386 | remote-location))) | 1388 | remote-location))) |
| 1387 | 1389 | ||