]> code.delx.au - gnu-emacs/blobdiff - lisp/emacs-lisp/rx.el
Prefer directed to neutral quotes
[gnu-emacs] / lisp / emacs-lisp / rx.el
index 0129d930ca1ce73ffa3c6d85fb138b9033dd5df9..7b0de6edb69c7b29e9ab07553409332487d18e00 100644 (file)
@@ -815,9 +815,9 @@ of all atomic regexps."
 
 (defun rx-greedy (form)
   "Parse and produce code from FORM.
-If FORM is '(minimal-match FORM1)', non-greedy versions of `*',
+If FORM is `(minimal-match FORM1)', non-greedy versions of `*',
 `+', and `?' operators will be used in FORM1.  If FORM is
-'(maximal-match FORM1)', greedy operators will be used."
+`(maximal-match FORM1)', greedy operators will be used."
   (rx-check form)
   (let ((rx-greedy-flag (eq (car form) 'maximal-match)))
     (rx-form (cadr form) rx-parent)))