fixed drafts bug and now pollmode stays hidden upon poll

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

diff --git a/bin/sup b/bin/sup
index 2572fc21f3e724ec143b92e53b40a34f5c11b27c..a1ce4d65766fc1174e9c7b06e77eff2caa064084 100644 (file)
--- a/bin/sup
+++ b/bin/sup
@@ -175,7 +175,7 @@ begin
           bm.spawn "New Message", mode
           mode.edit
         when :poll
-          bm.raise_to_front PollManager.buffer
+#          bm.raise_to_front PollManager.buffer
           reporting_thread { PollManager.poll }
         when :recall_draft
           case Index.num_results_for :label => :draft

diff --git a/doc/TODO b/doc/TODO
index 66a53c3eed5bba9c20c8778c82d5227f0c12960d..10e0b807d2d2a12c9da2f20fe51f2f3d54ffcba0 100644 (file)
--- a/doc/TODO
+++ b/doc/TODO
@@ -1,23 +1,9 @@
-for 0.0.8
+for 0.0.9
 ---------
-x nice little startup config program
-x bugfix: triggering a pageup when cursor scrolling up jumps to the
-   bottom of the page rather than the next line
-x bugfix: final logging messages to stdout?
-x bugfix: mbox directory shouldn't generate an exception, just an error
-x bugfix: m in thread-view-mode when a person is not selected should open up a
-   blank compose-mode rather than do nothing
-x bugfix: stars on messages with blue backgrounds still have green bgs
-x ferret upgrade script (dump & restore)
-x bugfix: mark messages as read immediately when t-v-m is opened
-x compose in thread-view-mode auto-fills in person
-x bugfix: 'N' in thread-view-mode (expand only new messages) crashes
-x bugfix: detect source corruption at startup
-x maildir
-x bugfix: single-line messages come empty upon reply
-
-next release
-------------
+_ bugfix: sup-add not prompting for old accounts, i think? possibly because
+    sources no longer respond_to? :username due to Recoverable wrapping
+_ bugfix: rmail multipart error
+_ bugfix: ferret flakiness: just added message but can't find it.
 _ bugfix: when one new message comes into an imap folder, we don't
    catch it until a reload (sometimes?)
 _ bugfix: add new message counts until keypress
@@ -61,6 +47,21 @@ prune old entries from contacts.txt so that it doesn't arbitrarily
 
 done
 ----
+x nice little startup config program
+x bugfix: triggering a pageup when cursor scrolling up jumps to the
+   bottom of the page rather than the next line
+x bugfix: final logging messages to stdout?
+x bugfix: mbox directory shouldn't generate an exception, just an error
+x bugfix: m in thread-view-mode when a person is not selected should open up a
+   blank compose-mode rather than do nothing
+x bugfix: stars on messages with blue backgrounds still have green bgs
+x ferret upgrade script (dump & restore)
+x bugfix: mark messages as read immediately when t-v-m is opened
+x compose in thread-view-mode auto-fills in person
+x bugfix: 'N' in thread-view-mode (expand only new messages) crashes
+x bugfix: detect source corruption at startup
+x maildir
+x bugfix: single-line messages come empty upon reply
 x make 'A' archive in thread-view-mode
 x remove stupid percent_done source methods (still useful; made it optional)
 x don't quit while writing thread index state to disk or with unsaved drafts/messages

diff --git a/lib/sup/message.rb b/lib/sup/message.rb
index 13f9377b23a99bb2a991ba447a4938d03256a615..61d23976cfe09a3ba66abf70104216e04bf7a458 100644 (file)
--- a/lib/sup/message.rb
+++ b/lib/sup/message.rb
@@ -140,7 +140,7 @@ class Message
 
   def snippet; @snippet || chunks && @snippet; end
   def is_list_message?; !@list_address.nil?; end
-  def is_draft?; DraftLoader === @source; end
+  def is_draft?; @source.is_a? DraftLoader; end
   def draft_filename
     raise "not a draft" unless is_draft?
     @source.fn_for_offset @source_info

diff --git a/lib/sup/util.rb b/lib/sup/util.rb
index e13aac4abb952537fa1c21867af2cf76e416c626..79e9b21669fefcc1d18d671a23c0575a2bfea1af 100644 (file)
--- a/lib/sup/util.rb
+++ b/lib/sup/util.rb
@@ -301,6 +301,7 @@ class Recoverable
   def id; __pass :id; end
   def to_s; __pass :to_s; end
   def to_yaml x; __pass :to_yaml, x; end
+  def is_a? c; @o.is_a? c; end
 
   def __pass m, *a, &b
     begin