Class: Redwood::ThreadViewMode

Inherits:
LineCursorMode show all
Includes:
CanAliasContacts
Defined in:
lib/sup/modes/thread_view_mode.rb

Defined Under Namespace

Classes: ChunkLayout, MessageLayout

Instance Attribute Summary

Attributes inherited from LineCursorMode

#curpos

Attributes inherited from ScrollMode

#botline, #leftcol, #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_jump, #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, #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.



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
153
154
155
156
157
158
159
160
161
162
163
# File 'lib/sup/modes/thread_view_mode.rb', line 128

def initialize thread, hidden_labels=[], index_mode=nil
  @indent_spaces = $config[:indent_spaces]
  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
end

Instance Method Details

#[](i) ⇒ Object



179
# File 'lib/sup/modes/thread_view_mode.rb', line 179

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

#activate_chunkObject

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.



358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
# File 'lib/sup/modes/thread_view_mode.rb', line 358

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

#aliasObject



291
292
293
294
295
# File 'lib/sup/modes/thread_view_mode.rb', line 291

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

#align_current_messageObject



519
520
521
522
# File 'lib/sup/modes/thread_view_mode.rb', line 519

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

#archive_and_killObject



613
# File 'lib/sup/modes/thread_view_mode.rb', line 613

def archive_and_kill; archive_and_then :kill end

#archive_and_nextObject



620
# File 'lib/sup/modes/thread_view_mode.rb', line 620

def archive_and_next; archive_and_then :next end

#archive_and_prevObject



627
# File 'lib/sup/modes/thread_view_mode.rb', line 627

def archive_and_prev; archive_and_then :prev end

#archive_and_then(op) ⇒ Object



634
635
636
637
638
639
640
641
642
643
644
645
# File 'lib/sup/modes/thread_view_mode.rb', line 634

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

#bounceObject



261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
# File 'lib/sup/modes/thread_view_mode.rb', line 261

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[0].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
      m.add_label :forwarded
      Index.save_message m
    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.



184
185
186
187
# File 'lib/sup/modes/thread_view_mode.rb', line 184

def buffer= b
  super
  regen_text
end

#cleanupObject



609
610
611
# File 'lib/sup/modes/thread_view_mode.rb', line 609

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

#collapse_non_new_messagesObject



594
595
596
597
# File 'lib/sup/modes/thread_view_mode.rb', line 594

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

#composeObject



304
305
306
307
308
309
310
311
# File 'lib/sup/modes/thread_view_mode.rb', line 304

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

#delete_and_killObject



615
# File 'lib/sup/modes/thread_view_mode.rb', line 615

def delete_and_kill; delete_and_then :kill end

#delete_and_nextObject



622
# File 'lib/sup/modes/thread_view_mode.rb', line 622

def delete_and_next; delete_and_then :next end

#delete_and_prevObject



629
# File 'lib/sup/modes/thread_view_mode.rb', line 629

def delete_and_prev; delete_and_then :prev end

#delete_and_then(op) ⇒ Object



660
661
662
663
664
665
666
667
668
669
670
671
# File 'lib/sup/modes/thread_view_mode.rb', line 660

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_killObject



618
# File 'lib/sup/modes/thread_view_mode.rb', line 618

def do_nothing_and_kill; do_nothing_and_then :kill end

#do_nothing_and_nextObject



625
# File 'lib/sup/modes/thread_view_mode.rb', line 625

def do_nothing_and_next; do_nothing_and_then :next end

#do_nothing_and_prevObject



632
# File 'lib/sup/modes/thread_view_mode.rb', line 632

def do_nothing_and_prev; do_nothing_and_then :prev end

#do_nothing_and_then(op) ⇒ Object



694
695
696
# File 'lib/sup/modes/thread_view_mode.rb', line 694

def do_nothing_and_then op
  dispatch op
end

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



171
172
173
174
175
176
177
# File 'lib/sup/modes/thread_view_mode.rb', line 171

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

#edit_as_newObject



383
384
385
386
387
388
# File 'lib/sup/modes/thread_view_mode.rb', line 383

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.default_edit_message
end

#edit_draftObject



450
451
452
453
454
455
456
457
458
459
460
# File 'lib/sup/modes/thread_view_mode.rb', line 450

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.default_edit_message
  else
    BufferManager.flash "Not a draft message!"
  end
end

#edit_labelsObject



313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
# File 'lib/sup/modes/thread_view_mode.rb', line 313

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.sort_by {|x| x.to_s}

  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_messagesObject



587
588
589
590
591
592
# File 'lib/sup/modes/thread_view_mode.rb', line 587

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_quotesObject



