textbringer 18 → 20

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 6880825c5cf726a2e49e28052cb09c0e8f0a15eadbf98b38e8806e6b486b9475
-  data.tar.gz: 79cef469e62da96630672057fda32b69ccdd349f76df36821f45a71be7e552d5
+  metadata.gz: 965d78b83028b05174c4dae6ddb2f0f367650333f605f625a12f898a0fc77f7b
+  data.tar.gz: c2e895bf76071590e42ad89e26c6d97d246fe68aeba741b9a2ee9eeb8f1110f1
 SHA512:
-  metadata.gz: 868b9d1cce93bf0dc1dabdb4e59c0dd775210c700b794b7093bfedb82d95d7d9e82191fc1d05daa9342e282d151567aa4d0d85a93f489ced5165e7d537d1e102
-  data.tar.gz: afad73fc5062774e6aa9b4d7cfa175be24f2dc25c9345218359ddce61f0049dcd7059709fe72c52c71d15d5625393a46987d0df04a36dbdc19d3855df02a8dab
+  metadata.gz: 17a23041efd23bf5dcb1dec4671cefb0645c194435e4f6fbf332fad79959bfb71e47da2d52b07bf7c964438cfb6fc08cb43c804e01f6c59597a50659a2fae7b2
+  data.tar.gz: cdec4c57a320056d392cced17e7f24dcf17bbfea21bc7053b65f612e84f4353abb8f4a372a3b572b2e18d3180c325b3b4801a16b97ef904ac06dd8f98ef9bef7

data/exe/txtb

@@ -27,11 +27,11 @@ end
 Controller.current = Controller.new
 begin
   Window.start do
+    load_user_config("~/.textbringer/init.rb")
     $stdout = DefaultOutput.new
     begin
       transient_mark_mode(true)
       Window.echo_area.clear_message
-      load_user_config("~/.textbringer/init.rb")
       Plugin.load_plugins
       load_user_config("~/.textbringer.rb")
       ruby_mode

data/lib/textbringer/buffer.rb

@@ -277,11 +277,15 @@ module Textbringer
     end
 
     def file_name=(file_name)
+      old_file_name = @file_name
       @file_name = file_name
       basename = File.basename(file_name)
       if /\A#{Regexp.quote(basename)}(<\d+>)?\z/ !~ name
         self.name = basename
       end
+      if old_file_name != file_name && current?
+        Utils.run_hooks(:after_set_visited_file_name_hook, old_file_name)
+      end
     end
 
     def file_encoding=(enc)
@@ -343,7 +347,7 @@ module Textbringer
     end
 
     def on_killed(&callback)
-      add_callback(:killed, callback)
+      on(:killed, &callback)
     end
 
     def current?
@@ -367,7 +371,7 @@ module Textbringer
     end
 
     def on_modified(&callback)
-      add_callback(:modified, callback)
+      on(:modified, &callback)
     end
 
     def [](name)
@@ -610,6 +614,7 @@ module Textbringer
       end
       self.modified = true
       @goal_column = nil
+      Utils.run_hooks(:after_change_functions, pos, @point, "") unless @undoing || !current?
       self
     end
 
@@ -651,6 +656,7 @@ module Textbringer
         end
         push_undo(DeleteAction.new(self, s, s, str))
         self.modified = true
+        Utils.run_hooks(:after_change_functions, s, s, str) unless @undoing || !current?
       elsif n < 0
         str = substring(pos, s)
         update_line_and_column(@point, pos)
@@ -666,6 +672,7 @@ module Textbringer
         @point = @gap_start = pos
         push_undo(DeleteAction.new(self, s, pos, str))
         self.modified = true
+        Utils.run_hooks(:after_change_functions, pos, pos, str) unless @undoing || !current?
       end
       @goal_column = nil
     end
@@ -1020,6 +1027,7 @@ module Textbringer
         end
         push_undo(DeleteAction.new(self, old_pos, s, str))
         self.modified = true
+        Utils.run_hooks(:after_change_functions, s, s, str) unless @undoing || !current?
       end
     end
 
@@ -1490,6 +1498,19 @@ module Textbringer
       end
     end
 
