diff urllog.tcl @ 424:825cac46b1cb

Cosmetic / stray trailing whitespace cleanup.
author Matti Hamalainen <ccr@tnsp.org>
date Sun, 08 Jan 2017 03:55:55 +0200
parents 880a07485275
children e5810c52d376
line wrap: on
line diff
--- a/urllog.tcl	Sun Jan 08 03:52:40 2017 +0200
+++ b/urllog.tcl	Sun Jan 08 03:55:55 2017 +0200
@@ -39,7 +39,7 @@
 set urllog_version "2.4.2"
 
 set urllog_tld_list [split $urllog_tld_list ","]
-set urllog_httprep [split "\@|%40|{|%7B|}|%7D|\[|%5B|\]|%5D" "|"] 
+set urllog_httprep [split "\@|%40|{|%7B|}|%7D|\[|%5B|\]|%5D" "|"]
 
 
 ### Require packages
@@ -120,7 +120,7 @@
   if {$apublic == 1} {
     putserv "$urllog_preferredmsg $achan :$amsg"
   } else {
-    putserv "$urllog_preferredmsg $anick :$amsg" 
+    putserv "$urllog_preferredmsg $anick :$amsg"
   }
 }
 
@@ -190,7 +190,7 @@
     } else {
       set qstr "$urlmsg_alreadyknown $qstr"
     }
-    
+
     if {[utl_match_delim_list $urllog_msg_channels $uchan]} {
       urllog_verb_msg $urlNick $urlChan $qstr
     }
@@ -373,7 +373,7 @@
   if {![urllog_exists $urlStr $urlNick $urlHost $urlChan]} {
     return 1
   }
-  
+
   ### Validate URL compoments, etc.
   set urlProto ""
   set urlHostName ""
@@ -471,7 +471,7 @@
     if {$uencoding == "" && $uenc_doc2 != ""} {
       set uencoding $uenc_doc2
     } elseif {$uencoding == ""} {
-      # If _NO_ known encoding of any kind, assume the default of iso8859-1    
+      # If _NO_ known encoding of any kind, assume the default of iso8859-1
       set uencoding "iso8859-1"
     }
 
@@ -610,7 +610,7 @@
     }
     urllog_msg $upublic $unick $uchan "#$iresults: $shortURL ($uuser@[utl_ctime $utime])"
   }
-  
+
   if {$iresults == 0} {
     # If no URLs were found
     urllog_msg $upublic $unick $uchan $urlmsg_nomatch