textbringer 13 → 14

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 2ebcccec1dcc4c9b2116dc02f0e4548d30f019c0da7fc1d0573f84cf08b8590d
-  data.tar.gz: 1f2b135717e1fde5ca8f13fdb9a967d5a7cad5aea6af83c040f35bec85c3bf23
+  metadata.gz: 8b974ebb2c6338de9890aee4aa219529d5d81f9b838b21bb6e738ddf205015d5
+  data.tar.gz: fe3ed3ec2825a26e9e0c6eaa777a6e5c53549ac604ffe38eceb653ca2e6ef6b2
 SHA512:
-  metadata.gz: a9a9ea8e0234c2fda07af756eb12e8acc53a7f0c3e9cee57276adb742bda13a896875f4b21334794737a55d6e7c7c07168baea74304336e687834f3e5ba4b5d2
-  data.tar.gz: 1c3a84fc349f0d68cd55498d6ae45d159f672b824c8307e89e30bd4eb68c70126de3c358a9255177c74230b747b6255dbdfd36182fe9d56b34927b8a88f60fbb
+  metadata.gz: ddcdd02dc9fd8d7397ef7994d000d470268aff0052dcab907a2a6cb073a9f39847180c1dfc40984e36d19e4bd64459cdeed8ab6ba493cdf4d1df542d9f4ac3cb
+  data.tar.gz: cf0095973d9e53072a6243568ffe70aaf3a33b5091767c00ff0064ed9dcfc7f0f9c053b7d146abf69ec0cacb88f4495f16a283e05383246a4a84a001413b8cfd

data/lib/textbringer/buffer.rb

@@ -1090,203 +1090,6 @@ module Textbringer
       insert_for_yank(KILL_RING.rotate(1))
     end
 
