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

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

[elpa] master a704deb: * packages/csv-mode/csv-mode.el: Revert part of l


From: Stefan Monnier
Subject: [elpa] master a704deb: * packages/csv-mode/csv-mode.el: Revert part of last change.
Date: Sat, 15 Feb 2020 10:03:52 -0500 (EST)

branch: master
commit a704debf6f79f557595671f198643f725db0bcc8
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>

    * packages/csv-mode/csv-mode.el: Revert part of last change.
    (csv-end-of-field, csv-beginning-of-field): Don't use csv-field-quotes.
    I was confused.
---
 packages/csv-mode/csv-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/packages/csv-mode/csv-mode.el b/packages/csv-mode/csv-mode.el
index 798d8a9..03a995c 100644
--- a/packages/csv-mode/csv-mode.el
+++ b/packages/csv-mode/csv-mode.el
@@ -662,14 +662,14 @@ point or marker arguments, BEG and END, delimiting the 
region."
 (defun csv-end-of-field ()
   "Skip forward over one field."
   (skip-chars-forward " ")
-  (if (memq (char-syntax (following-char)) csv-field-quotes)
+  (if (eq (char-syntax (following-char)) ?\")
       (goto-char (scan-sexps (point) 1)))
   (skip-chars-forward csv--skip-chars))
 
 (defun csv-beginning-of-field ()
   "Skip backward over one field."
   (skip-syntax-backward " ")
-  (if (memq (char-syntax (preceding-char)) csv-field-quotes)
+  (if (eq (char-syntax (preceding-char)) ?\")
       (goto-char (scan-sexps (point) -1)))
   (skip-chars-backward csv--skip-chars))
 



reply via email to

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