anchor.diff:  (defmethod initialize-instance :after ((bot microblog-bot) &key)
     "Set up the bot's state"
     (assert (source-url bot))
  -  (with-microblog-user bot    
  -    (setf (last-handled-reply bot)
  -	  (last-handled-reply-id bot)))
  +  (handler-case 
  +      (with-microblog-user bot    
  +	(setf (last-handled-reply bot)
  +	      (last-handled-reply-id bot)))
  +    (condition (the-condition) 
  +      (format t "Error for ~a ~%" (user-nickname bot))
  +      (invoke-debugger the-condition)))
     (debug-msg "Initialized bot ~a most-recent-reply ~a" 
   	     bot (last-handled-reply bot)))
   
  
positive.code:       (sort (cl-twit:m-replies :since-id 
  			       (last-handled-reply bot))
  	    #'string< :key #'cl-twit::id)
      (error (err) 
        (report-error "new-replies ~a - ~a~%" bot err)
        nil)))
  
  (defun source-request-p (reply)
  
negative.code: ;; microblog-bot.lisp - Basic bot for microblogging (Twitter, Laconica).
  ;; Copyright (C) 2009, 2010  Rob Myers rob@robmyers.org
  ;;
  ;; This program is free software: you can redistribute it and/or modify
  ;; it under the terms of the GNU Affero General Public License as
  