-    # Returns start_line, start_col, end_line, and end_col of the rectangle region
-    # Note that start_col and end_col are 0-origin and width-based (neither 1-origin nor codepoint-based)
-    def rectangle_boundaries(s = @point, e = mark)
-      s, e = Buffer.region_boundaries(s, e)
-      save_excursion do
-        goto_char(s)
-        start_line = @current_line
-        beginning_of_line
-        start_col = display_width(substring(@point, s))
-        goto_char(e)
-        end_line = @current_line
-        beginning_of_line
-        end_col = display_width(substring(@point, e))
-
-        # Ensure start_col <= end_col
-        if start_col > end_col
-          start_col, end_col = end_col, start_col
-        end
-        [start_line, start_col, end_line, end_col]
-      end
-    end
-
-    def apply_on_rectangle(s = @point, e = mark, reverse: false)
-      start_line, start_col, end_line, end_col = rectangle_boundaries(s, e)
-
-      save_excursion do
-        composite_edit do
-          if reverse
-            goto_line(end_line)
-          else
-            goto_line(start_line)
-          end
-
-          loop do
-            beginning_of_line
-            line_start = @point
-
-            # Move to start column
-            col = 0
-            while col < start_col && !end_of_line?
-              forward_char
-              col = display_width(substring(line_start, @point))
-            end
-
-            yield(start_col, end_col, col, line_start)
-
-            # Move to next line for forward iteration
-            if reverse
-              break if @current_line <= start_line
-              backward_line
-            else
-              break if @current_line >= end_line
-              forward_line
-            end
-          end
-        end
-      end
-    end
-
-    def extract_rectangle(s = @point, e = mark)
-      lines = []
-      apply_on_rectangle(s, e) do |start_col, end_col, col, line_start|
-        start_pos = @point
-        width = end_col - start_col
-
-        # If we haven't reached start_col, the line is too short
-        if col < start_col
-          # Line is shorter than start column, extract all spaces
-          lines << " " * width
-        else
-          # Move to end column
-          while col < end_col && !end_of_line?
-            forward_char
-            col = display_width(substring(line_start, @point))
-          end
-          end_pos = @point
-
-          # Extract the rectangle text for this line
-          if end_pos > start_pos
-            extracted = substring(start_pos, end_pos)
-            # Pad with spaces if the extracted text is shorter than rectangle width
-            extracted_width = display_width(extracted)
-            if extracted_width < width
-              extracted += " " * (width - extracted_width)
-            end
-            lines << extracted
-          else
-            lines << " " * width
-          end
-        end
-      end
-
-      lines
-    end
-
-    def copy_rectangle(s = @point, e = mark)
-      lines = extract_rectangle(s, e)
-      @@killed_rectangle = lines
-    end
-
-    def kill_rectangle(s = @point, e = mark)
-      copy_rectangle(s, e)
-      delete_rectangle(s, e)
-    end
-
-    def delete_rectangle(s = @point, e = mark)
-      check_read_only_flag
-
-      apply_on_rectangle(s, e, reverse: true) do |start_col, end_col, col, line_start|
-        start_pos = @point
-
-        # Only delete if we're within the line bounds
-        if col >= start_col
-          # Move to end column
-          while col < end_col && !end_of_line?
-            forward_char
-            col = display_width(substring(line_start, @point))
-          end
-          end_pos = @point
-
-          # Delete the rectangle text for this line
-          if end_pos > start_pos
-            delete_region(start_pos, end_pos)
-          end
-        end
-      end
-    end
-
-    def yank_rectangle
-      raise "No rectangle in kill ring" if @@killed_rectangle.nil?
-      lines = @@killed_rectangle
-      start_line = @current_line
-      start_point = @point
-      start_col = save_excursion {
-        beginning_of_line
-        display_width(substring(@point, start_point))
-      }
-      composite_edit do
-        lines.each_with_index do |line, i|
-          goto_line(start_line + i)
-          beginning_of_line
-          line_start = @point
-
-          # Move to start column, extending line if necessary
-          col = 0
-          while col < start_col && !end_of_line?
-            forward_char
-            col = display_width(substring(line_start, @point))
-          end
-
-          # If line is shorter than start_col, extend it with spaces
-          if col < start_col
-            insert(" " * (start_col - col))
-          end
-
-          # Insert the rectangle line
-          insert(line)
-        end
-      end
-    end
-
-    def open_rectangle(s = @point, e = mark)
-      check_read_only_flag
-      s, e = Buffer.region_boundaries(s, e)
-      composite_edit do
-        apply_on_rectangle(s, e) do |start_col, end_col, col, line_start|
-          # If line is shorter than start_col, extend it with spaces
-          if col < start_col
-            insert(" " * (start_col - col))
-          end
-
-          # Insert spaces to create the rectangle
-          insert(" " * (end_col - start_col))
-        end
-        goto_char(s)
-      end
-    end
-
-    def clear_rectangle(s = @point, e = mark)
-      check_read_only_flag
-      apply_on_rectangle(s, e, reverse: true) do |start_col, end_col, col, line_start|
-        start_pos = @point
-        if col < start_col
-          insert(" " * (end_col - start_col))
-        else
-          while col < end_col && !end_of_line?
-            forward_char
-            col = display_width(substring(line_start, @point))
-          end
-          end_pos = @point
-
-          delete_region(start_pos, end_pos) if end_pos > start_pos
-          insert(" " * (end_col - start_col))
-        end
-      end
-    end
-
     def undo
       undo_or_redo(:undo, @undo_stack, @redo_stack)
     end
@@ -1295,7 +1098,7 @@ module Textbringer
       undo_or_redo(:redo, @redo_stack, @undo_stack)
     end
 
-    def re_search_forward(s, raise_error: true, count: 1)
+    def re_search_forward(s, raise_error: true, goto_beginning: false, count: 1)
       if count < 0
         return re_search_backward(s, raise_error: raise_error, count: -count)
       end
@@ -1310,7 +1113,7 @@ module Textbringer
             return nil
           end
         end
-        pos = match_end(0)
+        pos = goto_beginning ? match_beginning(0) : match_end(0)
       end
       goto_char(pos)
     end
@@ -1948,7 +1751,6 @@ module Textbringer
   end
 
   KILL_RING = Ring.new
-  @@killed_rectangle = nil
 
   class UndoableAction
     attr_accessor :version

data/lib/textbringer/commands/buffers.rb

@@ -129,36 +129,6 @@ module Textbringer
       Buffer.current.delete_region
     end
 
