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

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

[elpa] externals/csv-mode 797c859 31/34: * packages/csv-mode/csv-mode.el


From: Stefan Monnier
Subject: [elpa] externals/csv-mode 797c859 31/34: * packages/csv-mode/csv-mode.el: Revert part of last change.
Date: Sun, 29 Nov 2020 18:46:18 -0500 (EST)

branch: externals/csv-mode
commit 797c85984dc4a79f01f914caef2eed3ac6971eea
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * 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.
---
 csv-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/csv-mode.el b/csv-mode.el
index 798d8a9..03a995c 100644
--- a/csv-mode.el
+++ b/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]