Class: Redwood::ThreadViewMode

Inherits:
LineCursorMode show all
Includes:
CanAliasContacts
Defined in:
lib/sup/modes/thread-view-mode.rb

Defined Under Namespace

Classes: ChunkLayout, MessageLayout

Constant Summary collapse

DATE_FORMAT = 
"%B %e %Y %l:%M%p"
INDENT_SPACES =

how many spaces to indent child messages

2

Constants inherited from ScrollMode

ScrollMode::COL_JUMP

Instance Attribute Summary

Attributes inherited from LineCursorMode

#curpos

Attributes inherited from ScrollMode

#botline, #leftcol, #status, #topline

Attributes inherited from Mode

#buffer

Instance Method Summary collapse

Methods included from CanAliasContacts

#alias_contact

Methods inherited from LineCursorMode

#draw

Methods inherited from ScrollMode

#at_bottom?, #at_top?, #cancel_search!, #col_left, #col_right, #continue_search_in_buffer, #draw, #ensure_mode_validity, #half_page_down, #half_page_up, #in_search?, #jump_to_col, #jump_to_end, #jump_to_left, #jump_to_line, #jump_to_start, #line_down, #line_up, #page_down, #page_up, #resize, #rightcol, #search_goto_line, #search_goto_pos, #search_in_buffer, #search_start_line

Methods inherited from Mode

#blur, #cancel_search!, #draw, #focus, #handle_input, #help_text, #in_search?, keymap, keymaps, #killable?, load_all_modes, make_name, #name, #pipe_to_process, register_keymap, #resize, #resolve_input, #save_to_file, #status, #unsaved?

Constructor Details

#initialize(thread, hidden_labels = [], index_mode = nil) ⇒ ThreadViewMode

there are a couple important instance variables we hold to format the thread and to provide line-based functionality. @layout is a map from Messages to MessageLayouts, and @chunk_layout from Chunks to ChunkLayouts. @message_lines is a map from row #s to Message objects. @chunk_lines is a map from row #s to Chunk objects. @person_lines is a map from row #s to Person objects.



115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
 
# File 'lib/sup/modes/thread-view-mode.rb', line 115

def initialize thread, hidden_labels=[], index_mode=nil
  super :slip_rows => $config[:slip_rows]
  @thread = thread
  @hidden_labels = hidden_labels

  ## used for dispatch-and-next
  @index_mode = index_mode
  @dying = false

  @layout = SavingHash.new { MessageLayout.new }
  @chunk_layout = SavingHash.new { ChunkLayout.new }
  earliest, latest = nil, nil
  latest_date = nil
  altcolor = false

  @thread.each do |m, d, p|
    next unless m
    earliest ||= m
    @layout[m].state = initial_state_for m
    @layout[m].toggled_state = false
    @layout[m].color = altcolor ? :alternate_patina_color : :message_patina_color
    @layout[m].star_color = altcolor ? :alternate_starred_patina_color : :starred_patina_color
    @layout[m].orig_new = m.has_label? :read
    altcolor = !altcolor
    if latest_date.nil? || m.date > latest_date
      latest_date = m.date
      latest = m
    end
  end

  @wrap = true

  @layout[latest].state = :open if @layout[latest].state == :closed
  @layout[earliest].state = :detailed if earliest.has_label?(:unread) || @thread.size == 1

  @thread.remove_label :unread
  Index.save_thread @thread
end

Instance Method Details

#[](i) ⇒ Object 



168
 
# File 'lib/sup/modes/thread-view-mode.rb', line 168

def [] i; @text[i]; end

#activate_chunk ⇒ Object

called when someone presses enter when the cursor is highlighting a chunk. for expandable chunks (including messages) we toggle open/closed state; for viewable chunks (like attachments) we view.



327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
 
# File 'lib/sup/modes/thread-view-mode.rb', line 327

def activate_chunk
  chunk = @chunk_lines[curpos] or return
  if chunk.is_a? Chunk::Text
    ## if the cursor is over a text region, expand/collapse the
    ## entire message
    chunk = @message_lines[curpos]
  end
  layout = if chunk.is_a?(Message)
    @layout[chunk]
  elsif chunk.expandable?
    @chunk_layout[chunk]
  end
  if layout
    layout.state = (layout.state != :closed ? :closed : :open)
    #cursor_down if layout.state == :closed # too annoying
    update
  elsif chunk.viewable?
    view chunk
  end
  if chunk.is_a?(Message) && $config[:jump_to_open_message]
    jump_to_message chunk
    jump_to_next_open if layout.state == :closed
  end