-    define_command(:kill_rectangle,
-                   doc: "Kill the text of the region-rectangle, saving its contents as the last killed rectangle.") do
-      Buffer.current.kill_rectangle
-    end
-
-    define_command(:copy_rectangle_as_kill,
-                   doc: "Save the text of the region-rectangle as the last killed rectangle.") do
-      Buffer.current.copy_rectangle
-    end
-
-    define_command(:delete_rectangle,
-                   doc: "Delete the text of the region-rectangle.") do
-      Buffer.current.delete_rectangle
-    end
-
-    define_command(:yank_rectangle,
-                   doc: "Yank the last killed rectangle with its upper left corner at point.") do
-      Buffer.current.yank_rectangle
-    end
-
-    define_command(:open_rectangle,
-                   doc: "Insert blank space to fill the space of the region-rectangle. This pushes the previous contents of the region-rectangle to the right.") do
-      Buffer.current.open_rectangle
-    end
-
-    define_command(:clear_rectangle,
-                   doc: "Clear the region-rectangle by replacing its contents with spaces.") do
-      Buffer.current.clear_rectangle
-    end
-
     define_command(:transpose_chars,
                    doc: "Transpose characters.") do
       Buffer.current.transpose_chars

data/lib/textbringer/commands/ispell.rb

@@ -0,0 +1,213 @@
+# frozen_string_literal: true
+
+require "open3"
+
+module Textbringer
+  module Commands
+    class Ispell
+      def initialize
+        @personal_dictionary_modified = false
+        @stdin, @stdout, @stderr, @wait_thr =
+          Open3.popen3("aspell -a")
+        @stdout.gets # consume the banner
+      end
+
+      def check_word(word)
+        send_command("^" + word)
+        result = @stdout.gets
+        @stdout.gets
+        case result
+        when /\A&\s+([^\s]+)\s+\d+\s+\d+:\s+(.*)/
+          [$1, $2.split(/, /)]
+        when /\A\*/, /\A\+/, /\A\-/, /\A\%/
+          [word, []]
+        when /\A#/
+          [word, nil]
+        else
+          raise "unexpected output from aspell: #{result}"
+        end
+      end
+
+      def add_to_session_dictionary(word)
+        send_command("@" + word)
+      end
+
+      def add_to_personal_dictionary(word)
+        send_command("*" + word)
+        @personal_dictionary_modified = true
+      end
+
+      def personal_dictionary_modified?
+        @personal_dictionary_modified
+      end
+
+      def save_personal_dictionary
+        send_command("#")
+      end
+
+      def send_command(line)
+        @stdin.puts(line)
+        @stdin.flush
+      end
+
+      def close
+        @stdin.close
+        @stdout.close
+        @stderr.close
+      end
+    end
+
+    define_keymap :ISPELL_MODE_MAP
+    (?\x20..?\x7e).each do |c|
+      ISPELL_MODE_MAP.define_key(c, :ispell_unknown_command)
+    end
+    ISPELL_MODE_MAP.define_key(?\t, :ispell_unknown_command)
+    ISPELL_MODE_MAP.handle_undefined_key do |key|
+      ispell_unknown_command
+    end
+    ISPELL_MODE_MAP.define_key(?r, :ispell_replace)
+    ISPELL_MODE_MAP.define_key(?a, :ispell_accept)
+    ISPELL_MODE_MAP.define_key(?i, :ispell_insert)
+    ISPELL_MODE_MAP.define_key(" ", :ispell_skip)
+    ISPELL_MODE_MAP.define_key(?q, :ispell_quit)
+
+    ISPELL_STATUS = {}
+
+    ISPELL_WORD_REGEXP = /[A-Za-z]+/
+
+    define_command(:ispell_word) do
+      buffer = Buffer.current
+      word = buffer.save_excursion {
+        while !buffer.beginning_of_buffer? && buffer.char_after =~ /[A-Za-z]/
+          buffer.backward_char
+        end
+        buffer.re_search_forward(/[A-Za-z]+/, raise_error: false) &&
+          buffer.match_string(0)
+      }
+      if word.nil?
+        message("No word at point.")
+        return
+      end
+      start_pos = buffer.match_beginning(0)
+      end_pos = buffer.match_end(0)
+      ispell = Ispell.new
+      begin
+        _original, suggestions = ispell.check_word(word)
+        if suggestions.nil? || suggestions.empty?
+          message("#{word.inspect} is spelled correctly.")
+        else
+          s = read_from_minibuffer("Correct #{word} with: ",
+                                   completion_proc: ->(s) {
+                                     suggestions.grep(/^#{Regexp.quote(s)}/)
+                                   })
+          if s
+            buffer.composite_edit do
+              buffer.delete_region(start_pos, end_pos)
+              buffer.insert(s)
+            end
+          end
+        end
+      ensure
+        ispell.close
+      end
+    end
+
+    define_command(:ispell_buffer) do |recursive_edit: false|
+      Buffer.current.beginning_of_buffer
+      ispell_mode
+      ispell_forward
+      ISPELL_STATUS[:recursive_edit] = recursive_edit
+      if recursive_edit
+        recursive_edit()
+      end
+    end
+
+    def ispell_done
+      Buffer.current.delete_visible_mark
+      Controller.current.overriding_map = nil
+      ISPELL_STATUS[:ispell]&.close
+      ISPELL_STATUS[:ispell] = nil
+      if ISPELL_STATUS[:recursive_edit]
+        exit_recursive_edit
+      end
+    end
+
+    def ispell_mode
+      ISPELL_STATUS[:ispell] = Ispell.new
+      Controller.current.overriding_map = ISPELL_MODE_MAP
+    end
+
+    def ispell_forward
+      buffer = Buffer.current
+      while buffer.re_search_forward(ISPELL_WORD_REGEXP, raise_error: false,
+                                     goto_beginning: true)
+        ispell_beginning = buffer.point
+        buffer.set_visible_mark
+        buffer.goto_char(buffer.match_end(0))
+        word = buffer.match_string(0)
+        _original, suggestions = ISPELL_STATUS[:ispell].check_word(word)
+        if !suggestions.nil? && !suggestions.empty?
+          ISPELL_STATUS[:beginning] = ispell_beginning
+          ISPELL_STATUS[:word] = word
+          ISPELL_STATUS[:suggestions] = suggestions
+          message("Mispelled: #{word}  [r]eplace, [a]ccept, [i]nsert, [SPC] to skip, [q]uit")
+          recenter
+          return
+        end
+      end
+      Controller.current.overriding_map = nil
+      if ISPELL_STATUS[:ispell]&.personal_dictionary_modified? &&
+          y_or_n?("Personal dictionary modified.  Save?")
+        ISPELL_STATUS[:ispell].save_personal_dictionary
+      end
+      message("Finished spelling check.")
+      ispell_done
+    end
+
+    define_command(:ispell_replace) do
+      word = ISPELL_STATUS[:word]
+      suggestions = ISPELL_STATUS[:suggestions]
+      Controller.current.overriding_map = nil
+      s = read_from_minibuffer("Correct #{word} with: ",
+                               completion_proc: ->(s) {
+        suggestions.grep(/^#{Regexp.quote(s)}/)
+      })
+      Controller.current.overriding_map = ISPELL_MODE_MAP
+      if !s.empty?
+        buffer = Buffer.current
+        pos = buffer.point
+        buffer.goto_char(ISPELL_STATUS[:beginning])
+        buffer.composite_edit do
+          buffer.delete_region(buffer.point, pos)
+          buffer.insert(s)
+        end
+      end
+      ispell_forward
+    end
+
+    define_command(:ispell_accept) do
+      ISPELL_STATUS[:ispell].add_to_session_dictionary(ISPELL_STATUS[:word])
+      ispell_forward
+    end
+
+    define_command(:ispell_insert) do
+      ISPELL_STATUS[:ispell].add_to_personal_dictionary(ISPELL_STATUS[:word])
+      ispell_forward
+    end
+
+    define_command(:ispell_skip) do
+      ispell_forward
+    end
+
+    define_command(:ispell_quit) do
+      message("Quitting spell check.")
+      ispell_done
+    end
+
+    define_command(:ispell_unknown_command) do
+      word = ISPELL_STATUS[:word]
+      message("Mispelled: #{word}  [r]eplace, [a]ccept, [i]nsert, [SPC] to skip, [q]uit")
+      Window.beep
+    end
+  end
+end

data/lib/textbringer/commands/rectangle.rb

@@ -0,0 +1,290 @@
+module Textbringer::Buffer::RectangleMethods
+  SHARED_VALUES = {}
+
+  refine Textbringer::Buffer do
+    # Returns start_line, start_col, end_line, and end_col of the rectangle region
+    # Note that start_col and end_col are 0-origin and width-based (neither 1-origin nor codepoint-based)
+    def rectangle_boundaries(s = @point, e = mark)
+      s, e = Buffer.region_boundaries(s, e)
+      save_excursion do
+        goto_char(s)
+        start_line = @current_line
+        beginning_of_line
+        start_col = display_width(substring(@point, s))
+        goto_char(e)
+        end_line = @current_line
+        beginning_of_line
+        end_col = display_width(substring(@point, e))
+
+        # Ensure start_col <= end_col
+        if start_col > end_col
+          start_col, end_col = end_col, start_col
+        end
+        [start_line, start_col, end_line, end_col]
+      end
+    end
+
+    def apply_on_rectangle(s = @point, e = mark)
+      start_line, start_col, end_line, end_col = rectangle_boundaries(s, e)
+
+      save_excursion do
+        composite_edit do
+          goto_line(start_line)
+
+          loop do
+            beginning_of_line
+            line_start = @point
+
+            # Move to start column
+            col = 0
+            while col < start_col && !end_of_line?
+              forward_char
+              col = display_width(substring(line_start, @point))
+            end
+
+            yield(start_col, end_col, col, line_start, start_line, end_line)
+
+            # Move to next line for forward iteration
+            break if @current_line >= end_line
+            forward_line
+          end
+        end
+      end
+    end
+
+    def extract_rectangle(s = @point, e = mark)
+      lines = []
+      apply_on_rectangle(s, e) do |start_col, end_col, col, line_start|
+        start_pos = @point
+        width = end_col - start_col
+
+        # If we haven't reached start_col, the line is too short
+        if col < start_col
+          # Line is shorter than start column, extract all spaces
+          lines << " " * width
+        else
+          # Move to end column
+          while col < end_col && !end_of_line?
+            forward_char
+            col = display_width(substring(line_start, @point))
+          end
+          end_pos = @point
+
+          # Extract the rectangle text for this line
+          if end_pos > start_pos
+            extracted = substring(start_pos, end_pos)
+            # Pad with spaces if the extracted text is shorter than rectangle width
+            extracted_width = display_width(extracted)
+            if extracted_width < width
+              extracted += " " * (width - extracted_width)
+            end
+            lines << extracted
+          else
+            lines << " " * width
+          end
+        end
+      end
+
+      lines
+    end
+
+    def copy_rectangle(s = @point, e = mark)
+      lines = extract_rectangle(s, e)
+      SHARED_VALUES[:killed_rectangle] = lines
+    end
+
+    def kill_rectangle(s = @point, e = mark)
+      copy_rectangle(s, e)
+      delete_rectangle(s, e)
+    end
+
+    def delete_rectangle(s = @point, e = mark)
+      check_read_only_flag
+
+      apply_on_rectangle(s, e) do |start_col, end_col, col, line_start|
+        start_pos = @point
+
+        # Only delete if we're within the line bounds
+        if col >= start_col
+          # Move to end column
+          while col < end_col && !end_of_line?
+            forward_char
+            col = display_width(substring(line_start, @point))
+          end
+          end_pos = @point
+
+          # Delete the rectangle text for this line
+          if end_pos > start_pos
+            delete_region(start_pos, end_pos)
+          end
+        end
+      end
+    end
+
+    def yank_rectangle
+      raise "No rectangle in kill ring" if SHARED_VALUES[:killed_rectangle].nil?
+      lines = SHARED_VALUES[:killed_rectangle]
+      start_line = @current_line
+      start_point = @point
+      start_col = save_excursion {
+        beginning_of_line
+        display_width(substring(@point, start_point))
+      }
+      composite_edit do
+        lines.each_with_index do |line, i|
+          goto_line(start_line + i)
+          beginning_of_line
+          line_start = @point
+
+          # Move to start column, extending line if necessary
+          col = 0
+          while col < start_col && !end_of_line?
+            forward_char
+            col = display_width(substring(line_start, @point))
+          end
+
+          # If line is shorter than start_col, extend it with spaces
+          if col < start_col
+            insert(" " * (start_col - col))
+          end
+
+          # Insert the rectangle line
+          insert(line)
+        end
+      end
+    end
+
+    def open_rectangle(s = @point, e = mark)
+      check_read_only_flag
+      s, e = Buffer.region_boundaries(s, e)
+      composite_edit do
+        apply_on_rectangle(s, e) do |start_col, end_col, col, line_start|
+          # If line is shorter than start_col, extend it with spaces
+          if col < start_col
+            insert(" " * (start_col - col))
+          end
+
+          # Insert spaces to create the rectangle
+          insert(" " * (end_col - start_col))
+        end
+        goto_char(s)
+      end
+    end
+
+    def clear_rectangle(s = @point, e = mark)
+      check_read_only_flag
+      apply_on_rectangle(s, e) do |start_col, end_col, col, line_start|
+        start_pos = @point
+        if col < start_col
+          insert(" " * (end_col - start_col))
+        else
+          while col < end_col && !end_of_line?
+            forward_char
+            col = display_width(substring(line_start, @point))
+          end
+          end_pos = @point
+
+          delete_region(start_pos, end_pos) if end_pos > start_pos
+          insert(" " * (end_col - start_col))
+        end
+      end
+    end
+
+    def string_rectangle(str, s = @point, e = mark)
+      check_read_only_flag
+      apply_on_rectangle(s, e) do |start_col, end_col, col, line_start|
+        start_pos = @point
+        if col < start_col
+          insert(" " * (start_col - col))
+          insert(str)
+        else
+          while col < end_col && !end_of_line?
+            forward_char
+            col = display_width(substring(line_start, @point))
+          end
+          end_pos = @point
+
+          delete_region(start_pos, end_pos) if end_pos > start_pos
+          insert(str)
+        end
+      end
+    end
+
+    def string_insert_rectangle(str, s = @point, e = mark)
+      check_read_only_flag
+      apply_on_rectangle(s, e) do |start_col, end_col, col, line_start|
+        if col < start_col
+          insert(" " * (start_col - col))
+        end
+        insert(str)
+      end
+    end
+
+    def rectangle_number_lines(s = @point, e = mark)
+      check_read_only_flag
+      n = 1
+      number_width = nil
+      apply_on_rectangle(s, e) do |start_col, end_col, col, line_start, start_line, end_line|
+        number_width ||= (1 + (end_line - start_line)).to_s.size
+        if col < start_col
+          insert(" " * (start_col - col))
+        end
+        insert(n.to_s.rjust(number_width) + " ")
+        n += 1
+      end
+    end
+  end
+end
+
+using Textbringer::Buffer::RectangleMethods
+
+module Textbringer
+  module Commands
+    define_command(:kill_rectangle,
+                   doc: "Kill the text of the region-rectangle, saving its contents as the last killed rectangle.") do
+      Buffer.current.kill_rectangle
+    end
+
+    define_command(:copy_rectangle_as_kill,
+                   doc: "Save the text of the region-rectangle as the last killed rectangle.") do
+      Buffer.current.copy_rectangle
+    end
+
+    define_command(:delete_rectangle,
+                   doc: "Delete the text of the region-rectangle.") do
+      Buffer.current.delete_rectangle
+    end
+
+    define_command(:yank_rectangle,
+                   doc: "Yank the last killed rectangle with its upper left corner at point.") do
+      Buffer.current.yank_rectangle
+    end
+
+    define_command(:open_rectangle,
+                   doc: "Insert blank space to fill the space of the region-rectangle. This pushes the previous contents of the region-rectangle to the right.") do
+      Buffer.current.open_rectangle
+    end
+
+    define_command(:clear_rectangle,
+                   doc: "Clear the region-rectangle by replacing its contents with spaces.") do
+      Buffer.current.clear_rectangle
+    end
+
+    define_command(:string_rectangle,
+                   doc: "Replace rectangle contents with the specified string on each line.") do
+      |str = read_from_minibuffer("String rectangle: ")|
+      Buffer.current.string_rectangle(str)
+    end
+
+    define_command(:string_insert_rectangle,
+                   doc: "Insert the specified string on each line of the rectangle.") do
+      |str = read_from_minibuffer("String insert rectangle: ")|
+      Buffer.current.string_insert_rectangle(str)
+    end
+
+    define_command(:rectangle_number_lines,
+                   doc: "Insert numbers in front of the region-rectangle.") do
+      Buffer.current.rectangle_number_lines
+    end
+  end
+end

data/lib/textbringer/keymap.rb

@@ -209,6 +209,8 @@ module Textbringer
   GLOBAL_MAP.define_key("\C-xry", :yank_rectangle)
   GLOBAL_MAP.define_key("\C-xro", :open_rectangle)
   GLOBAL_MAP.define_key("\C-xrc", :clear_rectangle)
+  GLOBAL_MAP.define_key("\C-xrt", :string_rectangle)
+  GLOBAL_MAP.define_key("\C-xrN", :rectangle_number_lines)
   GLOBAL_MAP.define_key("\C-x(", :start_keyboard_macro)
   GLOBAL_MAP.define_key(:f3, :start_keyboard_macro)
   GLOBAL_MAP.define_key("\C-x)", :end_keyboard_macro)

data/lib/textbringer/version.rb

@@ -1,3 +1,3 @@
 module Textbringer
-  VERSION = "13"
+  VERSION = "14"
 end

data/lib/textbringer/window.rb

@@ -405,7 +405,7 @@ module Textbringer
         @window.erase
         @window.setpos(0, 0)
         @window.attrset(0)
-        if current? && @buffer.visible_mark &&
+        if @buffer.visible_mark &&
            @buffer.point_after_mark?(@buffer.visible_mark)
           @window.attron(Curses::A_REVERSE)
         end
@@ -450,7 +450,7 @@ module Textbringer
           break if newx == columns && cury == lines - 2
           @buffer.forward_char
         end
-        if current? && @buffer.visible_mark
+        if @buffer.visible_mark
           @window.attroff(Curses::A_REVERSE)
         end
         @buffer.mark_to_point(@bottom_of_window)
@@ -679,7 +679,7 @@ module Textbringer
       if @buffer.point_at_mark?(point)
         @cursor.y = cury
         @cursor.x = curx
-        if current? && @buffer.visible_mark
+        if @buffer.visible_mark
           if @buffer.point_after_mark?(@buffer.visible_mark)
             @window.attroff(Curses::A_REVERSE)
           elsif @buffer.point_before_mark?(@buffer.visible_mark)
@@ -687,7 +687,7 @@ module Textbringer
           end
         end
       end
-      if current? && @buffer.visible_mark &&
+      if @buffer.visible_mark &&
          @buffer.point_at_mark?(@buffer.visible_mark)
         if @buffer.point_after_mark?(point)
           @window.attroff(Curses::A_REVERSE)

data/lib/textbringer.rb

@@ -14,7 +14,9 @@ require_relative "textbringer/commands/windows"
 require_relative "textbringer/commands/files"
 require_relative "textbringer/commands/misc"
 require_relative "textbringer/commands/isearch"
+require_relative "textbringer/commands/ispell"
 require_relative "textbringer/commands/replace"
+require_relative "textbringer/commands/rectangle"
 require_relative "textbringer/commands/dabbrev"
 require_relative "textbringer/commands/ctags"
 require_relative "textbringer/commands/clipboard"

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: textbringer
 version: !ruby/object:Gem::Version
-  version: '13'
+  version: '14'
 platform: ruby
 authors:
 - Shugo Maeda
@@ -352,8 +352,10 @@ files:
 - lib/textbringer/commands/help.rb
 - lib/textbringer/commands/input_method.rb
 - lib/textbringer/commands/isearch.rb
+- lib/textbringer/commands/ispell.rb
 - lib/textbringer/commands/keyboard_macro.rb
 - lib/textbringer/commands/misc.rb
+- lib/textbringer/commands/rectangle.rb
 - lib/textbringer/commands/register.rb
 - lib/textbringer/commands/replace.rb
 - lib/textbringer/commands/server.rb
@@ -409,7 +411,7 @@ required_rubygems_version: !ruby/object:Gem::Requirement
     - !ruby/object:Gem::Version
       version: '0'
 requirements: []
-rubygems_version: 3.6.7
+rubygems_version: 3.6.9
 specification_version: 4
 summary: An Emacs-like text editor
 test_files: []