--- a/urllog.tcl	Mon Sep 05 19:20:43 2011 +0300
+++ b/urllog.tcl	Mon Sep 05 19:51:46 2011 +0300
@@ -540,6 +540,7 @@
 	urllog_log "$unick/$uhand searched URL: $utext"
 
 	set ftokens [split $utext " "]
+	set fpatlist ""
 	foreach ftoken $ftokens {
 		set fprefix [string range $ftoken 0 0]
 		set fpattern [string range $ftoken 1 end]
@@ -555,8 +556,13 @@
 		}
 	}
 
+  if {[llength $fpatlist] > 0} {
+    set fquery "WHERE [join $fpatlist " AND "]"
+  } else {
+    set fquery ""
+  }
 	set iresults 0
-	set query "SELECT id AS urlID, utime AS utime, url AS uurl, user AS uuser, host AS uhost FROM urls WHERE [join $fpatlist " AND "] ORDER BY utime DESC LIMIT $ulimit"
+	set query "SELECT id AS urlID, utime AS utime, url AS uurl, user AS uuser, host AS uhost FROM urls $fquery ORDER BY utime DESC LIMIT $ulimit"
 	urldb eval $query {
 		incr iresults
 		set shortURL $uurl