sup

commit a96879df1d60f5a97ecd04281b3c0e567ea0a5d5
parent 831f27f2469e8a84814bdca2de8ceaeaa15cb757
Author: Eric Sherman <hyperbolist@gmail.com>
Date:   Sun,  3 Jan 2010 12:09:50 -0500

kill buffers in buffer-list-mode with "X"

Diffstat:

1 file changed, 5 insertions(+), 0 deletions(-)
diff --git a/lib/sup/modes/buffer-list-mode.rb b/lib/sup/modes/buffer-list-mode.rb
@@ -4,6 +4,7 @@ class BufferListMode < LineCursorMode
   register_keymap do |k|
     k.add :jump_to_buffer, "Jump to selected buffer", :enter
     k.add :reload, "Reload buffer list", "@"
+    k.add :kill_selected_buffer, "Kill selected buffer", "X"
   end
 
   def initialize
@@ -40,6 +41,10 @@ protected
   def jump_to_buffer
     BufferManager.raise_to_front @bufs[curpos][1]
   end
+
+  def kill_selected_buffer
+    reload if BufferManager.kill_buffer_safely @bufs[curpos][1]
+  end
 end
 
 end