Mercurial > hg > mercurial-crew-with-dirclash

comparison contrib/mq.el @ 2996:06696f9c30c0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
mq.el: Add comment to mq-edit-finish.
author Bryan O'Sullivan <bos@serpentine.com>
date Tue, 22 Aug 2006 17:01:24 -0700
parents e2bad806ccc3
children b7fe334ff4fb
comparison
equal deleted inserted replaced
2995:e2bad806ccc3 2996:06696f9c30c0
214 This would become the active patch if popped to." 214 This would become the active patch if popped to."
215 (interactive) 215 (interactive)
216 (mq-patch-info "qprev" "Previous")) 216 (mq-patch-info "qprev" "Previous"))
217 217
218 (defun mq-edit-finish () 218 (defun mq-edit-finish ()
219 "Finish editing the description of this patch, and refresh the patch."
219 (interactive) 220 (interactive)
220 (unless (equal (mq-patch-info "qtop") mq-top) 221 (unless (equal (mq-patch-info "qtop") mq-top)
221 (error "Topmost patch has changed!")) 222 (error "Topmost patch has changed!"))
222 (hg-sync-buffers hg-root) 223 (hg-sync-buffers hg-root)
223 (mq-refresh-internal hg-root "-m" (buffer-substring (point-min) (point-max))) 224 (mq-refresh-internal hg-root "-m" (buffer-substring (point-min) (point-max)))