Show More
@@ -764,10 +764,11 b' Push changes G ' | |||||
764 | (add-hook 'find-file-hooks 'hg-find-file-hook) |
|
764 | (add-hook 'find-file-hooks 'hg-find-file-hook) | |
765 |
|
765 | |||
766 | (defun hg-after-save-hook () |
|
766 | (defun hg-after-save-hook () | |
|
767 | (ignore-errors | |||
767 | (let ((old-status hg-status)) |
|
768 | (let ((old-status hg-status)) | |
768 | (hg-mode-line) |
|
769 | (hg-mode-line) | |
769 | (if (and (not old-status) hg-status) |
|
770 | (if (and (not old-status) hg-status) | |
770 | (hg-mode)))) |
|
771 | (hg-mode))))) | |
771 |
|
772 | |||
772 | (add-hook 'after-save-hook 'hg-after-save-hook) |
|
773 | (add-hook 'after-save-hook 'hg-after-save-hook) | |
773 |
|
774 |
General Comments 0
You need to be logged in to leave comments.
Login now