--- tkabber.orig/plugins/chat/logger.tcl	2006-09-13 18:01:29.000000000 +0400
+++ tkabber/plugins/chat/logger.tcl	2006-09-15 19:24:02.000000000 +0400
@@ -251,7 +251,18 @@
 	    set servertag server
 	}
 	if {[info exists tmp(body)]} {
-	    $l insert end " $tmp(body)" $servertag
+		set words [textutil::splitx $tmp(body) {([\t \r \n]+)}]
+		$l insert end " " $servertag
+		foreach word $words {
+			if {[regexp -expanded -nocase -- $::chat::url_regexp $word \
+			ignore head url ignore2 tail]} {
+				$l insert end $head $servertag
+				::chat::add_url $l $url $url
+				$l insert end $tail $servertag
+			} else {
+	    			$l insert end "$word" $servertag
+			}
+		}
 	}
 	if {![$l compare "end -1 chars linestart" == "end -1 chars"]} {
 	    $l insert end "\n"