 
 (defcustom twit-show-user-images nil
    "Show user images beside each users tweet."
+   :type 'boolean
+   :group 'twit)
+
+(defcustom twit-fill-tweets nil
+   "Apply `fill-region' to tweets."
    :type 'boolean
    :group 'twit)
 

  displayed, for zebra-tabling."
  (let* ((tweet-id (xml-first-childs-value tweet 'id))
         (retweet (xml-first-child tweet 'retweeted_status))
         (retweeted-by 
          (if retweet
              (or (xml-first-child tweet 'user) (xml-first-child tweet 'sender))))
         (retweeted-by-user-id
          (if retweet 
              (or (xml-first-childs-value retweeted-by 'screen_name) "??")))
         (retweeted-by-user-img
          (if (and retweet twit-show-user-images)
              (twit-get-user-image (xml-first-childs-value retweeted-by 'profile_image_url) 
                                   retweeted-by-user-id)
            nil))

         (tweet 
          (if retweet
              retweet
            tweet))

              (let ((fill-column (- (window-width twit-window) 2)))
                (insert "\t")
                (insert message)
                (when twit-fill-tweets
                  (fill-region (point-min) (point-max)))
                (buffer-substring 2 (point-max))))))
      (twit-insert-with-overlay-attributes (twit-keymap-and-fontify-message message)
                                           '((face . "twit-message-face"))
