Class: ControlTab

Inherits:
Object show all
Defined in:
lib/xiki/control_tab.rb

Overview

Helps you switch between files, in a way very similar to how Ctrl-tab switches between windows in most operating systems. Call #keys to map it to Ctrl-tab in emacs.

Constant Summary collapse

@@edited = 
nil
@@switch_index = 
0

Class Method Summary collapse

Class Method Details

.go ⇒ Object

Primary method. Is mapped to C-tab and does the switching.



11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
 
# File 'lib/xiki/control_tab.rb', line 11

def self.go

  prefix = Keys.prefix :clear=>1

  first_tab_in_sequence = Keys.before_last !~ /\btab$/   # If first tab, clear edited
  @@edited = @@dash_prefix = @@nine_prefix = nil if first_tab_in_sequence

  if prefix == :- || @@dash_prefix   # Go to next quote in $f
    View.layout_files :no_blink=>1
    Move.to_quote
    Effects.blink
    Launcher.launch
    @@dash_prefix = true
    return
  end

  if prefix == 9 || @@nine_prefix   # Navigate to next Ol line in *ol buffer

    View.layout_output :dont_highlight=>1

    Move.to_end
    Search.forward "^ *-", :go_anyway=>1
    if View.cursor == View.bottom
      Move.to_previous_paragraph
      Line.next
    end

    Line.to_beginning
    Effects.blink
    Launcher.launch
    @@nine_prefix = true
    return
  end

    #     if prefix == 9   # If __ prefix, just burry buffer
    #       $el.bury_buffer
    #       # Store original order, and windows originally opened
    #       @@original = buffer_list.to_a   # Hide evidence that we were on top (lest it restore us)
    #       @@open_windows = window_list.collect {|b| window_buffer b}
    #       @@consider_test = lambda{|b| ! buffer_name(b)[/Minibuf/] }
    #       return
    #     end

  if prefix == :u   # If U prefix (must be first alt-tab in sequence)
    # Go to last edited file, and store list
    @@edited = $el.elvar.editedhistory_history.to_a
    @@edited -= View.files :visible=>1   # Exclude currently visible files
    $el.find_file @@edited.shift

    return
  elsif @@edited   # Subsequent alt-tab
    $el.find_file @@edited.shift
    return
  end

  # If this was the first tab in this sequence
  if first_tab_in_sequence# || last_was_modeline_click

    # Store original order, and windows originally opened
    @@original = $el.buffer_list.to_a
    @@open_windows = $el.window_list.collect {|b| $el.window_buffer b}

    # Check for prefix, and store correct test for files to go through accordingly
    case prefix
    when 0   # Non-files
      @@consider_test = lambda{|b| ! $el.buffer_file_name(b) && ! $el.buffer_name(b)[/Minibuf/]}
    when 1   # Only files
      @@consider_test = lambda{|b| $el.buffer_file_name(b)}
      #       when 3   # ...css
      #         @@consider_test = lambda{|b| buffer_name(b) =~ /\.(css|sass)/}
    when 2   # .notes files
      @@consider_test = lambda{|b| $el.buffer_file_name(b) =~ /\.deck$/}
    when 3   # ...css
      @@consider_test = lambda{|b| $el.buffer_name(b) =~ /^#/}
    when 4   # haml.html files
      @@consider_test = lambda{|b| $el.buffer_file_name(b) =~ /\.html/}
    when 5   # Consoles
      @@consider_test = lambda{|b|
        next if $el.buffer_file_name b
        $el.set_buffer b
        next if $el.elvar.major_mode.to_s != 'shell-mode'
        name = $el.buffer_name b
        next if name == "*ol"
        true
      }
      #         @@consider_test = lambda{|b| buffer_name(b) =~ /^(\*console|\*merb) /i}
    when 6   # Ruby files only
      @@consider_test = lambda{|b| $el.buffer_file_name(b) =~ /\.rb$/}
    when 68   # controller
      @@consider_test = lambda{|b| $el.buffer_file_name(b) =~ /\/app\/controllers\//}
    when 66   # Models
      @@consider_test = lambda{|b| $el.buffer_file_name(b) =~ /\/app\/models\//}
    when 67   # Tests
      @@consider_test = lambda{|b| $el.buffer_file_name(b) =~ /_(spec|test)\.rb$/}
    when 7   # .notes files
      @@consider_test = lambda{|b| $el.buffer_file_name(b) =~ /\.notes$/}
    when 8   # Anything (just like no arg)
      @@consider_test = lambda{|b| ! $el.buffer_name(b)[/Minibuf/] }
      #       when 9   # js
      #         @@consider_test = lambda{|b| buffer_file_name(b) =~ /\.js$/}
    else   # Anything (except minibuffer)
      @@consider_test = lambda{|b| ! $el.buffer_name(b)[/Minibuf/] }
    end

    # Remember we're starting at the top of the buffer list
    @@switch_index = 0

    # Go to next eligible buffer
    self.move_to_next

    $el.switch_to_buffer(@@original[@@switch_index])

  # If we've been typing tabs
  else
    self.restore_original_order   # Restore order up to this buffer
    self.move_to_next   # Point to next eligible buffer
    $el.switch_to_buffer(@@original[@@switch_index])  # Switch to eligible

  end
end

.keys ⇒ Object 



173
174
175
176
177
 
# File 'lib/xiki/control_tab.rb', line 173

def self.keys
  Keys.set("C-<tab>") do
    ControlTab.go
  end
end

.move_to_next ⇒ Object

Advances @@switch_index to next eligible buffer



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/xiki/control_tab.rb', line 140

def self.move_to_next
  buffer_started_at = @@switch_index

  @@switch_index += 1   # Move to next
  self.to_next_unless_nil   # Go there so test can look at buffer mode, etc

  # Keep moving until we find an eligible buffer (that isn't already viewed)
  while(
      @@open_windows.member?(@@original[@@switch_index]) ||   # Already viewed
      ! @@consider_test[@@original[@@switch_index]]   # Not what we're looking for
  )
    @@switch_index += 1

    # Stop moving forward if we're at end
    if @@switch_index >= @@original.size
      @@switch_index = buffer_started_at
      #         View.to_buffer buffer_started_at
      View.beep 'None left'
      break
    end

    self.to_next_unless_nil
  end
end

.restore_original_order ⇒ Object 



132
133
134
135
136
137
 
# File 'lib/xiki/control_tab.rb', line 132

def self.restore_original_order
  # Move backwards through original list, moving each to front
  (0..(@@switch_index)).each do |i|
    $el.switch_to_buffer(@@original[@@switch_index-i])
  end
end

.to_next_unless_nil ⇒ Object 



165
166
167
168
169
170
171
 
# File 'lib/xiki/control_tab.rb', line 165

def self.to_next_unless_nil
  to_buffer = @@original[@@switch_index]
  if to_buffer.nil?
    View.beep 'None left'
  end
  $el.set_buffer(to_buffer)   # Go there so test can look at buffer mode, etc
end