cached message chunks

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

diff --git a/lib/sup/message.rb b/lib/sup/message.rb
index af3984f6109624662374f724dae1920d17559b78..f3ad31d7ea05bf2b4a420aeb82acbda6d2a0c81d 100644 (file)
--- a/lib/sup/message.rb
+++ b/lib/sup/message.rb
@@ -182,11 +182,12 @@ class Message
   end
 
   def to_chunks
-    if @body
-      [Text.new(@body.split("\n"))]
-    else
-      message_to_chunks @source.load_message(@source_info)
-    end
+    @chunks ||=
+      if @body
+        [Text.new(@body.split("\n"))]
+      else
+        message_to_chunks @source.load_message(@source_info)
+      end
   end
 
   def raw_header

diff --git a/lib/sup/modes/thread-view-mode.rb b/lib/sup/modes/thread-view-mode.rb
index aeec48f5a3eef6e57c0b034717a39db20b144460..e1b493c2c65bb862f256909d001b6541c50b2bc2 100644 (file)
--- a/lib/sup/modes/thread-view-mode.rb
+++ b/lib/sup/modes/thread-view-mode.rb
@@ -46,7 +46,7 @@ class ThreadViewMode < LineCursorMode
     end
     @state[latest] = :open if @state[latest] == :closed
 
-    BufferManager.say "Loading message..." do
+    BufferManager.say "Loading message bodies..." do
       regen_chunks
       regen_text
     end