sup

A curses threads-with-tags style email client

sup.git

git clone https://supmua.dev/git/sup/
commit 393c45b68ba6f62b892b8bebc6376866856ed433
parent f138f3d24c079b676a7a3cdde875abd80ef123ed
Author: wmorgan <wmorgan@5c8cc53c-5e98-4d25-b20a-d8db53a31250>
Date:   Wed, 14 Nov 2007 15:58:09 +0000

patch to move save-to-disk from logmode to textmode, from marcus williams

git-svn-id: svn://rubyforge.org/var/svn/sup/trunk@700 5c8cc53c-5e98-4d25-b20a-d8db53a31250

Diffstat:
M lib/sup/modes/log-mode.rb | 6 ------
M lib/sup/modes/text-mode.rb | 8 ++++++++
2 files changed, 8 insertions(+), 6 deletions(-)
diff --git a/lib/sup/modes/log-mode.rb b/lib/sup/modes/log-mode.rb
@@ -3,7 +3,6 @@ module Redwood
 class LogMode < TextMode
   register_keymap do |k|
     k.add :toggle_follow, "Toggle follow mode", 'f'
-    k.add :save_to_disk, "Save log to disk", 's'
   end
 
   def initialize
@@ -37,11 +36,6 @@ class LogMode < TextMode
     end
   end
 
-  def save_to_disk
-    fn = BufferManager.ask_for_filename :filename, "Save log to file: "
-    save_to_file(fn) { |f| f.puts text } if fn
-  end
-
   def status
     super + " (follow: #@follow)"
   end
diff --git a/lib/sup/modes/text-mode.rb b/lib/sup/modes/text-mode.rb
@@ -2,6 +2,9 @@ module Redwood
 
 class TextMode < ScrollMode
   attr_reader :text
+  register_keymap do |k|
+    k.add :save_to_disk, "Save to disk", 's'
+  end
 
   def initialize text=""
     @text = text.normalize_whitespace
@@ -9,6 +12,11 @@ class TextMode < ScrollMode
     buffer.mark_dirty if buffer
     super()
   end
+  
+  def save_to_disk
+    fn = BufferManager.ask_for_filename :filename, "Save to file: "
+    save_to_file(fn) { |f| f.puts text } if fn
+  end
 
   def text= t
     @text = t