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

INDENT_SPACES =

how many spaces to indent child messages

2

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.



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 129

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



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

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



287
288
289
290
291
# File 'lib/sup/modes/thread_view_mode.rb', line 287

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

#align_current_messageObject



515
516
517
518
# File 'lib/sup/modes/thread_view_mode.rb', line 515

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

#archive_and_killObject



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

def archive_and_kill; archive_and_then :kill end

#archive_and_nextObject



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

def archive_and_next; archive_and_then :next end

#archive_and_prevObject



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

def archive_and_prev; archive_and_then :prev end

#archive_and_then(op) ⇒ Object



630
631
632
633
634
635
636
637
638
639
640
641
# File 'lib/sup/modes/thread_view_mode.rb', line 630

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



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

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



605
606
607
# File 'lib/sup/modes/thread_view_mode.rb', line 605

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

#collapse_non_new_messagesObject



590
591
592
593
# File 'lib/sup/modes/thread_view_mode.rb', line 590

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

#composeObject



300
301
302
303
304
305
306
307
# File 'lib/sup/modes/thread_view_mode.rb', line 300

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

#delete_and_killObject



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

def delete_and_kill; delete_and_then :kill end

#delete_and_nextObject



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

def delete_and_next; delete_and_then :next end

#delete_and_prevObject



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

def delete_and_prev; delete_and_then :prev end

#delete_and_then(op) ⇒ Object



656
657
658
659
660
661
662
663
664
665
666
667
# File 'lib/sup/modes/thread_view_mode.rb', line 656

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



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

def do_nothing_and_kill; do_nothing_and_then :kill end

#do_nothing_and_nextObject



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

def do_nothing_and_next; do_nothing_and_then :next end

#do_nothing_and_prevObject



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

def do_nothing_and_prev; do_nothing_and_then :prev end

#do_nothing_and_then(op) ⇒ Object



690
691
692
# File 'lib/sup/modes/thread_view_mode.rb', line 690

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



379
380
381
382
383
384
# File 'lib/sup/modes/thread_view_mode.rb', line 379

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



446
447
448
449
450
451
452
453
454
455
456
# File 'lib/sup/modes/thread_view_mode.rb', line 446

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



309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
# File 'lib/sup/modes/thread_view_mode.rb', line 309

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



583
584
585
586
587
588
# File 'lib/sup/modes/thread_view_mode.rb', line 583

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



595
596
597
598
599
600
601
602
603
# File 'lib/sup/modes/thread_view_mode.rb', line 595

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



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

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



249
250
251
252
253
254
255
# File 'lib/sup/modes/thread_view_mode.rb', line 249

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



755
756
757
758
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
# File 'lib/sup/modes/thread_view_mode.rb', line 755

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| d[0] == :text_color and d[1].strip != ""} # Only take up to the first "" alone on its line
    .map{|d| d[1].strip}.join("").strip

  found = false
  (linetext || "").scan(URI::regexp).each do |matches|
    begin
      link = $& # ruby magic: $& is the whole regexp match
      u = URI.parse(link)
      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



470
471
472
473
474
475
476
477
# File 'lib/sup/modes/thread_view_mode.rb', line 470

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



560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
# File 'lib/sup/modes/thread_view_mode.rb', line 560

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



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

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



504
505
506
507
508
509
510
511
512
513
# File 'lib/sup/modes/thread_view_mode.rb', line 504

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



520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
# File 'lib/sup/modes/thread_view_mode.rb', line 520

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



542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
# File 'lib/sup/modes/thread_view_mode.rb', line 542

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



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

def kill_and_kill; kill_and_then :kill end

#kill_and_nextObject



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

def kill_and_next; kill_and_then :next end

#kill_and_prevObject



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

def kill_and_prev; kill_and_then :prev end

#kill_and_then(op) ⇒ Object



669
670
671
672
673
674
675
676
677
678
679
680
# File 'lib/sup/modes/thread_view_mode.rb', line 669

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



716
717
718
719
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
# File 'lib/sup/modes/thread_view_mode.rb', line 716

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



437
438
439
440
441
442
443
444
# File 'lib/sup/modes/thread_view_mode.rb', line 437

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



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

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



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

def reply_all; reply :all; end

#save_all_to_diskObject



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

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.safe_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



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

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.safe_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



293
294
295
296
297
298
# File 'lib/sup/modes/thread_view_mode.rb', line 293

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



458
459
460
461
462
463
464
465
466
467
468
# File 'lib/sup/modes/thread_view_mode.rb', line 458

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



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

def spam_and_kill; spam_and_then :kill end

#spam_and_nextObject



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

def spam_and_next; spam_and_then :next end

#spam_and_prevObject



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

def spam_and_prev; spam_and_then :prev end

#spam_and_then(op) ⇒ Object



643
644
645
646
647
648
649
650
651
652
653
654
# File 'lib/sup/modes/thread_view_mode.rb', line 643

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



747
748
749
750
751
752
753
# File 'lib/sup/modes/thread_view_mode.rb', line 747

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



217
218
219
220
221
222
223
224
# File 'lib/sup/modes/thread_view_mode.rb', line 217

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



337
338
339
340
341
342
343
344
345
346
347
348
# File 'lib/sup/modes/thread_view_mode.rb', line 337

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



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

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

#toggle_starredObject



327
328
329
330
# File 'lib/sup/modes/thread_view_mode.rb', line 327

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



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

def unread_and_kill; unread_and_then :kill end

#unread_and_nextObject



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

def unread_and_next; unread_and_then :next end

#unread_and_prevObject



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

def unread_and_prev; unread_and_then :prev end

#unread_and_then(op) ⇒ Object



682
683
684
685
686
687
688
# File 'lib/sup/modes/thread_view_mode.rb', line 682

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



226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
# File 'lib/sup/modes/thread_view_mode.rb', line 226

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 => e
      BufferManager.flash("Invalid unsubscribe link")
      return
    end

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