emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ftable 8ff305b 02/14: Not use forward-paragraph


From: Stefan Monnier
Subject: [elpa] externals/ftable 8ff305b 02/14: Not use forward-paragraph
Date: Mon, 2 Aug 2021 18:27:30 -0400 (EDT)

branch: externals/ftable
commit 8ff305be0936de0c7ed9e691684aa1ae9be241ff
Author: Yuan Fu <casouri@gmail.com>
Commit: Yuan Fu <casouri@gmail.com>

    Not use forward-paragraph
    
    Sometimes it doesn't work.
    
    * ftable.el (ftable--table-info): Change 'forward-paragraph' to
    'search-forward'.
---
 ftable.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ftable.el b/ftable.el
index df01b4d..6c33b9f 100644
--- a/ftable.el
+++ b/ftable.el
@@ -550,10 +550,10 @@ position of the table, not including any newlines. TABLEP 
is t if
 point is on a table, nil if not. CHARSET is the box drawing
 charset used by the table (if there is a table).
 \(See `ftable-box-charset-alist'.)"
-  (let* ((beg (save-excursion (forward-paragraph -1)
+  (let* ((beg (save-excursion (search-backward "\n\n" nil t)
                               (skip-chars-forward "\n")
                               (point)))
-         (end (save-excursion (forward-paragraph 1)
+         (end (save-excursion (search-forward "\n\n" nil t)
                               (skip-chars-backward "\n")
                               (point)))
          (text (buffer-substring-no-properties



reply via email to

[Prev in Thread] Current Thread [Next in Thread]