* smerge-mode.el (smerge-start-session): Rename from smerge-auto.

* pcvs.el (cvs-revert-if-needed):
* vc.el (vc-maybe-resolve-conflicts): Rename callers.

* vc-svn.el (vc-svn-find-file-hook):
* vc-arch.el (vc-arch-find-file-hook): Undo previous change.
This commit is contained in:
Dan Nicolaescu 2008-01-16 06:22:59 +00:00
parent 8772b5a856
commit 28e4e2b434
6 changed files with 14 additions and 5 deletions

View file

@ -1,3 +1,12 @@
2008-01-16 Dan Nicolaescu <dann@ics.uci.edu>
* smerge-mode.el (smerge-start-session): Rename from smerge-auto.
* pcvs.el (cvs-revert-if-needed):
* vc.el (vc-maybe-resolve-conflicts): Rename callers.
* vc-svn.el (vc-svn-find-file-hook):
* vc-arch.el (vc-arch-find-file-hook): Undo previous change.
2008-01-16 Ulf Jasper <ulf.jasper@web.de>
* calendar/icalendar.el (icalendar-version): Increase to 0.16.

View file

@ -2311,7 +2311,7 @@ this file, or a list of arguments to send to the program."
;; do want to reset the mode for VC, so we do it explicitly.
(vc-find-file-hook)
(when (eq (cvs-fileinfo->type fileinfo) 'CONFLICT)
(smerge-auto))))))))
(smerge-start-session))))))))
(defun cvs-change-cvsroot (newroot)

View file

@ -1050,7 +1050,7 @@ with a \\[universal-argument] prefix, makes up a 3-way conflict."
(smerge-remove-props (point-min) (point-max))))
;;;###autoload
(defun smerge-auto ()
(defun smerge-start-session ()
"Turn on `smerge-mode' and move point to first conflict marker.
If no conflict maker is found, turn off `smerge-mode'."
(smerge-mode 1)

View file

@ -360,7 +360,7 @@ Return non-nil if FILE is unchanged."
(if (not (re-search-forward "^<<<<<<< " nil t))
;; The .rej file is obsolete.
(condition-case nil (delete-file rej) (error nil))
(smerge-auto)
(smerge-mode 1)
(add-hook 'after-save-hook
'vc-arch-delete-rej-if-obsolete nil t)
(message "There are unresolved conflicts in this file")))

View file

@ -551,7 +551,7 @@ and that it passes `vc-svn-global-switches' to it before FLAGS."
(re-search-forward "^<<<<<<< " nil t))
;; There are conflict markers.
(progn
(smerge-auto)
(smerge-start-session)
(add-hook 'after-save-hook 'vc-svn-resolve-when-done nil t))
;; There are no conflict markers. This is problematic: maybe it means
;; the conflict has been resolved and we should immediately call "svn

View file

@ -2245,7 +2245,7 @@ See Info node `Merging'."
(defun vc-maybe-resolve-conflicts (file status &optional name-A name-B)
(vc-resynch-buffer file t (not (buffer-modified-p)))
(if (zerop status) (message "Merge successful")
(smerge-auto)
(smerge-mode 1)
(message "File contains conflicts.")))
;;;###autoload