599
600
601
602
603
604
605
606
607
# File 'lib/sup/modes/thread_view_mode.rb', line 599

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

#fetch_and_verifyObject



800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
# File 'lib/sup/modes/thread_view_mode.rb', line 800

def fetch_and_verify
  message = @message_lines[curpos]
  crypto_chunk = message.chunks.select {|chunk| chunk.is_a?(Chunk::CryptoNotice)}.first
  return unless crypto_chunk
  return unless crypto_chunk.unknown_fingerprint

  BufferManager.flash "Retrieving key #{crypto_chunk.unknown_fingerprint} ..."

  error = CryptoManager.retrieve crypto_chunk.unknown_fingerprint

  if error
    BufferManager.flash "Couldn't retrieve key: #{error.to_s}"
  else
    BufferManager.flash "Key #{crypto_chunk.unknown_fingerprint} successfully retrieved !"
  end

  # Re-trigger gpg verification
  message.reload_from_source!
  update
end

#forwardObject



253
254
255
256
257
258
259
# File 'lib/sup/modes/thread_view_mode.rb', line 253

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

#goto_uriObject



759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
# File 'lib/sup/modes/thread_view_mode.rb', line 759

def goto_uri
  unless (chunk = @chunk_lines[curpos])
    BufferManager.flash "No URI found."
    return
  end
  unless HookManager.enabled? "goto"
    BufferManager.flash "You must add a goto.rb hook before you can goto a URI."
    return
  end

  # @text is a list of lines with this format:
  # [
  #   [[:text_color, "Some text"]]
  #   [[:text_color, " continued here"]]
  # ]

  linetext = @text.slice(curpos, @text.length).flatten(1)
    .take_while{|d| [:text_color, :sig_color].include?(d[0]) and d[1].strip != ""} # Only take up to the first "" alone on its line
    .map{|d| d[1].strip}.join("").strip

  found = false
  URI.extract(linetext || "").each do |match|
    begin
      u = URI.parse(match)
      next unless u.absolute?
      next unless ["http", "https"].include?(u.scheme)

      reallink = Shellwords.escape(u.to_s)
      BufferManager.flash "Going to #{reallink} ..."
      HookManager.run "goto", :uri => reallink
      BufferManager.completely_redraw_screen
      found = true

    rescue URI::InvalidURIError => e
      debug "not a uri: #{e}"
      # Do nothing, this is an ok flow
    end
  end
  BufferManager.flash "No URI found." unless found
end

#jump_to_first_openObject



474
475
476
477
478
479
480
481
# File 'lib/sup/modes/thread_view_mode.rb', line 474

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



564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
# File 'lib/sup/modes/thread_view_mode.rb', line 564

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_openObject



483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
# File 'lib/sup/modes/thread_view_mode.rb', line 483

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

  nextm = @layout[m].next
  return unless nextm

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

  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



508
509
510
511
512
513
514
515
516
517
# File 'lib/sup/modes/thread_view_mode.rb', line 508

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



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 524

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

  nextm = @layout[m].prev
  return unless nextm

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

  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_openObject



546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
# File 'lib/sup/modes/thread_view_mode.rb', line 546

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

#kill_and_killObject



616
# File 'lib/sup/modes/thread_view_mode.rb', line 616

def kill_and_kill; kill_and_then :kill end

#kill_and_nextObject



623
# File 'lib/sup/modes/thread_view_mode.rb', line 623

def kill_and_next; kill_and_then :next end

#kill_and_prevObject



630
# File 'lib/sup/modes/thread_view_mode.rb', line 630

def kill_and_prev; kill_and_then :prev end

#kill_and_then(op) ⇒ Object



673
674
675
676
677
678
679
680
681
682
683
684
# File 'lib/sup/modes/thread_view_mode.rb', line 673

def kill_and_then op
  dispatch op do
    @thread.apply_label :killed
    UpdateManager.relay self, :killed, @thread.first
    Index.save_thread @thread
    UndoManager.register "killed 1 thread" do
      @thread.remove_label :killed
      Index.save_thread @thread
      UpdateManager.relay self, :unkilled, @thread.first
    end
  end
end

#linesObject



178
# File 'lib/sup/modes/thread_view_mode.rb', line 178

def lines; @text.length; end

#pipe_messageObject



720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
# File 'lib/sup/modes/thread_view_mode.rb', line 720

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, success = 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

  unless success
    BufferManager.flash "Invalid command: '#{command}' is not an executable"
    return
  end

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

#publishObject



441
442
443
444
445
446
447
448
# File 'lib/sup/modes/thread_view_mode.rb', line 441

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

#reloadObject



209
210
211
# File 'lib/sup/modes/thread_view_mode.rb', line 209