end

#alias ⇒ Object 



260
261
262
263
264
 
# File 'lib/sup/modes/thread-view-mode.rb', line 260

def alias
  p = @person_lines[curpos] or return
  alias_contact p
  update
end

#align_current_message ⇒ Object 



480
481
482
483
 
# File 'lib/sup/modes/thread-view-mode.rb', line 480

def align_current_message
  m = @message_lines[curpos] or return
  jump_to_message m, true
end

#archive_and_kill ⇒ Object 



572
 
# File 'lib/sup/modes/thread-view-mode.rb', line 572

def archive_and_kill; archive_and_then :kill end

#archive_and_next ⇒ Object 



578
 
# File 'lib/sup/modes/thread-view-mode.rb', line 578

def archive_and_next; archive_and_then :next end

#archive_and_prev ⇒ Object 



584
 
# File 'lib/sup/modes/thread-view-mode.rb', line 584

def archive_and_prev; archive_and_then :prev end

#archive_and_then(op) ⇒ Object 



590
591
592
593
594
595
596
597
598
599
600
601
 
# File 'lib/sup/modes/thread-view-mode.rb', line 590

def archive_and_then op
  dispatch op do
    @thread.remove_label :inbox
    UpdateManager.relay self, :archived, @thread.first
    Index.save_thread @thread
    UndoManager.register "archiving 1 thread" do
      @thread.apply_label :inbox
      Index.save_thread @thread
      UpdateManager.relay self, :unarchived, @thread.first
    end
  end
end

#bounce ⇒ Object 



232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
 
# File 'lib/sup/modes/thread-view-mode.rb', line 232

def bounce
  m = @message_lines[curpos] or return
  to = BufferManager.ask_for_contacts(:people, "Bounce To: ") or return

  defcmd = AccountManager..bounce_sendmail

  cmd = case (hookcmd = HookManager.run "bounce-command", :from => m.from, :to => to)
        when nil, /^$/ then defcmd
        else hookcmd
        end + ' ' + to.map { |t| t.email }.join(' ')

  bt = to.size > 1 ? "#{to.size} recipients" : to.to_s

  if BufferManager.ask_yes_or_no "Really bounce to #{bt}?"
    debug "bounce command: #{cmd}"
    begin
      IO.popen(cmd, 'w') do |sm|
        sm.puts m.raw_message
      end
      raise SendmailCommandFailed, "Couldn't execute #{cmd}" unless $? == 0
    rescue SystemCallError, SendmailCommandFailed => e
      warn "problem sending mail: #{e.message}"
      BufferManager.flash "Problem sending mail: #{e.message}"
    end
  end
end

#buffer=(b) ⇒ Object

a little hacky—since regen_text can depend on buffer features like the content_width, we don’t call it in the constructor, and instead call it here, which is set before we’re responsible for drawing ourself.



173
174
175
176
 
# File 'lib/sup/modes/thread-view-mode.rb', line 173

def buffer= b
  super
  regen_text
end

#cleanup ⇒ Object 



568
569
570
 
# File 'lib/sup/modes/thread-view-mode.rb', line 568

def cleanup
  @layout = @chunk_layout = @text = nil # for good luck
end

#collapse_non_new_messages ⇒ Object 



553
554
555
556
 
# File 'lib/sup/modes/thread-view-mode.rb', line 553

def collapse_non_new_messages
  @layout.each { |m, l| l.state = l.orig_new ? :open : :closed }
  update
end

#compose ⇒ Object 



273
274
275
276
277
278
279
280
 
# File 'lib/sup/modes/thread-view-mode.rb', line 273

def compose
  p = @person_lines[curpos]
  if p
    ComposeMode.spawn_nicely :to_default => p
  else
    ComposeMode.spawn_nicely
  end
end

#delete_and_kill ⇒ Object 



574
 
# File 'lib/sup/modes/thread-view-mode.rb', line 574

def delete_and_kill; delete_and_then :kill end

#delete_and_next ⇒ Object 



580
 
# File 'lib/sup/modes/thread-view-mode.rb', line 580

def delete_and_next; delete_and_then :next end

#delete_and_prev ⇒ Object 



586
 
# File 'lib/sup/modes/thread-view-mode.rb', line 586

def delete_and_prev; delete_and_then :prev end

#delete_and_then(op) ⇒ Object 



616
617
618
619
620
621
622
623
624
625
626
627
 
# File 'lib/sup/modes/thread-view-mode.rb', line 616

