 
 (defvar twit-first-time-through nil)
 
+(defvar twit-window nil
+  "Window object to get window-width.")
 
 ;;* const url
 (defconst twit-base-search-url "http://search.twitter.com")

;;          - twitter diarrhea filtering function. (JA)
;;          - started work on i18n support.  (unfinished) (JA)
;; - 0.3.6  - Added twit-open-link, and bound it to "o". (BC)

;;; TODO:
;; - remember style buffer posting.

		  (insert-image user-img)
		  (insert " "))

	(if (string-equal "true" favorite)
		(twit-insert-with-overlay-attributes "*" '((face . "twit-favorite-face")))
		(insert " "))
		  
	(twit-insert-with-overlay-attributes (concat user-id
												 (if user-name
													 (concat " (" user-name ")")
													 ""))
										 `((face . "twit-author-face")))
	(insert "\n\t")
	(let* ((message
			(with-temp-buffer
			  (let ((fill-column (- (window-width twit-window) 2)))
				(insert "\t")
				(insert message)
				(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"))
										   " "))

	(insert "\n")
	(when (or timestamp location src-info)
