Use looking-at rather than looking-at-p as this is more standard

diff --git a/lisp/eweouz.el b/lisp/eweouz.el
index a61c6f085caff15f1fa075c7075981bab23bae65..492a29ecf304d302c27b87fd630a7eb5db3bdb1e 100644 (file)
--- a/lisp/eweouz.el
+++ b/lisp/eweouz.el
@@ -40,7 +40,7 @@
     (set-text-properties (point-min) (point-max) nil nil)
     (goto-char (point-min))
     (message (format "%s" (point)))
-    (while (looking-at-p "\n*BEGIN:VCARD")
+    (while (looking-at "\n*BEGIN:VCARD")
       (let ((m-start (point)))
        (message (format "%s" (point)))
        (search-forward-regexp "^END:VCARD")