From fe7178c70cec9f4bcdeadea4a1d4874a9c7004a2 Mon Sep 17 00:00:00 2001 From: William Morgan Date: Sat, 12 Jan 2008 21:54:11 -0800 Subject: [PATCH] add 'z': align current message, to thread-view-mode Pressing 'z' now makes the current message be top- and left-aligned in the buffer. --- lib/sup/modes/thread-view-mode.rb | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/lib/sup/modes/thread-view-mode.rb b/lib/sup/modes/thread-view-mode.rb index d27323e..bd5c568 100644 --- a/lib/sup/modes/thread-view-mode.rb +++ b/lib/sup/modes/thread-view-mode.rb @@ -34,6 +34,7 @@ EOS k.add :expand_all_quotes, "Expand/collapse all quotes in a message", 'o' k.add :jump_to_next_open, "Jump to next open message", 'n' k.add :jump_to_prev_open, "Jump to previous open message", 'p' + k.add :align_current_message, "Align current message in buffer", 'z' k.add :toggle_starred, "Star or unstar message", '*' k.add :toggle_new, "Toggle unread/read status of message", 'N' # k.add :collapse_non_new_messages, "Collapse all but unread messages", 'N' @@ -294,6 +295,11 @@ EOS jump_to_message nextm if nextm end + def align_current_message + m = @message_lines[curpos] or return + jump_to_message m + end + def jump_to_prev_open m = (0 .. curpos).to_a.reverse.argfind { |i| @message_lines[i] } # bah, .to_a return unless m -- 2.45.2