def delete_and_then op
  dispatch op do
    @thread.apply_label :deleted
    UpdateManager.relay self, :deleted, @thread.first
    Index.save_thread @thread
    UndoManager.register "deleting 1 thread" do
      @thread.remove_label :deleted
      Index.save_thread @thread
      UpdateManager.relay self, :undeleted, @thread.first
    end
  end
end

#do_nothing_and_kill ⇒ Object 



576
 
# File 'lib/sup/modes/thread-view-mode.rb', line 576

def do_nothing_and_kill; do_nothing_and_then :kill end

#do_nothing_and_next ⇒ Object 



582
 
# File 'lib/sup/modes/thread-view-mode.rb', line 582

def do_nothing_and_next; do_nothing_and_then :next end

#do_nothing_and_prev ⇒ Object 



588
 
# File 'lib/sup/modes/thread-view-mode.rb', line 588

def do_nothing_and_prev; do_nothing_and_then :prev end

#do_nothing_and_then(op) ⇒ Object 



637
638
639
 
# File 'lib/sup/modes/thread-view-mode.rb', line 637

def do_nothing_and_then op
  dispatch op
end

#draw_line(ln, opts = {}) ⇒ Object 



160
161
162
163
164
165
166
 
# File 'lib/sup/modes/thread-view-mode.rb', line 160

def draw_line ln, opts={}
  if ln == curpos
    super ln, :highlight => true
  else
    super
  end
end

#edit_as_new ⇒ Object 



352
353
354
355
356
357
 
# File 'lib/sup/modes/thread-view-mode.rb', line 352

def edit_as_new
  m = @message_lines[curpos] or return
  mode = ComposeMode.new(:body => m.quotable_body_lines, :to => m.to, :cc => m.cc, :subj => m.subj, :bcc => m.bcc, :refs => m.refs, :replytos => m.replytos)
  BufferManager.spawn "edit as new", mode
  mode.edit_message
end

#edit_draft ⇒ Object 



413
414
415
416
417
418
419
420
421
422
423
 
# File 'lib/sup/modes/thread-view-mode.rb', line 413

def edit_draft
  m = @message_lines[curpos] or return
  if m.is_draft?
    mode = ResumeMode.new m
    BufferManager.spawn "Edit message", mode
    BufferManager.kill_buffer self.buffer
    mode.edit_message
  else
    BufferManager.flash "Not a draft message!"
  end
end

#edit_labels ⇒ Object 



282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
 
# File 'lib/sup/modes/thread-view-mode.rb', line 282

def edit_labels
  old_labels = @thread.labels
  reserved_labels = old_labels.select { |l| LabelManager::RESERVED_LABELS.include? l }
  new_labels = BufferManager.ask_for_labels :label, "Labels for thread: ", @thread.labels

  return unless new_labels
  @thread.labels = Set.new(reserved_labels) + new_labels
  new_labels.each { |l| LabelManager << l }
  update
  UpdateManager.relay self, :labeled, @thread.first
  Index.save_thread @thread
  UndoManager.register "labeling thread" do
    @thread.labels = old_labels
    Index.save_thread @thread
    UpdateManager.relay self, :labeled, @thread.first
  end
end

#expand_all_messages ⇒ Object 



546
547
548
549
550
551
 
# File 'lib/sup/modes/thread-view-mode.rb', line 546

def expand_all_messages
  @global_message_state ||= :closed
  @global_message_state = (@global_message_state == :closed ? :open : :closed)
  @layout.each { |m, l| l.state = @global_message_state }
  update
end

#expand_all_quotes ⇒ Object 



558
559
560
561
562
563
564
565
566
 
# File 'lib/sup/modes/thread-view-mode.rb', line 558

def expand_all_quotes
  if(m = @message_lines[curpos])
    quotes = m.chunks.select { |c| (c.is_a?(Chunk::Quote) || c.is_a?(Chunk::Signature)) && c.lines.length > 1 }
    numopen = quotes.inject(0) { |s, c| s + (@chunk_layout[c].state == :open ? 1 : 0) }
    newstate = numopen > quotes.length / 2 ? :closed : :open
    quotes.each { |c| @chunk_layout[c].state = newstate }
    update
  end
end

#forward ⇒ Object 



224
225
226
227
228
229
230
 
# File 'lib/sup/modes/thread-view-mode.rb', line 224

def forward
  if(chunk = @chunk_lines[curpos]) && chunk.is_a?(Chunk::Attachment)
    ForwardMode.spawn_nicely :attachments => [chunk]
  elsif(m = @message_lines[curpos])
    ForwardMode.spawn_nicely :message => m
  end
