From 0a97a9c3191884bcab237191c005df1d7f4e8d91 Mon Sep 17 00:00:00 2001 From: Christian Neukirchen Date: Mon, 4 Feb 2008 16:21:20 +0100 Subject: Make `q' kill the buffer if unchanged --- gitsum.el | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/gitsum.el b/gitsum.el index 91d0c61..2ae37d9 100644 --- a/gitsum.el +++ b/gitsum.el @@ -13,8 +13,9 @@ (easy-mmode-defmap gitsum-diff-mode-shared-map '(("c" . gitsum-commit) - ("u" . gitsum-undo) - ("g" . gitsum-refresh)) + ("g" . gitsum-refresh) + ("q" . gitsum-kill-buffer) + ("u" . gitsum-undo)) "Basic keymap for `gitsum-diff-mode', bound to various prefix keys.") (define-derived-mode gitsum-diff-mode diff-mode "gitsum" @@ -88,6 +89,12 @@ A numeric argument serves as a repeat count." (with-current-buffer log-edit-parent-buffer (gitsum-refresh))) +(defun gitsum-kill-buffer () + "Kill the current buffer if it has no manual changes." + (interactive) + (unless (buffer-modified-p) + (kill-buffer nil))) + (defun gitsum () "Entry point into gitsum-diff-mode." (interactive) -- cgit 1.4.1