+    def pos_to_line_and_column(pos)
+      return [1, 1] if pos == 0
+      text_before = substring(0, pos)
+      line = text_before.count("\n") + 1
+      last_newline = text_before.rindex("\n")
+      column = if last_newline
+                 text_before.size - last_newline
+               else
+                 text_before.size + 1
+               end
+      [line, column]
+    end
+
     private
 
     def set_contents(s, enc)

data/lib/textbringer/commands/clipboard.rb

@@ -29,23 +29,38 @@ module Textbringer
         Copy the region to the kill ring and the clipboard, and delete
         the region.
       EOD
-      kill_region
-      Clipboard.copy(KILL_RING.current)
+      begin
+        kill_region
+        Clipboard.copy(KILL_RING.current)
+      rescue ReadOnlyError
+        Clipboard.copy(KILL_RING.current)
+        raise
+      end
     end
 
     define_command(:clipboard_kill_line, doc: <<~EOD) do
         Kill the rest of the current line, and copy the killed text to
         the clipboard.
       EOD
-      kill_line
-      Clipboard.copy(KILL_RING.current)
+      begin
+        kill_line
+        Clipboard.copy(KILL_RING.current)
+      rescue ReadOnlyError
+        Clipboard.copy(KILL_RING.current)
+        raise
+      end
     end
 
     define_command(:clipboard_kill_word, doc: <<~EOD) do
         Kill a word, and copy the word to the clipboard.
       EOD
-      kill_word
-      Clipboard.copy(KILL_RING.current)
+      begin
+        kill_word
+        Clipboard.copy(KILL_RING.current)
+      rescue ReadOnlyError
+        Clipboard.copy(KILL_RING.current)
+        raise
+      end
     end
 
     define_command(:clipboard_yank, doc: <<~EOD) do

data/lib/textbringer/commands/completion.rb

@@ -0,0 +1,133 @@
+module Textbringer
+  module Commands
+    define_keymap :COMPLETION_POPUP_MAP
+
+    # Navigation keys
+    COMPLETION_POPUP_MAP.define_key("\C-n", :completion_popup_next)
+    COMPLETION_POPUP_MAP.define_key(:down, :completion_popup_next)
+    COMPLETION_POPUP_MAP.define_key("\C-p", :completion_popup_previous)
+    COMPLETION_POPUP_MAP.define_key(:up, :completion_popup_previous)
+
+    # Accept keys
+    COMPLETION_POPUP_MAP.define_key("\C-m", :completion_popup_accept)  # RET
+    COMPLETION_POPUP_MAP.define_key("\t", :completion_popup_accept)    # Tab
+
+    # Cancel keys
+    COMPLETION_POPUP_MAP.define_key("\C-g", :completion_popup_cancel)
+
+    # Handle undefined keys - close popup and forward the key
+    COMPLETION_POPUP_MAP.handle_undefined_key do |key|
+      :completion_popup_self_insert_and_close
+    end
+
+    COMPLETION_POPUP_STATUS = {
+      active: false,
+      start_point: nil
+    }
+
+    def self.completion_popup_mode_active?
+      COMPLETION_POPUP_STATUS[:active]
+    end
+
+    define_command(:completion_popup_next,
+                   doc: "Select next completion candidate.") do
+      CompletionPopup.instance.select_next
+    end
+
+    define_command(:completion_popup_previous,
+                   doc: "Select previous completion candidate.") do
+      CompletionPopup.instance.select_previous
+    end
+
+    define_command(:completion_popup_accept,
+                   doc: "Accept the selected completion.") do
+      popup = CompletionPopup.instance
+      item = popup.accept
+      if item
+        insert_completion(item)
+      end
+      completion_popup_done
+    end
+
+    define_command(:completion_popup_cancel,
+                   doc: "Cancel completion popup.") do
+      CompletionPopup.instance.cancel
+      completion_popup_done
+    end
+
+    define_command(:completion_popup_self_insert_and_close,
+                   doc: "Close popup and process the key.") do
+      CompletionPopup.instance.close
+      completion_popup_done
+      # Execute the command for the key that closed the popup
+      key = Controller.current.last_key
+      buffer = Buffer.current
+      cmd = buffer&.keymap&.lookup([key]) || GLOBAL_MAP.lookup([key])
+      if cmd.is_a?(Symbol)
+        send(cmd)
+      elsif cmd.respond_to?(:call)
+        cmd.call
+      end
+    end
+
+    def completion_popup_start(items:, start_point:, prefix: "")
+      return if items.empty?
+
+      CompletionPopup.instance.show(
+        items: items,
+        start_point: start_point,
+        prefix: prefix
+      )
+
+      COMPLETION_POPUP_STATUS[:active] = true
+      COMPLETION_POPUP_STATUS[:start_point] = start_point
+
+      Controller.current.overriding_map = COMPLETION_POPUP_MAP
+      add_hook(:pre_command_hook, :completion_popup_pre_command_hook)
+    end
+
+    def completion_popup_done
+      COMPLETION_POPUP_STATUS[:active] = false
+      COMPLETION_POPUP_STATUS[:start_point] = nil
+      Controller.current.overriding_map = nil
+      remove_hook(:pre_command_hook, :completion_popup_pre_command_hook)
+    end
+
+    def completion_popup_pre_command_hook
+      # Close popup if command is not a completion popup command
+      if /\Acompletion_popup_/ !~ Controller.current.this_command.to_s
+        CompletionPopup.instance.close
+        completion_popup_done
+      end
+    end
+
+    def insert_completion(item)
+      buffer = Buffer.current
+      start_point = COMPLETION_POPUP_STATUS[:start_point]
+      return unless start_point
+
+      insert_text = item[:insert_text] || item[:label]
+      return unless insert_text
+
+      # The server may return an insert_text that covers more than the typed
+      # symbol prefix (e.g. "Textbringer::Buffer" when the symbol pattern only
+      # backed up to "Buf"). Find the longest prefix of insert_text that is a
+      # suffix of the buffer text ending at point, and use that as the
+      # replacement range.
+      look_back = [buffer.point, insert_text.length].min
+      actual_start = start_point
+      if look_back > 0
+        text_before_point = buffer.substring(buffer.point - look_back, buffer.point)
+        look_back.downto(1) do |n|
+          if text_before_point.end_with?(insert_text[0, n])
+            actual_start = buffer.point - n
+            break
+          end
+        end
+      end
+
+      buffer.delete_region(actual_start, buffer.point)
+      buffer.insert(insert_text)
+    end
+  end
+end

