sup 1.3 → 1.4

data/lib/sup/modes/contact_list_mode.rb

@@ -83,7 +83,6 @@ class ContactListMode < LineCursorMode
   def multi_search people
     mode = PersonSearchResultsMode.new people
     BufferManager.spawn "search for #{people.map { |p| p.name }.join(', ')}", mode
-    mode.load_threads :num => mode.buffer.content_height
   end
 
   def search

data/lib/sup/modes/edit_message_mode.rb

@@ -538,7 +538,7 @@ protected
       BufferManager.kill_buffer buffer
       BufferManager.flash "Message sent!"
       true
-    rescue SystemCallError, SendmailCommandFailed, CryptoManager::Error => e
+    rescue SystemCallError, SendmailCommandFailed, CryptoManager::Error, TypeError => e
       warn "Problem sending mail: #{e.message}"
       BufferManager.flash "Problem sending mail: #{e.message}"
       false

data/lib/sup/modes/label_search_results_mode.rb

@@ -29,8 +29,7 @@ class LabelSearchResultsMode < ThreadIndexMode
     when :inbox
       BufferManager.raise_to_front InboxMode.instance.buffer
     else
-      b, new = BufferManager.spawn_unless_exists("All threads with label '#{label}'") { LabelSearchResultsMode.new [label] }
-      b.mode.load_threads :num => b.content_height if new
+      BufferManager.spawn_unless_exists("All threads with label '#{label}'") { LabelSearchResultsMode.new [label] }
     end
   end
 end

data/lib/sup/modes/line_cursor_mode.rb

@@ -20,14 +20,19 @@ class LineCursorMode < ScrollMode
       while true
         e = @load_more_q.pop
         @load_more_callbacks.each { |c| c.call e }
-        sleep 0.5
-        @load_more_q.pop until @load_more_q.empty?
+        hysteresis = $config[:load_more_threads_hysteresis] || 0.5
+        if hysteresis > 0 then
+          sleep hysteresis
+          @load_more_q.pop until @load_more_q.empty?
+        end
       end
     end
 
     super opts
   end
 
+  def spawned; call_load_more_callbacks buffer.content_height + 1; end
+
   def cleanup
     @load_more_thread.kill
     super
@@ -157,26 +162,22 @@ protected
     end
   end
 
-  ## more complicated than one might think. three behaviors.
+  def half_page_up
+    super
+    set_cursor_pos [botline, @curpos].min
+  end
+
   def page_down
-    ## if we're on the last page, and it's not a full page, just move
-    ## the cursor down to the bottom and assume we can't load anything
-    ## else via the callbacks.
-    if topline > lines - buffer.content_height
-      set_cursor_pos(lines - 1)
-
-    ## if we're on the last page, and it's a full page, try and load
-    ## more lines via the callbacks and then shift the page down
-    elsif topline == lines - buffer.content_height
-      call_load_more_callbacks buffer.content_height
-      super
+    relpos = @curpos - topline
+    super
+    set_cursor_pos [topline + relpos, lines - 1].min
+    call_load_more_callbacks buffer.content_height if lines < topline + buffer.content_height
+  end
 
-    ## otherwise, just move down
-    else
-      relpos = @curpos - topline
-      super
-      set_cursor_pos [topline + relpos, lines - 1].min
-    end
+  def half_page_down
+    super
+    set_cursor_pos [topline, @curpos].max
+    call_load_more_callbacks buffer.content_height if lines < topline + buffer.content_height
   end
 
   def jump_to_start
@@ -187,6 +188,7 @@ protected
   def jump_to_end
     super if topline < (lines - buffer.content_height)
     set_cursor_pos(lines - 1)
+    call_load_more_callbacks buffer.content_height
   end
 
 private

data/lib/sup/modes/search_results_mode.rb

