contrib/mercurial.el
changeset 2998 e1762867a734
parent 2997 48baf9fb1921
child 2999 e75fdc37100c
--- a/contrib/mercurial.el	Tue Aug 22 08:53:37 2006 -0700
+++ b/contrib/mercurial.el	Tue Aug 22 08:54:19 2006 -0700
@@ -740,7 +740,7 @@
     (hg-view-output (hg-output-buffer-name)
       (apply 'call-process (hg-binary) nil t nil (list "add" path))
       (hg-fix-paths)
-      (goto-char 0)
+      (goto-char (point-min))
       (cd (hg-root path)))
     (when update
       (unless vc-make-backup-files
@@ -980,7 +980,7 @@
       (apply 'call-process (hg-binary) nil t nil (list "forget" path))
       ;; "hg forget" shows pathes relative NOT TO ROOT BUT TO REPOSITORY
       (hg-fix-paths)
-      (goto-char 0)
+      (goto-char (point-min))
       (cd (hg-root path)))
     (when update
       (with-current-buffer buf