1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/emacs-lisp/elint.el b/lisp/emacs-lisp/elint.el
index d68e49fa4b2..f5e10a24d37 100644
--- a/lisp/emacs-lisp/elint.el
+++ b/lisp/emacs-lisp/elint.el
@@ -372,7 +372,7 @@ Returns the forms."
         (let ((elint-current-pos (point)))
           ;; non-list check could be here too. errors may be out of seq.
           ;; quoted check cannot be elsewhere, since quotes skipped.
-          (if (looking-back "'" (1- (point)))
+          (if (= (preceding-char) ?\')
               ;; Eg cust-print.el uses ' as a comment syntax.
               (elint-warning "Skipping quoted form `%c%.20s...'" ?\'
                            (read (current-buffer)))