anchor.diff:  (define-rule package-link (and ":(package" (+ (or #\Tab #\Space #\Newline #\Return)) "\"" (+ (and (! #\") character)) "\")")
     (:destructure (start w1 quote link end)
       (declare (ignore start w1 quote end))
  -    (cons :package-link (concat link))))
  +    (cons :package-link (text link))))
   
  -(defmethod 3bmd:print-tagged-element ((tag (eql :package-link)) stream link)
  +(defmethod 3bmd-ext:print-tagged-element ((tag (eql :package-link)) stream link)
     (write-string (cliki2.view:package-link (list :href link))
                   stream))
   
   ;;;; cliki2 markup extensions
   
  -(define-rule 3bmd-grammar:inline-extensions
  -    (or article-link
  -        person-link
  -        hyperspec-link
  -        category-link
  -        code-block
  -        category-list
  -        package-link))
  +(with-cliki2-rules
  +  (3bmd-ext:define-extension-inline *enable-cliki-grammar*  inline-extensions
  +      (or article-link
  +          person-link
  +          hyperspec-link
  +          category-link
  +          code-block
  +          category-list
  +          package-link)
  +    (:before string)))
  +
  +;; (define-rule 3bmd-grammar:inline-extensions
  +;;     (or article-link
  +;;         person-link
  +;;         hyperspec-link
  +;;         category-link
  +;;         code-block
  +;;         category-list
  +;;         package-link))
  
positive.code:   (sanitize:with-clean-fragment (fragment
                                   (with-output-to-string (s)
                                     (let ((3bmd::*references* (make-hash-table)))
                                       (3bmd::print-element (parse '3bmd-grammar::block  
                                                                   (cliki2::article-content-head article)
                                                                   :junk-allowed t)
                                                            s)))
  
negative.code:                          (finish))
                  (t (write-string text out))))))))
  
  (defmethod 3bmd-ext:print-tagged-element ((tag (eql :cliki2-category-list)) stream category)
    (write-string (cliki2.view:category-content
                   (list :items
                         (iter (for article in (sort (copy-list (cliki2::articles-with-category category))
  