branch: externals/ftable
commit 8ff305be0936de0c7ed9e691684aa1ae9be241ff
Author: Yuan Fu <caso...@gmail.com>
Commit: Yuan Fu <caso...@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
