Show More
@@ -712,7 +712,8 b' code by typing `M-x find-library mercuri' | |||
|
712 | 712 | (let ((pos (point))) |
|
713 | 713 | (insert (documentation 'hg-mode)) |
|
714 | 714 | (goto-char pos) |
|
715 |
( |
|
|
715 | (end-of-line 1) | |
|
716 | (delete-region pos (point))))) | |
|
716 | 717 | |
|
717 | 718 | (defun hg-add (path) |
|
718 | 719 | "Add PATH to the Mercurial repository on the next commit. |
@@ -959,8 +960,8 b' With a prefix argument, prompt for the p' | |||
|
959 | 960 | (defun hg-log-mode () |
|
960 | 961 | "Mode for viewing a Mercurial change log." |
|
961 | 962 | (goto-char (point-min)) |
|
962 | (when (looking-at "^searching for changes") | |
|
963 | (kill-entire-line)) | |
|
963 | (when (looking-at "^searching for changes.*$") | |
|
964 | (delete-region (match-beginning 0) (match-end 0))) | |
|
964 | 965 | (run-hooks 'hg-log-mode-hook)) |
|
965 | 966 | |
|
966 | 967 | (defun hg-log (path &optional rev1 rev2 log-limit) |
General Comments 0
You need to be logged in to leave comments.
Login now