[elpa] externals/auctex d82f66c 91/95: ; * style/paracol.el (TeX-arg-paracol-switchcolumn*): Guard point movement.

[Tassilo Horn]

branch: externals/auctex
commit d82f66c4132b7a3560330cf91b5c0bfdf8926715
Author: Arash Esbati <address@hidden>
Commit: Arash Esbati <address@hidden>

    ; * style/paracol.el (TeX-arg-paracol-switchcolumn*): Guard point movement.
---
 style/paracol.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/style/paracol.el b/style/paracol.el
index 6e64a4c..fdab8ba 100644
--- a/style/paracol.el
+++ b/style/paracol.el
@@ -51,9 +51,10 @@
 If OPTIONAL is non-nil, insert the result in square brackets."
   (let ((col (TeX-read-string
              (TeX-argument-prompt optional nil "Column"))))
-    (save-excursion
-      (backward-char 1)
-      (TeX-argument-insert col optional))))
+    (when (and col (not (string= col "")))
+      (save-excursion
+       (backward-char 1)
+       (TeX-argument-insert col optional)))))
 
 (TeX-add-style-hook
  "paracol"