diff --git a/lib/abnf/example.lisp b/lib/abnf/example.lisp
index c591388..0892023 100644
--- a/lib/abnf/example.lisp
+++ b/lib/abnf/example.lisp
@@ -25,9 +25,9 @@
       NILVALUE        = \"-\" "
   "A timestamp ABNF grammar.")
 
-(let ((scanner (abnf:parse-abnf-grammar *timestamp-abnf*
-					:timestamp
-					:registering-rules '(:full-date))))
+(let ((scanner (parse-abnf-grammar *timestamp-abnf*
+				   :timestamp
+				   :registering-rules '(:full-date))))
   (register-groups-bind (date)
       (scanner "2013-09-08T00:02:03.123456Z+02:00")
     date))