anchor.diff:  
   (require 'cl-ppcre)
   (require 'drakma)
  +(require 'cl-who)
   
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   ;; Configuration
  
positive.code:   "Return a string representing the current rfc 822 time"
    (multiple-value-bind (seconds minutes hours day month year day-of-the-week 
  				 daylight-savings-time-flag time-zone)
  			(get-decoded-time)  
      (declare (ignore day-of-the-week daylight-savings-time-flag time-zone))
      (format nil "~a ~a ~a ~2,'0d:~2,'0d:~2,'0d GMT" 
  	    day
  
negative.code: 
  (defun format-tags (tag-list)
    "Format the tags into a comma-separated list"
    (format nil "<i>~{~a~^, ~}</i>" 
  	  (map 'list 
  	       #'cl-who:escape-string  
  	       tag-list)))
  
  #|
  which had the " . tag_or_tags ($flickr_photo_tags) .  " " . 
  