def reload
  update
end

#reply(type_arg = nil) ⇒ Object



213
214
215
216
217
# File 'lib/sup/modes/thread_view_mode.rb', line 213

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_allObject



219
# File 'lib/sup/modes/thread_view_mode.rb', line 219

def reply_all; reply :all; end

#save_all_to_diskObject



415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
# File 'lib/sup/modes/thread_view_mode.rb', line 415

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.filesafe_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_diskObject



390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
# File 'lib/sup/modes/thread_view_mode.rb', line 390

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.filesafe_filename)
    fn = BufferManager.ask_for_filename :filename, "Save attachment to file or directory: ", default_fn, true

    # if user selects directory use file name from message
    if fn and File.directory? fn
      fn = File.join(fn, chunk.filename)
    end

    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

#searchObject



297
298
299
300
301
302
# File 'lib/sup/modes/thread_view_mode.rb', line 297

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_draftObject



462
463
464
465
466
467
468
469
470
471
472
# File 'lib/sup/modes/thread_view_mode.rb', line 462

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_headerObject



189
190
191
192
193
194
# File 'lib/sup/modes/thread_view_mode.rb', line 189

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_messageObject



196
197
198
199
200
201
# File 'lib/sup/modes/thread_view_mode.rb', line 196

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_killObject



614
# File 'lib/sup/modes/thread_view_mode.rb', line 614

def spam_and_kill; spam_and_then :kill end

#spam_and_nextObject



621
# File 'lib/sup/modes/thread_view_mode.rb', line 621

def spam_and_next; spam_and_then :next end

#spam_and_prevObject



628
# File 'lib/sup/modes/thread_view_mode.rb', line 628

def spam_and_prev; spam_and_then :prev end

#spam_and_then(op) ⇒ Object



647
648
649
650
651
652
653
654
655
656
657
658
# File 'lib/sup/modes/thread_view_mode.rb', line 647

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

#statusObject



751
752
753
754
755
756
757
# File 'lib/sup/modes/thread_view_mode.rb', line 751

def status
  user_labels = @thread.labels.to_a.map do |l|
    l.to_s if LabelManager.user_defined_labels.member?(l)
  end.compact.join(",")
  user_labels = (user_labels.empty? and "" or "<#{user_labels}>")
  [user_labels, super].join(" -- ")
end

#subscribe_to_listObject



221
222
223
224
225
226
227
228
# File 'lib/sup/modes/thread_view_mode.rb', line 221

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_headerObject



203
204
205
206
207
# File 'lib/sup/modes/thread_view_mode.rb', line 203

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



341
342
343
344
345
346
347
348
349
350
351
352
# File 'lib/sup/modes/thread_view_mode.rb', line 341

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_newObject



336
337
338
339
# File 'lib/sup/modes/thread_view_mode.rb', line 336

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

#toggle_starredObject



331
332
333
334
# File 'lib/sup/modes/thread_view_mode.rb', line 331

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

#toggle_wrapObject



165
166
167
168
169
# File 'lib/sup/modes/thread_view_mode.rb', line 165

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

#unread_and_killObject



617
# File 'lib/sup/modes/thread_view_mode.rb', line 617

def unread_and_kill; unread_and_then :kill end

#unread_and_nextObject



624
# File 'lib/sup/modes/thread_view_mode.rb', line 624

def unread_and_next; unread_and_then :next end

#unread_and_prevObject



631
# File 'lib/sup/modes/thread_view_mode.rb', line 631

def unread_and_prev; unread_and_then :prev end

#unread_and_then(op) ⇒ Object



686
687
688
689
690
691
692
# File 'lib/sup/modes/thread_view_mode.rb', line 686

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_listObject



230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
# File 'lib/sup/modes/thread_view_mode.rb', line 230

def unsubscribe_from_list
  m = @message_lines[curpos] or return
  BufferManager.flash "Can't find List-Unsubscribe header for this message." unless m.list_unsubscribe

  if m.list_unsubscribe =~ /<mailto:(.*?)(\?subject=(.*?))?>/
    ComposeMode.spawn_nicely :from => AccountManager.(m.recipient_email), :to => [Person.from_address($1)], :subj => ($3 || "unsubscribe")
  elsif m.list_unsubscribe =~ /<(http.*)?>/
    unless HookManager.enabled? "goto"
      BufferManager.flash "You must add a goto.rb hook before you can goto an unsubscribe URI."
      return
    end

    begin
      u = URI.parse($1)
    rescue URI::InvalidURIError
      BufferManager.flash("Invalid unsubscribe link")
      return
    end

    HookManager.run "goto", :uri => Shellwords.escape(u.to_s)
  end
end