vim-patch:8.1.0083: "is" and "as" have trouble with quoted punctuation

Problem:    "is" and "as" have trouble with quoted punctuation.
Solution:   Check for punctuation before a quote. (Jason Franklin)
8516071124

src/nvim/search.c

@@ -2211,12 +2211,11 @@ showmatch(
   }
 }
 
-/*
+// Find the start of the next sentence, searching in the direction specified
- * findsent(dir, count) - Find the start of the next sentence in direction
+// by the "dir" argument.  The cursor is positioned on the start of the next
- * "dir" Sentences are supposed to end in ".", "!" or "?" followed by white
+// sentence when found.  If the next sentence is found, return OK.  Return FAIL
- * space or a line break. Also stop at an empty line.
+// otherwise.  See ":h sentence" for the precise definition of a "sentence"
- * Return OK if the next sentence was found.
+// text object.
- */
 int findsent(int dir, long count)
 {
   pos_T pos, tpos;
@@ -2259,25 +2258,25 @@ int findsent(int dir, long count)
       decl(&pos);
     }
 
-    // go back to the previous non-blank char
+    // go back to the previous non-white non-punctuation character
     found_dot = false;
-    while ((c = gchar_pos(&pos)) == ' ' || c == '\t'
+    while (c = gchar_pos(&pos), ascii_iswhite(c)
-           || (dir == BACKWARD
+           || vim_strchr((char_u *)".!?)]\"'", c) != NULL) {
-               && vim_strchr((char_u *)".!?)]\"'", c) != NULL)) {
+      tpos = pos;
+      if (decl(&tpos) == -1 || (LINEEMPTY(tpos.lnum) && dir == FORWARD)) {
+        break;
+      }
+      if (found_dot) {
+        break;
+      }
       if (vim_strchr((char_u *) ".!?", c) != NULL) {
-        /* Only skip over a '.', '!' and '?' once. */
+        found_dot = true;
-        if (found_dot)
-          break;
-        found_dot = TRUE;
       }
-      if (decl(&pos) == -1) {
+      if (vim_strchr((char_u *) ")]\"'", c) != NULL
+          && vim_strchr((char_u *) ".!?)]\"'", gchar_pos(&tpos)) == NULL) {
         break;
       }
-      // when going forward: Stop in front of empty line
+      decl(&pos);
-      if (LINEEMPTY(pos.lnum) && dir == FORWARD) {
-        incl(&pos);
-        goto found;
-      }
     }
 
     /* remember the line where the search started */

src/nvim/testdir/test_textobjects.vim

@@ -182,3 +182,78 @@ x
   norm it
   q!
 endfunc
+
+func Test_sentence()
+  enew!
+  call setline(1, 'A sentence.  A sentence?  A sentence!')
+
+  normal yis
+  call assert_equal('A sentence.', @")
+  normal yas
+  call assert_equal('A sentence.  ', @")
+
+  normal )
+
+  normal yis
+  call assert_equal('A sentence?', @")
+  normal yas
+  call assert_equal('A sentence?  ', @")
+
+  normal )
+
+  normal yis
+  call assert_equal('A sentence!', @")
+  normal yas
+  call assert_equal('  A sentence!', @")
+
+  normal 0
+  normal 2yis
+  call assert_equal('A sentence.  ', @")
+  normal 3yis
+  call assert_equal('A sentence.  A sentence?', @")
+  normal 2yas
+  call assert_equal('A sentence.  A sentence?  ', @")
+
+  %delete _
+endfunc
+
+func Test_sentence_with_quotes()
+  enew!
+  call setline(1, 'A "sentence."  A sentence.')
+
+  normal yis
+  call assert_equal('A "sentence."', @")
+  normal yas
+  call assert_equal('A "sentence."  ', @")
+
+  normal )
+
+  normal yis
+  call assert_equal('A sentence.', @")
+  normal yas
+  call assert_equal('  A sentence.', @")
+
+  %delete _
+endfunc
+
+func! Test_sentence_with_cursor_on_delimiter()
+  enew!
+  call setline(1, "A '([sentence.])'  A sentence.")
+
+  normal! 15|yis
+  call assert_equal("A '([sentence.])'", @")
+  normal! 15|yas
+  call assert_equal("A '([sentence.])'  ", @")
+
+  normal! 16|yis
+  call assert_equal("A '([sentence.])'", @")
+  normal! 16|yas
+  call assert_equal("A '([sentence.])'  ", @")
+
+  normal! 17|yis
+  call assert_equal("A '([sentence.])'", @")
+  normal! 17|yas
+  call assert_equal("A '([sentence.])'  ", @")
+
+  %delete _
+endfunc