end

#jump_to_first_open ⇒ Object 



437
438
439
440
441
442
443
444
 
# File 'lib/sup/modes/thread-view-mode.rb', line 437

def jump_to_first_open
  m = @message_lines[0] or return
  if @layout[m].state != :closed
    jump_to_message m#, true
  else
    jump_to_next_open #true
  end
end

#jump_to_message(m, force_alignment = false) ⇒ Object 



523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
 
# File 'lib/sup/modes/thread-view-mode.rb', line 523

def jump_to_message m, force_alignment=false
  l = @layout[m]

  ## boundaries of the message
  message_left = l.depth * INDENT_SPACES
  message_right = message_left + l.width

  ## calculate leftmost colum
  left = if force_alignment # force mode: align exactly
    message_left
  else # regular: minimize cursor movement
    ## leftmost and rightmost are boundaries of all valid left-column
    ## alignments.
    leftmost = [message_left, message_right - buffer.content_width + 1].min
    rightmost = message_left
    leftcol.clamp(leftmost, rightmost)
  end

  jump_to_line l.top    # move vertically
  jump_to_col left      # move horizontally
  set_cursor_pos l.top  # set cursor pos
end

#jump_to_next_and_open ⇒ Object 



446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
 
# File 'lib/sup/modes/thread-view-mode.rb', line 446

def jump_to_next_and_open
  return continue_search_in_buffer if in_search? # err.. don't know why im doing this

  m = (curpos ... @message_lines.length).argfind { |i| @message_lines[i] }
  return unless m

  if @layout[m].toggled_state == true
    @layout[m].state = :closed
    @layout[m].toggled_state = false
    update
  end

  nextm = @layout[m].next
  if @layout[nextm].state == :closed
    @layout[nextm].state = :open
    @layout[nextm].toggled_state = true
  end

  jump_to_message nextm if nextm

  update if @layout[nextm].toggled_state
end

#jump_to_next_open(force_alignment = nil) ⇒ Object 



469
470
471
472
473
474
475
476
477
478
 
# File 'lib/sup/modes/thread-view-mode.rb', line 469

def jump_to_next_open force_alignment=nil
  return continue_search_in_buffer if in_search? # hack: allow 'n' to apply to both operations
  m = (curpos ... @message_lines.length).argfind { |i| @message_lines[i] }
  return unless m
  while nextm = @layout[m].next
    break if @layout[nextm].state != :closed
    m = nextm
  end
  jump_to_message nextm, force_alignment if nextm
end

#jump_to_prev_and_open(force_alignment = nil) ⇒ Object 



485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
 
# File 'lib/sup/modes/thread-view-mode.rb', line 485

def jump_to_prev_and_open force_alignment=nil
  m = (0 .. curpos).to_a.reverse.argfind { |i| @message_lines[i] }
  return unless m

  if @layout[m].toggled_state == true
    @layout[m].state = :closed
    @layout[m].toggled_state = false
    update
  end

  nextm = @layout[m].prev
  if @layout[nextm].state == :closed
    @layout[nextm].state = :open
    @layout[nextm].toggled_state = true
  end

  jump_to_message nextm if nextm
  update if @layout[nextm].toggled_state
end

#jump_to_prev_open ⇒ Object 



505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
 
# File 'lib/sup/modes/thread-view-mode.rb', line 505

def jump_to_prev_open
  m = (0 .. curpos).to_a.reverse.argfind { |i| @message_lines[i] } # bah, .to_a
  return unless m
  ## jump to the top of the current message if we're in the body;
  ## otherwise, to the previous message
  
  top = @layout[m].top
  if curpos == top
    while(prevm = @layout[m].prev)
      break if @layout[prevm].state != :closed
      m = prevm
    end
    jump_to_message prevm if prevm
  else
    jump_to_message m
  end
end

#lines ⇒ Object 



167
 
# File 'lib/sup/modes/thread-view-mode.rb', line 167

def lines; @text.length; end

#pipe_message ⇒ Object 



663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
 
# File 'lib/sup/modes/thread-view-mode.rb', line 663

def pipe_message
  chunk = @chunk_lines[curpos]
  chunk = nil unless chunk.is_a?(Chunk::Attachment)
  message = @message_lines[curpos] unless chunk

  return unless chunk || message

  command = BufferManager.ask(:shell, "pipe command: ")
  return if command.nil? || command.empty?

  output = pipe_to_process(command) do |stream|
    if chunk
      stream.print chunk.raw_content
    else
      message.each_raw_message_line { |l| stream.print l }
    end
  end

  if output
    BufferManager.spawn "Output of '#{command}'", TextMode.new(output.ascii)
  else
    BufferManager.flash "'#{command}' done!"
  end