@@ -49,7 +49,6 @@ class SearchResultsMode < ThreadIndexMode
       short_text = text.length < 20 ? text : text[0 ... 20] + "..."
       mode = SearchResultsMode.new query
       BufferManager.spawn "search: \"#{short_text}\"", mode
-      mode.load_threads :num => mode.buffer.content_height
     rescue Index::ParseError => e
       BufferManager.flash "Problem: #{e.message}!"
     end

data/lib/sup/modes/thread_view_mode.rb

@@ -205,7 +205,7 @@ EOS
     @layout[m].state = (@layout[m].state == :detailed ? :open : :detailed)
     update
   end
-  
+
   def reload
     update
   end
@@ -298,7 +298,6 @@ EOS
     p = @person_lines[curpos] or return
     mode = PersonSearchResultsMode.new [p]
     BufferManager.spawn "Search for #{p.name}", mode
-    mode.load_threads :num => mode.buffer.content_height
   end
 
   def compose

data/lib/sup/rfc2047.rb

@@ -62,10 +62,13 @@ module Rfc2047
       end
 
       begin
-        text.force_encoding(charset).encode(target)
+        text.force_encoding charset
+        text.encode! target
       rescue ArgumentError, EncodingError
-        word
+        next word
       end
+      next word unless text.valid_encoding?
+      text
     end
   end
 end

data/lib/sup/source.rb

@@ -90,6 +90,8 @@ class Source
   ## the location filename
   def labels? info; [] end
 
+  def fallback_date_for_message info; end
+
   ## Yields values of the form [Symbol, Hash]
   ## add: info, labels, progress
   ## delete: info, progress

data/lib/sup/version.rb

@@ -8,5 +8,5 @@ def git_suffix
 end
 
 module Redwood
-  VERSION = "1.3"
+  VERSION = "1.4"
 end

data/lib/sup.rb

@@ -142,7 +142,7 @@ module Redwood
         File::open(fn) { |f| f.read }
       end
       ## fix up malformed tag URIs created by earlier versions of sup
-      raw_contents.gsub!(/!supmua.org,2006-10-01\/(\S*)$/) { |m| "!<tag:supmua.org,2006-10-01/#{$1}>" }
+      raw_contents.gsub!(/!supmua.org,2006-10-01\/(\S+)/) { |m| "!<tag:supmua.org,2006-10-01/#{$1}>" }
       if YAML.respond_to?(:unsafe_load)  # Ruby 3.1+
         YAML::unsafe_load raw_contents
       else

data/man/sup-add.1

@@ -1,6 +1,6 @@
-.\" Automatically generated by Pandoc 3.1.11.1
+.\" Automatically generated by Pandoc 3.7.0.2
 .\"
-.TH "SUP\-ADD" "1" "April 9, 2012" "Sup User Manual" ""
+.TH "SUP\-ADD" "1" "April 9, 2012" "Sup User Manual"
 .SH NAME
 sup\-add \- add a source to the Sup source list
 .SH SYNOPSIS
@@ -39,7 +39,7 @@ source
 Create a new account for this source, even if one already exists
 .TP
 \-o \f[I]STRING\f[R], \-\-force\-account \f[I]STRING\f[R]
