Correct arguments to `skip-syntax-forward'

* lisp/wid-edit.el (widget-sexp-validate): Fix bad calls to
`skip-syntax-forward', whose argument is not a regexp.

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 1ddc461f4e82222641914ad0ba28a8ce5be91753..fdc16299c88203ceb4e045549c3f31b12aef00b0 100644 (file)
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -3333,13 +3333,13 @@ It reads a directory name from an editable text field."
       (condition-case data ;Note: We get a spurious byte-compile warning here.
          (progn
            ;; Avoid a confusing end-of-file error.
-           (skip-syntax-forward "\\s-")
+           (skip-syntax-forward "-")
            (if (eobp)
                (setq err "Empty sexp -- use nil?")
              (unless (widget-apply widget :match (read (current-buffer)))
                (setq err (widget-get widget :type-error))))
            ;; Allow whitespace after expression.
-           (skip-syntax-forward "\\s-")
+           (skip-syntax-forward "-")
            (if (and (not (eobp))
                     (not err))
                (setq err (format "Junk at end of expression: %s"