end

#publish ⇒ Object 



404
405
406
407
408
409
410
411
 
# File 'lib/sup/modes/thread-view-mode.rb', line 404

def publish
  chunk = @chunk_lines[curpos] or return
  if HookManager.enabled? "publish"
    HookManager.run "publish", :chunk => chunk
  else
    BufferManager.flash "Publishing hook not defined."
  end
end

#reply(type_arg = nil) ⇒ Object 



198
199
200
201
202
 
# File 'lib/sup/modes/thread-view-mode.rb', line 198

def reply type_arg=nil
  m = @message_lines[curpos] or return
  mode = ReplyMode.new m, type_arg
  BufferManager.spawn "Reply to #{m.subj}", mode
end

#reply_all ⇒ Object 



204
 
# File 'lib/sup/modes/thread-view-mode.rb', line 204

def reply_all; reply :all; end

#save_all_to_disk ⇒ Object 



378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
 
# File 'lib/sup/modes/thread-view-mode.rb', line 378

def save_all_to_disk
  m = @message_lines[curpos] or return
  default_dir = ($config[:default_attachment_save_dir] || ".")
  folder = BufferManager.ask_for_filename :filename, "Save all attachments to folder: ", default_dir, true
  return unless folder

  num = 0
  num_errors = 0
  m.chunks.each do |chunk|
    next unless chunk.is_a?(Chunk::Attachment)
    fn = File.join(folder, chunk.filename)
    num_errors += 1 unless save_to_file(fn, false) { |f| f.print chunk.raw_content }
    num += 1
  end

  if num == 0
    BufferManager.flash "Didn't find any attachments!"
  else
    if num_errors == 0
      BufferManager.flash "Wrote #{num.pluralize 'attachment'} to #{folder}."
    else
      BufferManager.flash "Wrote #{(num - num_errors).pluralize 'attachment'} to #{folder}; couldn't write #{num_errors} of them (see log)."
    end
  end
end

#save_to_disk ⇒ Object 



359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
 
# File 'lib/sup/modes/thread-view-mode.rb', line 359

def save_to_disk
  chunk = @chunk_lines[curpos] or return
  case chunk
  when Chunk::Attachment
    default_dir = $config[:default_attachment_save_dir]
    default_dir = ENV["HOME"] if default_dir.nil? || default_dir.empty?
    default_fn = File.expand_path File.join(default_dir, chunk.filename)
    fn = BufferManager.ask_for_filename :filename, "Save attachment to file: ", default_fn
    save_to_file(fn) { |f| f.print chunk.raw_content } if fn
  else
    m = @message_lines[curpos]
    fn = BufferManager.ask_for_filename :filename, "Save message to file: "
    return unless fn
    save_to_file(fn) do |f|
      m.each_raw_message_line { |l| f.print l }
    end
  end
end

#search ⇒ Object 



266
267
268
269
270
271
 
# File 'lib/sup/modes/thread-view-mode.rb', line 266

def search
  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

#send_draft ⇒ Object 



425
426
427
428
429
430
431
432
433
434
435
 
# File 'lib/sup/modes/thread-view-mode.rb', line 425

def send_draft
  m = @message_lines[curpos] or return
  if m.is_draft?
    mode = ResumeMode.new m
    BufferManager.spawn "Send message", mode
    BufferManager.kill_buffer self.buffer
    mode.send_message
  else
    BufferManager.flash "Not a draft message!"
  end
end

#show_header ⇒ Object 



178
179
180
181
182
183
 
# File 'lib/sup/modes/thread-view-mode.rb', line 178

def show_header
  m = @message_lines[curpos] or return
  BufferManager.spawn_unless_exists("Full header for #{m.id}") do
    TextMode.new m.raw_header.ascii
  end
end

#show_message ⇒ Object 



185
186
187
188
189
190
 
# File 'lib/sup/modes/thread-view-mode.rb', line 185

def show_message
  m = @message_lines[curpos] or return
  BufferManager.spawn_unless_exists("Raw message for #{m.id}") do
    TextMode.new m.raw_message.ascii
  end
end

#spam_and_kill ⇒ Object 



573
 
# File 'lib/sup/modes/thread-view-mode.rb', line 573