-Reuse previously defined account user\[at]hostname
+Reuse previously defined account user\(athostname
 .TP
 \-v, \-\-version
 Print version and exit
@@ -77,10 +77,10 @@ Sup Wiki:
 .UE \c
 .TP
 Mailing list:
-supmua\[at]googlegroups.com
+supmua\(atgooglegroups.com
 .RS
 .PP
-supmua+subscribe\[at]googlegroups.com
+supmua+subscribe\(atgooglegroups.com
 .PP
 Archives: \c
 .UR https://groups.google.com/d/forum/supmua/
@@ -91,7 +91,7 @@ Copyright © 2006\-2009 William Morgan \c
 .MT mworgan-sup@masanjin.net
 .ME \c
 .PP
-Copyright \[at] 2013\-2014 Sup developers
+Copyright \(at 2013\-2014 Sup developers
 .PP
 Permission is granted to copy and distribute this manual under the terms
 of the GNU General Public License; either version 2 or (at your option)

data/man/sup-config.1

@@ -1,13 +1,13 @@
-.\" Automatically generated by Pandoc 3.1.11.1
+.\" Automatically generated by Pandoc 3.7.0.2
 .\"
-.TH "SUP\-CONFIG" "1" "April 9, 2012" "Sup User Manual" ""
+.TH "SUP\-CONFIG" "1" "April 9, 2012" "Sup User Manual"
 .SH NAME
 sup\-config \- interactive configuration tool for Sup
 .SH SYNOPSIS
 sup\-config [\f[I]options\f[R]]
 .SH DESCRIPTION
 Interactive configuration tool for Sup.
-Won\[cq]t destroy existing configuration.
+Won\(cqt destroy existing configuration.
 .SH OPTIONS
 .TP
 \-v, \-\-version
@@ -49,10 +49,10 @@ Sup Wiki:
 .UE \c
 .TP
 Mailing list:
-supmua\[at]googlegroups.com
+supmua\(atgooglegroups.com
 .RS
 .PP
-supmua+subscribe\[at]googlegroups.com
+supmua+subscribe\(atgooglegroups.com
 .PP
 Archives: \c
 .UR https://groups.google.com/d/forum/supmua/
@@ -63,7 +63,7 @@ Copyright © 2006\-2009 William Morgan \c
 .MT mworgan-sup@masanjin.net
 .ME \c
 .PP
-Copyright \[at] 2013\-2014 Sup developers
+Copyright \(at 2013\-2014 Sup developers
 .PP
 Permission is granted to copy and distribute this manual under the terms
 of the GNU General Public License; either version 2 or (at your option)

data/man/sup-dump.1

@@ -1,6 +1,6 @@
-.\" Automatically generated by Pandoc 3.1.11.1
+.\" Automatically generated by Pandoc 3.7.0.2
 .\"
-.TH "SUP\-DUMP" "1" "April 9, 2012" "Sup User Manual" ""
+.TH "SUP\-DUMP" "1" "April 9, 2012" "Sup User Manual"
 .SH NAME
 sup\-dump \- dumps message state from Sup index
 .SH SYNOPSIS
@@ -58,10 +58,10 @@ Sup Wiki:
 .UE \c
 .TP
 Mailing list:
-supmua\[at]googlegroups.com
+supmua\(atgooglegroups.com
 .RS
 .PP
-supmua+subscribe\[at]googlegroups.com
+supmua+subscribe\(atgooglegroups.com
 .PP
 Archives: \c
 .UR https://groups.google.com/d/forum/supmua/
@@ -72,7 +72,7 @@ Copyright © 2006\-2009 William Morgan \c
 .MT mworgan-sup@masanjin.net
 .ME \c
 .PP
-Copyright \[at] 2013\-2014 Sup developers
+Copyright \(at 2013\-2014 Sup developers
 .PP
 Permission is granted to copy and distribute this manual under the terms
 of the GNU General Public License; either version 2 or (at your option)

data/man/sup-import-dump.1

@@ -1,6 +1,6 @@
-.\" Automatically generated by Pandoc 3.1.11.1
+.\" Automatically generated by Pandoc 3.7.0.2
 .\"
-.TH "SUP\-IMPORT\-DUMP" "1" "April 9, 2012" "Sup User Manual" ""
+.TH "SUP\-IMPORT\-DUMP" "1" "April 9, 2012" "Sup User Manual"
 .SH NAME
 sup\-import\-dump \- import message state dump to Sup index
 .SH SYNOPSIS
@@ -15,7 +15,7 @@ Messages not mentioned in the dump file will not be modified.
 .SH OPTIONS
 .TP
 \-v, \-\-verbose
-Print message ids as they\[cq]re processed
+Print message ids as they\(cqre processed
 .TP
 \-i, \-\-ignore\-missing
 Silently skip over messages that are not in the index
@@ -30,7 +30,7 @@ Abort on encountering messages that are not in the index (default)
 Use transaction to apply all changes atomically
 .TP
 \-n, \-\-dry\-run
-Don\[cq]t actually modify the index.
+Don\(cqt actually modify the index.
 Probably only useful with \-\-verbose
 .TP
 \-\-version
@@ -65,10 +65,10 @@ Sup Wiki:
 .UE \c
 .TP
 Mailing list:
-supmua\[at]googlegroups.com
+supmua\(atgooglegroups.com
 .RS
 .PP
-supmua+subscribe\[at]googlegroups.com
+supmua+subscribe\(atgooglegroups.com
 .PP
 Archives: \c
 .UR https://groups.google.com/d/forum/supmua/
@@ -79,7 +79,7 @@ Copyright © 2006\-2009 William Morgan \c
 .MT mworgan-sup@masanjin.net
 .ME \c
 .PP
-Copyright \[at] 2013\-2014 Sup developers
+Copyright \(at 2013\-2014 Sup developers
 .PP
 Permission is granted to copy and distribute this manual under the terms
 of the GNU General Public License; either version 2 or (at your option)

data/man/sup-recover-sources.1

@@ -1,6 +1,6 @@
-.\" Automatically generated by Pandoc 3.1.11.1
+.\" Automatically generated by Pandoc 3.7.0.2
 .\"
-.TH "SUP\-RECOVER\-SOURCES" "1" "April 9, 2012" "Sup User Manual" ""
+.TH "SUP\-RECOVER\-SOURCES" "1" "April 9, 2012" "Sup User Manual"
 .SH NAME
 sup\-recover\-sources \- rebuild a lost Sup source configuration file
 .SH SYNOPSIS
@@ -69,10 +69,10 @@ Sup Wiki:
 .UE \c
 .TP
 Mailing list:
-supmua\[at]googlegroups.com
+supmua\(atgooglegroups.com
 .RS
 .PP
-supmua+subscribe\[at]googlegroups.com
+supmua+subscribe\(atgooglegroups.com
 .PP
 Archives: \c
 .UR https://groups.google.com/d/forum/supmua/
@@ -83,7 +83,7 @@ Copyright © 2006\-2009 William Morgan \c
 .MT mworgan-sup@masanjin.net
 .ME \c
 .PP
-Copyright \[at] 2013\-2014 Sup developers
+Copyright \(at 2013\-2014 Sup developers
 .PP
 Permission is granted to copy and distribute this manual under the terms
 of the GNU General Public License; either version 2 or (at your option)

data/man/sup-sync-back-maildir.1

@@ -1,6 +1,6 @@
-.\" Automatically generated by Pandoc 3.1.11.1
+.\" Automatically generated by Pandoc 3.7.0.2
 .\"
-.TH "SUP\-SYNC\-BACK\-MAILDIR" "1" "August 25, 2014" "Sup User Manual" ""
+.TH "SUP\-SYNC\-BACK\-MAILDIR" "1" "August 25, 2014" "Sup User Manual"
 .SH NAME
 sup\-sync\-back\-maildir \- Export Xapian entries to Maildir sources on
 disk
@@ -23,8 +23,8 @@ If you choose not to merge (\-m) you will lose information (`replied'),
 and in the previous example the file will be renamed to foo_bar:2,FS.
 .PP
 Running this script is \f[I]strongly\f[R] recommended when setting the
-\[lq]sync_back_to_maildir\[rq] option from false to true in config.yaml
-or changing the \[lq]sync_back\[rq] flag to true for a source in
+\(lqsync_back_to_maildir\(rq option from false to true in config.yaml or
+changing the \(lqsync_back\(rq flag to true for a source in
 sources.yaml.
 .PP
 If no source is given, the default behavior is to sync back all Maildir
@@ -33,10 +33,10 @@ configuration parameter sync_back = false in sources.yaml.
 .SH OPTIONS
 .TP
 \-n, \-\-no\-confirm
-Don\[cq]t ask for confirmation before synchronizing
+Don\(cqt ask for confirmation before synchronizing
 .TP
 \-m, \-\-no\-merge
-Don\[cq]t merge new supported Maildir flags (R and P)
+Don\(cqt merge new supported Maildir flags (R and P)
 .TP
 \-l, \-\-list\-sources
 List your Maildir sources and exit
@@ -81,10 +81,10 @@ Sup Wiki:
 .UE \c
 .TP
 Mailing list:
-supmua\[at]googlegroups.com
+supmua\(atgooglegroups.com
 .RS
 .PP
-supmua+subscribe\[at]googlegroups.com
+supmua+subscribe\(atgooglegroups.com
 .PP
 Archives: \c
 .UR https://groups.google.com/d/forum/supmua/
@@ -95,7 +95,7 @@ Copyright © 2006\-2009 William Morgan \c
 .MT mworgan-sup@masanjin.net
 .ME \c
 .PP
-Copyright \[at] 2013\-2014 Sup developers
+Copyright \(at 2013\-2014 Sup developers
 .PP
 Permission is granted to copy and distribute this manual under the terms
 of the GNU General Public License; either version 2 or (at your option)

data/man/sup-sync.1

@@ -1,6 +1,6 @@
-.\" Automatically generated by Pandoc 3.1.11.1
+.\" Automatically generated by Pandoc 3.7.0.2
 .\"
-.TH "SUP\-SYNC" "1" "April 9, 2012" "Sup User Manual" ""
+.TH "SUP\-SYNC" "1" "April 9, 2012" "Sup User Manual"
 .SH NAME
 sup\-sync \- sychronize the Sup index with message sources
 .SH SYNOPSIS
@@ -10,10 +10,10 @@ Synchronizes the Sup index with one or more message sources by adding
 messages, deleting messages, or changing message state in the index as
 appropriate.
 .PP
-\[lq]Message state\[rq] means read/unread, archived/inbox,
+\(lqMessage state\(rq means read/unread, archived/inbox,
 starred/unstarred, and all user\-defined labels on each message.
 .PP
-\[lq]Default source state\[rq] refers to any state that a source itself
+\(lqDefault source state\(rq refers to any state that a source itself
 has keeps about a message.
 Sup\-sync uses this information when adding a new message to the index.
 The source state is typically limited to read/unread, archived/inbox
@@ -22,8 +22,8 @@ Messages using the default source state are placed in the inbox
 (i.e.\ not archived) and unstarred.
 .PP
 If no sources are given, sync from all usual sources.
-Supported source URI schemes can be seen by running \[lq]sup\-add
-\-\-help\[rq].
+Supported source URI schemes can be seen by running \(lqsup\-add
+\-\-help\(rq.
 .SH MESSAGE STATE OPTIONS
 .TP
 \-\-asis
@@ -50,7 +50,7 @@ labels (a comma\-separated list) (default)
 .SH OTHER OPTIONS
 .TP
 \-v, \-\-verbose
-Print message ids as they\[cq]re processed.
+Print message ids as they\(cqre processed.
 .TP
 \-o, \-\-optimize
 As the final operation, optimize the index.
@@ -59,7 +59,7 @@ As the final operation, optimize the index.
 Scan over all sources.
 .TP
 \-n, \-\-dry\-run
-Don\[cq]t actually modify the index.
+Don\(cqt actually modify the index.
 Probably only useful with \-\-verbose.
 .TP
 \-\-version
@@ -99,10 +99,10 @@ Sup Wiki:
 .UE \c
 .TP
 Mailing list:
-supmua\[at]googlegroups.com
+supmua\(atgooglegroups.com
 .RS
 .PP
-supmua+subscribe\[at]googlegroups.com
+supmua+subscribe\(atgooglegroups.com
 .PP
 Archives: \c
 .UR https://groups.google.com/d/forum/supmua/
@@ -113,7 +113,7 @@ Copyright © 2006\-2009 William Morgan \c
 .MT mworgan-sup@masanjin.net
 .ME \c
 .PP
-Copyright \[at] 2013\-2014 Sup developers
+Copyright \(at 2013\-2014 Sup developers
 .PP
 Permission is granted to copy and distribute this manual under the terms
 of the GNU General Public License; either version 2 or (at your option)

data/man/sup-tweak-labels.1

@@ -1,6 +1,6 @@
-.\" Automatically generated by Pandoc 3.1.11.1
+.\" Automatically generated by Pandoc 3.7.0.2
 .\"
-.TH "SUP\-TWEAK\-LABELS" "1" "April 9, 2012" "Sup User Manuel" ""
+.TH "SUP\-TWEAK\-LABELS" "1" "April 9, 2012" "Sup User Manuel"
 .SH NAME
 sup\-tweak\-labels \- batch modification of message state already in
 index
@@ -9,8 +9,8 @@ sup\-tweak\-labels [\f[I]options\f[R]] source \&...
 .SH DESCRIPTION
 Batch modification of message state for messages already in the index.
 .PP
-Supported source URI schemes can be seen by running \[lq]sup\-add
-\-\-help\[rq].
+Supported source URI schemes can be seen by running \(lqsup\-add
+\-\-help\(rq.
 .SH OPTIONS
 .TP
 \-a \f[I]STRING\f[R], \-\-add \f[I]STRING\f[R]
@@ -26,16 +26,16 @@ A Sup search query
 .SH OTHER OPTIONS
 .TP
 \-v, \-\-verbose
-Print message ids as they\[cq]re processed
+Print message ids as they\(cqre processed
 .TP
 \-e, \-\-very\-verbose
-Print message names and subjects as they\[cq]re processed
+Print message names and subjects as they\(cqre processed
 .TP
 \-\-all\-sources
 Scan over all sources
 .TP
 \-n, \-\-dry\-run
-Don\[cq]t actually modify the index.
+Don\(cqt actually modify the index.
 Probably only useful with \-\-verbose
 .TP
 \-\-version
@@ -70,10 +70,10 @@ Sup Wiki:
 .UE \c
 .TP
 Mailing list:
-supmua\[at]googlegroups.com
+supmua\(atgooglegroups.com
 .RS
 .PP
-supmua+subscribe\[at]googlegroups.com
+supmua+subscribe\(atgooglegroups.com
 .PP
 Archives: \c
 .UR https://groups.google.com/d/forum/supmua/
@@ -84,7 +84,7 @@ Copyright © 2006\-2009 William Morgan \c
 .MT mworgan-sup@masanjin.net
 .ME \c
 .PP
-Copyright \[at] 2013\-2014 Sup developers
+Copyright \(at 2013\-2014 Sup developers
 .PP
 Permission is granted to copy and distribute this manual under the terms
 of the GNU General Public License; either version 2 or (at your option)

data/man/sup.1

@@ -1,6 +1,6 @@
-.\" Automatically generated by Pandoc 3.1.11.1
+.\" Automatically generated by Pandoc 3.7.0.2
 .\"
-.TH "SUP" "1" "April 8, 2014" "Sup User Manual" ""
+.TH "SUP" "1" "April 8, 2014" "Sup User Manual"
 .SH NAME
 sup \- a curses\-based email client
 .SH SYNOPSIS
@@ -13,17 +13,17 @@ hierarchical collections email messages.
 Threads can have multiple tags applied to them.
 It supports a very fast full\-text search, automatic contact\-list
 management, custom code insertion via a Ruby hook system, and more.
-If you\[cq]re the type of person who treats email as an extension of
-your long\-term memory, Sup is for you.
+If you\(cqre the type of person who treats email as an extension of your
+long\-term memory, Sup is for you.
 .SH OPTIONS
 .TP
 \-l, \-\-list\-hooks
 List all hooks and descriptions, and quit.
-Use \[en]hooks\-matching to filter
+Use \(enhooks\-matching to filter
 .TP
 \-m, \-\-hooks\-matching=<s>
 If given, list all hooks and descriptions matching the given pattern.
-Needs the \[en]list\-hooks option (default: )
+Needs the \(enlist\-hooks option (default: )
 .TP
 \-n, \-\-no\-threads
 Turn off threading.
@@ -31,7 +31,7 @@ Helps with debugging.
 (Necessarily disables background polling for new messages.)
 .TP
 \-o, \-\-no\-initial\-poll
-Don\[cq]t poll for new messages when starting.
+Don\(cqt poll for new messages when starting.
 .TP
 \-s \f[I]QUERY\f[R], \-\-search \f[I]QUERY\f[R]
 Search for this query upon startup
@@ -54,7 +54,7 @@ Set log level verbosity.
 Valid values ordered by decresing verbosity: debug info warn error.
 Default log level is info.
 .TP
-SUP_BASE\[rs]
+SUP_BASE\(rs
 Specify home directory for configuration files and xapian index,
 defaults to: $HOME/.sup.
 .SH FILES
@@ -96,10 +96,10 @@ Sup Wiki:
 .UE \c
 .TP
 Mailing list:
-supmua\[at]googlegroups.com
+supmua\(atgooglegroups.com
 .RS
 .PP
-supmua+subscribe\[at]googlegroups.com
+supmua+subscribe\(atgooglegroups.com
 .PP
 Archives: \c
 .UR https://groups.google.com/d/forum/supmua/
@@ -110,7 +110,7 @@ Copyright © 2006\-2009 William Morgan \c
 .MT mworgan-sup@masanjin.net
 .ME \c
 .PP
-Copyright \[at] 2013\-2014 Sup developers
+Copyright \(at 2013\-2014 Sup developers
 .PP
 Permission is granted to copy and distribute this manual under the terms
 of the GNU General Public License; either version 2 or (at your option)

data/sup.gemspec

@@ -9,7 +9,7 @@ Gem::Specification.new do |s|
   s.authors = ["William Morgan", "Gaute Hope", "Hamish Downer", "Matthieu Rakotojaona"]
   s.email   = "supmua@googlegroups.com"
   s.summary = "A console-based email client with the best features of GMail, mutt and Emacs"
-  s.homepage = "https://sup-heliotrope.github.io/"
+  s.homepage = "https://supmua.dev/"
   s.license = 'GPL-2.0'
   s.description = <<-DESC
     Sup is a console-based email client for people with a lot of email.

data/test/dummy_buffer.rb

@@ -0,0 +1,34 @@
+require "sup"
+
+module Redwood
+
+class DummyBuffer
+  attr_reader :width, :height, :dirty_count, :commit_count
+
+  def initialize width=80, height=25
+    @width = width
+    @height = height
+    @dirty = false
+    @dirty_count = 0
+    @commit_count = 0
+  end
+
+  def content_height; @height - 1; end
+  def content_width; @width; end
+
+  def mark_dirty
+    @dirty = true
+    @dirty_count += 1
+  end
+
+  def dirty?; @dirty; end
+
+  def commit
+    @dirty = false
+    @commit_count += 1
+  end
+
+  def write(*args); end
+end
+
+end

data/test/fixtures/contacts.txt

@@ -1 +1,2 @@
-RC: Random Contact <random_dude@gmail.com>
+RC: Random Contact <random_dude@gmail.com>
+: Unaliased Contact <unaliased@example.invalid>