data/lib/textbringer/commands/ctags.rb

@@ -76,7 +76,7 @@ module Textbringer
       if CTAGS[:path] != path || CTAGS[:tags_mtime] != mtime
         CTAGS[:path] = path
         tags = Hash.new { |h, k| h[k] = [] }
-        File.read(path).scan(/^(.*?)\t(.*?)\t(.*?)(?:;".*)?$/) do
+        File.binread(path).scan(/^(.*?)\t(.*?)\t(.*?)(?:;".*)?$/) do
           |name, file, addr|
           n = tags[name].count { |f,| f == file } + 1
           tags[name].push([file, addr, n])

data/lib/textbringer/commands/files.rb

@@ -45,6 +45,7 @@ module Textbringer
       if config.key?("tab_width")
         Buffer.current[:tab_width] = config["tab_width"].to_i
       end
+      run_hooks(:find_file_hook)
     end
 
     define_command(:revert_buffer, doc: <<~EOD) do
@@ -102,10 +103,19 @@ module Textbringer
           next
         end
       end
-      Buffer.current.save(file_name)
+      set_visited_file_name(file_name)
+      Buffer.current.save
       message("Wrote #{Buffer.current.file_name}")
     end
 
+    define_command(:set_visited_file_name,
+                   doc: "Change the file name of the current buffer.") do
+      |file_name = read_file_name("Set visited file name: ",
+                                  default: Buffer.current.file_name)|
+      file_name = File.expand_path(file_name)
+      Buffer.current.file_name = file_name
+    end
+
     define_command(:set_buffer_file_encoding,
                    doc: "Set the file encoding of the current buffer.") do
       |enc = read_encoding("File encoding: ",

data/lib/textbringer/commands/help.rb

@@ -65,7 +65,7 @@ module Textbringer
     end
 
     def command_help(cmd)
-      file, line = *cmd.block.source_location
+      file, line = *cmd.source_location
       s = format("%s:%d\n", file, line)
       s << "-" * (Window.columns - 2) + "\n"
       s << "#{cmd.name}"

data/lib/textbringer/commands/ispell.rb

@@ -1,5 +1,3 @@
-# frozen_string_literal: true
-
 require "open3"
 require "uri"