Mercurial > public > mercurial-scm > hg
diff contrib/mq.el @ 5081:ea7b982b6c08
Remove trailing spaces
author | Thomas Arendsen Hein <thomas@intevation.de> |
---|---|
date | Tue, 07 Aug 2007 10:24:33 +0200 |
parents | 3b0f73edee57 |
children | 9873cbb134b2 |
line wrap: on
line diff
--- a/contrib/mq.el Mon Aug 06 20:25:50 2007 +0200 +++ b/contrib/mq.el Tue Aug 07 10:24:33 2007 +0200 @@ -131,7 +131,7 @@ (let ((line (buffer-substring bol (point)))) (when (> (length line) 0) line)))) - + (defun mq-push (&optional patch) "Push patches until PATCH is reached. If PATCH is nil, push at most one patch." @@ -166,7 +166,7 @@ (if ok (message "Pushing... %s" last-line) (error "Pushing... %s" last-line))))) - + (defun mq-push-all () "Push patches until all are applied." (interactive) @@ -195,7 +195,7 @@ (if ok (message "Popping... %s" last-line) (error "Popping... %s" last-line))))) - + (defun mq-pop-all () "Push patches until none are applied." (interactive) @@ -255,7 +255,7 @@ (let ((buf mq-prev-buffer)) (kill-buffer nil) (switch-to-buffer buf))) - + (defun mq-edit-kill () "Kill the edit currently being prepared." (interactive) @@ -316,7 +316,7 @@ (set-buffer-modified-p nil) (setq buffer-undo-list nil) (run-hooks 'text-mode-hook 'mq-edit-mode-hook)) - + (defun mq-refresh-edit () "Refresh the topmost applied patch, editing the patch description." (interactive)