anchor.diff:  (defconstant *TEXT-START* "abstract\":")
   (defconstant *DISAMBIGUATION* "disambiguation")
   (defconstant *PUNCTUATION* (list #\! #\? #\.))
  +(defconstant *WIKIA-SEARCH-STRING* ".wikia.com/wiki/")
  +(defconstant *URL-ENDING-CHARS* (list #\Space
  +				      #\# #\$ #\%
  +				      #\* #\+ #\, #\- #\.
  +				      #\/ #\; #\< #\=
  +				      #\> #\@ #\[ #\\
  +				      #\] #\^ #\` #\{ #\|
  +				      #\} #\~))
   
   (setq drakma:*text-content-types* (cons '("application" . "json") drakma:*text-content-types*))
   
  
positive.code: 	(lambda (err)
  	  (declare (ignore err))
  	  (invoke-restart 'json:substitute-char "?"))))
      (let ((ids (get-new-comment-data (get-all-comments))))
        (loop
  	 for id in ids
  	 do (format t "~a~c" id #\Newline)
  	 finally
  	   (sleep 1)
  	   (grab-comments-continuously)))))
negative.code: 
  (defun handle-if-redirect (summary sub-wikia)
    "If the abstract contains a redirect, that is returned to be the new title value"
    (let ((redirect (search-add *REDIRECT-STRING* summary)))
      (if redirect
  	(summarize sub-wikia (subseq summary redirect))
  	summary)))
  
  (defun get-json (sub-wikia &key title page-id (action 'Details))
  