* 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:
parent
8772b5a856
commit
28e4e2b434
6 changed files with 14 additions and 5 deletions
|
@ -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.
|
||||
|
|
|
@ -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)
|
||||
|
|
|
@ -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)
|
||||
|
|
|
@ -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")))
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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
|
||||
|
|
Loading…
Add table
Reference in a new issue