Add Natural Selection integration

functions/_pisces_backspace.fish

@@ -1,5 +1,11 @@
 function _pisces_backspace -d "Overrides backspace to handle empty pairs removal"
 
+    # Natural Selection integration:
+    if functions -q _natural_selection_is_selecting; and _natural_selection_is_selecting
+        _natural_selection_kill_selection
+        return 0
+    end
+
     set -l line (commandline | string join \n)
     set -l index (commandline -C)
     if [ $index -ge 1 ]

functions/_pisces_bind_pair.fish

@@ -11,10 +11,10 @@ function _pisces_bind_pair -a mode left right -d "Creates bindings for the given
 
     if [ $left = $right ]
 
-        bind -M $mode $r "_pisces_skip $right; or _pisces_append $right"
+        bind -M $mode $l "_pisces_wrap $left $right"
     else
 
-        bind -M $mode $l "commandline -i -- $left; and _pisces_append $right"
+        bind -M $mode $l "_pisces_wrap $left $right"
         bind -M $mode $r "_pisces_skip $right"
     end
 end

functions/_pisces_skip.fish

@@ -1,5 +1,11 @@
 function _pisces_skip -a text -d "Skips given text if it's already under the cursor"
 
+    # Natural Selection integration:
+    if functions -q _natural_selection_is_selecting; and _natural_selection_is_selecting
+        _natural_selection_replace_selection "$text"
+        return 0
+    end
+
     set length (string length -- $text)
 
     if [ (_pisces_lookup 0 $length) = $text ]

functions/_pisces_wrap.fish

@@ -0,0 +1,19 @@
+function _pisces_wrap -a left right -d "Wraps text with string pairs"
+
+    # Natural Selection integration:
+    if functions -q _natural_selection_is_selecting; and _natural_selection_is_selecting
+        _natural_selection_wrap_selection "$left" "$right"
+        return 0
+    end
+
+    set length (string length -- $left)
+
+    if [ $left = $right ]; and [ (_pisces_lookup -1 $length) = $left ]
+        _pisces_append $right
+        return 1
+    else
+        commandline -i -- $left
+        and _pisces_append $right
+        return 1
+    end
+end