def spam_and_kill; spam_and_then :kill end

#spam_and_next ⇒ Object 



579
 
# File 'lib/sup/modes/thread-view-mode.rb', line 579

def spam_and_next; spam_and_then :next end

#spam_and_prev ⇒ Object 



585
 
# File 'lib/sup/modes/thread-view-mode.rb', line 585

def spam_and_prev; spam_and_then :prev end

#spam_and_then(op) ⇒ Object 



603
604
605
606
607
608
609
610
611
612
613
614
 
# File 'lib/sup/modes/thread-view-mode.rb', line 603

def spam_and_then op
  dispatch op do
    @thread.apply_label :spam
    UpdateManager.relay self, :spammed, @thread.first
    Index.save_thread @thread
    UndoManager.register "marking 1 thread as spam" do
      @thread.remove_label :spam
      Index.save_thread @thread
      UpdateManager.relay self, :unspammed, @thread.first
    end
  end
end

#subscribe_to_list ⇒ Object 



206
207
208
209
210
211
212
213
 
# File 'lib/sup/modes/thread-view-mode.rb', line 206

def subscribe_to_list
  m = @message_lines[curpos] or return
  if m.list_subscribe && m.list_subscribe =~ /<mailto:(.*?)(\?subject=(.*?))?>/
    ComposeMode.spawn_nicely :from => AccountManager.(m.recipient_email), :to => [Person.from_address($1)], :subj => ($3 || "subscribe")
  else
    BufferManager.flash "Can't find List-Subscribe header for this message."
  end
end

#toggle_detailed_header ⇒ Object 



192
193
194
195
196
 
# File 'lib/sup/modes/thread-view-mode.rb', line 192

def toggle_detailed_header
  m = @message_lines[curpos] or return
  @layout[m].state = (@layout[m].state == :detailed ? :open : :detailed)
  update
end

#toggle_label(m, label) ⇒ Object 



310
311
312
313
314
315
316
317
318
319
320
321
 
# File 'lib/sup/modes/thread-view-mode.rb', line 310

def toggle_label m, label
  if m.has_label? label
    m.remove_label label
  else
    m.add_label label
  end
  ## TODO: don't recalculate EVERYTHING just to add a stupid little
  ## star to the display
  update
  UpdateManager.relay self, :single_message_labeled, m
  Index.save_thread @thread
end

#toggle_new ⇒ Object 



305
306
307
308
 
# File 'lib/sup/modes/thread-view-mode.rb', line 305

def toggle_new
  m = @message_lines[curpos] or return
  toggle_label m, :unread
end

#toggle_starred ⇒ Object 



300
301
302
303
 
# File 'lib/sup/modes/thread-view-mode.rb', line 300

def toggle_starred
  m = @message_lines[curpos] or return
  toggle_label m, :starred
end

#toggle_wrap ⇒ Object 



154
155
156
157
158
 
# File 'lib/sup/modes/thread-view-mode.rb', line 154

def toggle_wrap
  @wrap = !@wrap
  regen_text
  buffer.mark_dirty if buffer
end

#unread_and_kill ⇒ Object 



575
 
# File 'lib/sup/modes/thread-view-mode.rb', line 575

def unread_and_kill; unread_and_then :kill end

#unread_and_next ⇒ Object 



581
 
# File 'lib/sup/modes/thread-view-mode.rb', line 581

def unread_and_next; unread_and_then :next end

#unread_and_prev ⇒ Object 



587
 
# File 'lib/sup/modes/thread-view-mode.rb', line 587

def unread_and_prev; unread_and_then :prev end

#unread_and_then(op) ⇒ Object 



629
630
631
632
633
634
635
 
# File 'lib/sup/modes/thread-view-mode.rb', line 629

def unread_and_then op
  dispatch op do
    @thread.apply_label :unread
    UpdateManager.relay self, :unread, @thread.first
    Index.save_thread @thread
  end
end

#unsubscribe_from_list ⇒ Object 



215
216
217
218
219
220
221
222
 
# File 'lib/sup/modes/thread-view-mode.rb', line 215

def unsubscribe_from_list
  m = @message_lines[curpos] or return
  if m.list_unsubscribe && m.list_unsubscribe =~ /<mailto:(.*?)(\?subject=(.*?))?>/
    ComposeMode.spawn_nicely :from => AccountManager.(m.recipient_email), :to => [Person.from_address($1)], :subj => ($3 || "unsubscribe")
  else
    BufferManager.flash "Can't find List-Unsubscribe header for this message."
  end
end