Fix whitespace issues

GuardChan/guardchan.tcl

@@ -1,7 +1,7 @@
 # GuardChan by JamesOff
 # Kickbans people if they're not in the bot's userfile
 # No other filtering options, sorry
-# 
+#
 # Released under the BSD licence
 # http://jamesoff.net/site/projects/eggdrop-scripts/guardchan
 
@@ -54,4 +54,3 @@ proc guardchan_join { nick host handle channel } {
     }
   }
 }
-

HostClean/README.md

@@ -14,4 +14,3 @@ $( for f in "#channel.*.log"; do python parse.py "$f"; done ) | sort | uniq > ho
 Then load the TCL script into your bot, and run `.hostload <path to file you made above>`, and then do `.hostclean <handle>` for each user.
 
 The script outputs a bunch of `.-host` lines on the partyline, which you should double check, and then you can copy/paste them back into the partyline to execute them.
-

HostClean/parse.py

@@ -29,4 +29,3 @@ def main():
 
 if __name__ == "__main__":
     main()
-

ProxyCheck/proxycheck.tcl

@@ -27,9 +27,9 @@
 ###############################################################################
 
 # space-separated list of RBLs to look in
-set proxycheck_rbls { 
-  "cbl.abuseat.org" 
-  "opm.blitzed.org" 
+set proxycheck_rbls {
+  "cbl.abuseat.org"
+  "opm.blitzed.org"
 }
 
 # time in minutes to ban for

QuoteEngine/QuoteEngine-settings.sample.tcl

@@ -1,6 +1,6 @@
 # Settings file for QuoteEngine
 #
-# Edit this file and save it as QuoteEngine-settings.tcl in 
+# Edit this file and save it as QuoteEngine-settings.tcl in
 # your eggdrop's scripts/ directory
 
 # The mysql hostname to connect to

QuoteEngine/QuoteEngine.tcl

@@ -46,7 +46,7 @@ setudef flag quoteengine
 # connect to database
 proc quote_connect { } {
 	global db_handle quote_db
-		
+
 	set db_handle [mysqlconnect -host $quote_db(host) -user $quote_db(user) -password $quote_db(password) -db $quote_db(database)]
 
 	if {$db_handle != ""} {
@@ -204,7 +204,7 @@ proc quote_fetch { nick host handle channel text } {
 		return 0
 	}
 
-	
+
 	set text [mysqlescape $quote_id]
   set sql "SELECT * FROM quotes WHERE id='$text'"
   putloglev d * "QuoteEngine: executing $sql"
@@ -580,7 +580,7 @@ proc quote_auto { nick host handle channel text } {
 		return
 	}
 
-	
+
 	set where_clause "WHERE channel='[mysqlescape $channel]' AND quote LIKE '%$thisword%' ORDER BY RAND() LIMIT 1"
 	putloglev d * "quoteengine: $where_clause"
 	set sql "SELECT * FROM quotes $where_clause"

QuoteEngine/README.md

@@ -41,7 +41,7 @@ Database setup, first steps
 <br>
 
 1. Create admin user for mysql if you don't have it yet.
-   
+
    // In case you have an admin user for your mysql server other than the "root" user, you can skip this. //
 
    With root user enter the following command in your shell:
@@ -49,19 +49,19 @@ Database setup, first steps
    ```# mysql -u root```
       <br>
       This will let you to login to mysql, so you can make changes on/in it.
- 
+
    Create a new admin user (so you can login to phpmyadmin later on):
    <br>
    ```mysql> CREATE USER '<user>'@'%' IDENTIFIED BY '<pwhere>';```
       <br>
       This will create the <user> with the given password.
-      
+
    Grant all right to the user:
    <br>
    ```mysql> GRANT ALL PRIVILEGES ON *.* TO '<user>'@'%' WITH GRANT OPTION;```
       <br>
       This command allows you to login from any host/ip and gives you unlimited control over all databases.
-   
+
    Check if you did everything well, so the user exists:
    <br>
    ```mysql> SHOW GRANTS FOR '<user>'@'%';```
@@ -69,30 +69,30 @@ Database setup, first steps
    ```mysql> exit```
    <br>
       This will exit you out from the mysql console.
-   
+
 2. Create a user and database in your mysql server for the bot to use.
-   
+
    You have two options now:
    <br>
    <br>
    a, Use phpmyadmin, where you can log in with the user which you created in point one and there
       create a new database and a new user, then grant that user rights over the database ..
-   
+
    OR
-   
+
    b, Use the following commands:
-   
+
    With your shell user, login to mysql with the previously created user:
    <br>
    ```$ mysql -u <user> -p```
    <br>
       Here you will need to enter the password which you have given previous (`<pwhere>`).
    <br>
-   
+
    ```mysql> CREATE DATABASE quotesdb;```
    <br>
       This will create a database, named "quotesdb".
-   
+
    Now we need to create an other user for the bot.
    <br>
    ```mysql> CREATE USER '<botnick>'@'localhost' IDENTIFIED BY '<botpwhere>';```
@@ -102,15 +102,15 @@ Database setup, first steps
       to connect to mysql and make changes in database named "quotesdb".
       <br>
       For that, we need to set rights.
-      
+
    ```mysql> GRANT SELECT, INSERT, UPDATE, DELETE ON quotesdb.* TO '<botnick>'@'localhost';```
    <br>
       This will grant all right on db "quotesdb" to "botnick" user, connecting from localhost.
-    
-    
+
+
    Now we are ready to move on to the next step. :)
-   
-   
+
+
 2. Now, you have to create the tables into the database which you made.
    <br>
    For this, you can download the pre-made script - you can find it in the sql folder, named "quotes.sql".
@@ -140,7 +140,7 @@ Setting up the tcl script, edit the config(s)
    <br>
       `"QuoteEngine 1.3 loaded"`
     <br>
-   In case you cannot see it, you did something wrong. Check again the guide. :) 
+   In case you cannot see it, you did something wrong. Check again the guide. :)
 
 
 Usage

QuoteEngine/www/index.php

@@ -40,7 +40,7 @@
 		$page = $_GET['page'];
 	}
 
-	
+
 	if (empty($channel)) {
 	  $channel = DEFAULT_CHAN;
   }
@@ -102,7 +102,7 @@ Filter for: <input type="text" name="filter" maxlength="32" size="32"> <input ty
   while ($chan = mysql_fetch_object($result)) {
           $chanlink = preg_replace("/#(.+)/", "\\1", $chan->channel);
           echo "<a href=\"" . $_SERVER['PHP_SELF']. "?channel=$chanlink\">$chan->channel</a> :: ";
-  } 
+  }
 ?>
 		<a href="<?php echo $SERVER['PHP_SELF']; ?>?channel=__all">(All channels)</a> ::
 </center>
@@ -192,7 +192,7 @@ Sorted with most recent first.
           $q = preg_replace('/^\[?[0-9:.]+\]?/', '', $q);
 
           //$q = preg_replace('/^((&lt;|\\[|\\()*.*?)( )(.*?(&gt;|\\]|\\))+:?)/', "\\1&nbsp;\\4", $q);
-          
+
           //hilight nicks
           if (!preg_match("/^\* /", $q)) {
             if (preg_match('/^((&lt;|\\[|\\()*[@%+]?([^\]>\\\)]+?)[@%+]?(&gt;|\\]|\\))+:?)/', $q, $matches)) {
@@ -219,7 +219,7 @@ Sorted with most recent first.
           //$newquote .= preg_replace('/ /', "&nbsp;", $q);
           $newquote .= $q;
           $newquote .= "<br>";
-        }      
+        }
         $quote_text = preg_replace('/ \| /', "<br>", $quote_text);
         echo "<td class=\"quote\">" . $newquote . "</td>";
         echo "</tr>";
@@ -229,7 +229,7 @@ Sorted with most recent first.
         echo $quote->quote . "\n";
       }
     }
-		
+
     if (!$remote) {
       echo "</table>";
       echo "$count results<br>";
@@ -273,7 +273,7 @@ Sorted with most recent first.
     }
 	}
 	else echo "oops: no results<br>" . mysql_error();
-  
+
   if ($remote) {
     exit;
   }
@@ -300,7 +300,7 @@ Sorted with most recent first.
           $q = preg_replace('/^\[?[0-9:.]+\]?/', '', $q);
 
           //$q = preg_replace('/^((&lt;|\\[|\\()*.*?)( )(.*?(&gt;|\\]|\\))+:?)/', "\\1&nbsp;\\4", $q);
-          
+
           //hilight nicks
           if (!preg_match("/^\* /", $q)) {
             $q = preg_replace('/^((&lt;|\\[|\\()*[^\]>\\\)]+?(&gt;|\\]|\\))+:?)/', "<b>\\1</b>", $q);
@@ -310,7 +310,7 @@ Sorted with most recent first.
           }
           $newquote .= $q;
           $newquote .= "<br>";
-        }      
+        }
 				?>
 					<?=$newquote?><br><br>
 					<div class="meta">

QuoteEngine/www/settings.example.inc

@@ -21,7 +21,7 @@
 	// The stylesheet to use
 	// styles.css or ocean.css
 	// Or your own, if you're super-clever
-	define("QUOTES_CSS", "styles.css"); 
+	define("QUOTES_CSS", "styles.css");
 
 	// Change 'false' to 'true' below!
 	define("SETTINGS_EDITED", false);

TopicEngine/TopicEngine.tcl

@@ -18,7 +18,7 @@
 #      Credit to : Dan Durrans, for coming up with the idea and feature list
 #                  #exeter and #ags people for testing it
 #
-# 
+#
 
 ###############################################################################
 # TopicEngine - a topic management TCL script for eggdrops
@@ -26,16 +26,16 @@
 #
 # This program is free software; you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2 of the License, or 
+# the Free Software Foundation; either version 2 of the License, or
 # (at your option) any later version.
 #
-# This program is distributed in the hope that it will be useful, but 
-# WITHOUT ANY WARRANTY; without even the implied warranty of 
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 
+# This program is distributed in the hope that it will be useful, but
+# WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
 # General Public License for more details.
 #
-# You should have received a copy of the GNU General Public License 
-# along with this program; if not, write to the Free Software 
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
 ###############################################################################
 
@@ -126,14 +126,14 @@ proc topicInitArray { {loaded 0} } {
       #set topicInfo($chan,needVGlobal) 0
       #set topicInfo($chan,needOMode) 1
       #set topicInfo($chan,needVMode) 0
-      #set topicInfo($chan,Tflag) 1 
+      #set topicInfo($chan,Tflag) 1
       set topicInfo($chan,canFlags) "o|ov"
       set topicInfo($chan,canModes) "ov"
       set topicInfo($chan,cantFlags) "T"
       set topicInfo($chan,topicBits) [list]
       set topicInfo($chan,learnOnChange) 1
       set topicInfo($chan,initialised) "1"
-      
+
       #DO NOT CHANGE THESE
       set topicInfo($chan,topic) ""
       set topicInfo($chan,whoSet) [list]
@@ -145,9 +145,9 @@ proc topicInitArray { {loaded 0} } {
       if {$loaded == 0} {
         #sync the topics if we're online
         catch {
-          if {[lsearch $onChannels $chan] >= 0} { 
+          if {[lsearch $onChannels $chan] >= 0} {
             #putlog "Updating topic in $chan"
-            setTopic $chan 
+            setTopic $chan
           }
           set blah 0
         } err
@@ -160,14 +160,14 @@ proc topicInitArray { {loaded 0} } {
           #set topicInfo($chan,needVGlobal) 0
           #set topicInfo($chan,needOMode) 1
           #set topicInfo($chan,needVMode) 0
-          #set topicInfo($chan,Tflag) 1 
+          #set topicInfo($chan,Tflag) 1
           set topicInfo($chan,canFlags) "o|ov"
           set topicInfo($chan,canModes) "ov"
           set topicInfo($chan,cantFlags) "T"
           set topicInfo($chan,topicBits) [list]
           set topicInfo($chan,learnOnChange) 1
           set topicInfo($chan,initialised) "1"
-          
+
           #DO NOT CHANGE THESE
           set topicInfo($chan,topic) ""
           set topicInfo($chan,whoSet) [list]
@@ -191,7 +191,7 @@ proc topicInitArray { {loaded 0} } {
         #load a bot-specific file
         source "${topicConfigPath}/TopicEngineSettings_${botnet-nick}.tcl"
       }
-    }    
+    }
   }
 }
 
@@ -199,7 +199,7 @@ proc topicInitArray { {loaded 0} } {
 
 #####
 # checkTopic
-# 
+#
 # Tries out a new topic (=current topic | newbit)
 # returns 0 if it'll fit in the network topic length limit
 # else returns the number of characters over the limit
@@ -217,7 +217,7 @@ proc checkTopic {channel newbit {noOldTopic 0}} {
   }
 
   if {$newbit != ""} { lappend thisTopic $newbit }
-  
+
   if {$topicInfo($channel,leadIn) != ""} {
     set thisTopic [linsert $thisTopic 0 $topicInfo($channel,leadIn)]
   }
@@ -279,8 +279,8 @@ proc setTopic {channel {force 0}} {
     return 0
   }
 
-  set thisTopic $topicInfo($channel,topicBits)  
-  
+  set thisTopic $topicInfo($channel,topicBits)
+
   ##leadin and leadout
   if {$topicInfo($channel,leadIn) != ""} {
     putloglev 1 * "topicengine: adding prefix"
@@ -319,11 +319,11 @@ proc setTopic {channel {force 0}} {
 
   set topicInfo($channel,topic) $topicString
   if {([topic $channel] == $topicString) && ($force == 0)} { return 0 }
-  if {$force == -1} { 
+  if {$force == -1} {
     #just update the topic cache
-    return 0 
+    return 0
   }
-  
+
   putserv "TOPIC $channel :$topicString"
   set bufferDirty 0
   return 0
@@ -339,7 +339,7 @@ proc setTopic {channel {force 0}} {
 #
 proc topicChanged {nick host handle channel text} {
   global topicInfo topicChannels
-  
+
   #check the topic script is active in here
   if {![channel get $channel topicengine]} {
     return 0
@@ -362,8 +362,8 @@ proc topicChanged {nick host handle channel text} {
 
   #if it's a bot setting the topic, ignore it
   if [matchattr $handle b] { return 0 }
-  
-  if {[lindex $topicInfo($channel,lock) 0] == 0} { 
+
+  if {[lindex $topicInfo($channel,lock) 0] == 0} {
     #learn it?
     if {$topicInfo($channel,learnOnChange) == 1} {
       putlog "Topic in $channel changed, learning it"
@@ -371,7 +371,7 @@ proc topicChanged {nick host handle channel text} {
       backupTopic $channel
       topicParse $channel $text $nick
     }
-    return 0 
+    return 0
   }
 
   #it's locked, put it back and notify
@@ -410,7 +410,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
   set text [string trim $text]
 
   incr loops
-  if {$loops > 5} { 
+  if {$loops > 5} {
     set loops 0
     putlog "TopicEngine internal error: recursive looping. Aborting processing of this command."
     return 0
@@ -418,12 +418,12 @@ proc topicCommand {nick host handle channel text {silent 0} } {
 
   #this is because the array isn't initialised when the bot first starts
   topicInitArray 1
-  
+
   #these commands can be used by anyone
 ################# INFO
   if [regexp -nocase "^info ?(.+)?" $text boom param] {
     set loops 0
-    if {$param == ""} { 
+    if {$param == ""} {
       set updateTime [clock format $topicInfo($channel,whenLastSet)]
       if {[lindex $topicInfo($channel,lock) 0] != 0} {
         set whoLocked [lindex $topicInfo($channel,lock) 1]
@@ -527,7 +527,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
 
   #these commands need permissions
   set canTopic 0
-  
+
   #first we need to check global O and V
   #if {($topicInfo($channel,needOGlobal) == 1) && [matchattr $handle o]} { set canTopic 1 }
   #if {($topicInfo($channel,needVGlobal) == 1) && [matchattr $handle v]} { set canTopic 1 }
@@ -548,7 +548,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
   #if {($topicInfo($channel,Tflag) == 1) && [matchattr $handle -|T $channel]} { set canTopic 1 }
 
   #New system: using channel settings
-  
+
   # First we check canFlags, if the user has these eggdrop flags we'll allow use
   if [matchattr $handle $topicInfo($channel,canFlags) $channel] {
     putloglev d * "topicEngine: user $handle matches flags"
@@ -606,7 +606,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
       set bufferDirty 1
       set doBuffer 1
     }
-    
+
     global backupInfo
 
     if {$backupInfo($channel,topicBits) == ""} {
@@ -628,7 +628,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
     } else {
       setTopic $channel -1
     }
-  
+
     return 1
   }
 
@@ -655,7 +655,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
     #remove extra spaces
     set params [string trim $params]
     regsub -all "  +" $params " " params
-   
+
     #check length
     set tooMany [checkTopic $channel $params]
     if {$tooMany} {
@@ -701,7 +701,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
     #remove extra spaces
     set params [string trim $params]
     regsub -all "  +" $params " " params
-   
+
     #check length
     set tooMany [checkTopic $channel $params]
     set originalTopicBits $topicInfo($channel,topicBits)
@@ -721,7 +721,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
         set topicInfo($channel,topicWhen) $originalTopicWhen
         return 2
       }
-      
+
       set tooMany [checkTopic $channel $params]
       incr count
       if {$count == 100} {
@@ -768,7 +768,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
     #remove extra spaces
     set params [string trim $params]
     regsub -all "  +" $params " " params
-   
+
     #check length
     set tooMany [checkTopic $channel $params]
     set originalTopicBits $topicInfo($channel,topicBits)
@@ -789,7 +789,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
         set topicInfo($channel,topicWhen) $originalTopicWhen
         return 2
       }
-      
+
       set tooMany [checkTopic $channel $params]
       incr count
       if {$count == 100} {
@@ -831,7 +831,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
           topicNotice "Sorry, adding that to the topic would make it go over the length limit by $tooMany characters. Please try a shorter topic."
           return 1
         }
-        set topicInfo($channel,leadIn) $what      
+        set topicInfo($channel,leadIn) $what
         setTopic $channel
         return 1
       }
@@ -849,7 +849,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
     }
 
     #else set the topic as is
-    if {$cmdString == "none"} { 
+    if {$cmdString == "none"} {
       set cmdString ""
     }
 
@@ -876,7 +876,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
     #remove extra spaces
     set cmdString [string trim $cmdString]
     regsub -all "  +" $cmdString " " cmdString
-    
+
     backupTopic $channel
 
     set topicInfo($channel,whoSet) [list $nick]
@@ -1156,7 +1156,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
     return 1
   }
 
-  
+
   ##If we got here, they used the command wrong
   # assume they meant set, and tell them how to get help
 
@@ -1167,7 +1167,7 @@ proc topicCommand {nick host handle channel text {silent 0} } {
     topicNotice "\[FYI\] For help on the !topic commands, please do \002/msg $botnick topic help\002."
     return 1
   }
-    
+
   #topicCommand $nick $host $handle $channel "set $text"
 
   global botnick
@@ -1315,7 +1315,7 @@ proc topicHelp {nick host handle arg} {
 #
 proc topicUnsplit {nick host handle channel} {
   global topicInfo topicChannels topicLastSplit topicSplitChans topicSplitDirty
-  
+
   #check the topic script is active in here
   if {![channel get $channel topicengine]} {
     return 0
@@ -1329,7 +1329,7 @@ proc topicUnsplit {nick host handle channel} {
 
 	putloglev d * "topicengine: last split time updated to $topicLastSplit ([clock format $topicLastSplit])"
 	putloglev d * "topicengine: dirty chans due to split: $topicSplitChans"
-  
+
   return 0
 }
 
@@ -1345,7 +1345,7 @@ proc topicJoin {nick host handle channel mode victim} {
 
   #only do this if I've joined a channel
   if [isbotnick $victim] {
-      
+
     #check the topic script is active in here
     if {![channel get $channel topicengine]} {
       return 0
@@ -1404,7 +1404,7 @@ proc topicParse {channel topic nick} {
 
   while {[string match "*$topicSeparator*" $topic]} {
     set sentence [string range $topic 0 [expr [string first $topicSeparator $topic] -1]]
-    if {$sentence != ""} { 
+    if {$sentence != ""} {
       if {$blah == 0} {
         set topicInfo($channel,topicBits) [list [string trim $sentence]]
         set topicInfo($channel,whoSet) [list $nick]
@@ -1418,7 +1418,7 @@ proc topicParse {channel topic nick} {
     }
     set topic [string range $topic [expr [string first $topicSeparator $topic] +1] end]
     incr loopCount
-    if {$loopCount > 10} { 
+    if {$loopCount > 10} {
       putlog "Couldn't get all of the topic"
       return 0
     }
@@ -1483,7 +1483,7 @@ proc topicBotCommand {fromBot cmd arg} {
 #
 # update the topic automagically at 00:01 every day
 #
-proc topicUpdate { min hour day month year } { 
+proc topicUpdate { min hour day month year } {
   global topicChannels
   putlog "topicEngine: auto-refreshing topics..."
 
@@ -1492,7 +1492,7 @@ proc topicUpdate { min hour day month year } {
   }
 
   return 0
-} 
+}
 
 #####
 # topicNotice
@@ -1594,7 +1594,7 @@ proc topicCommandDCC {handle idx args} {
 }
 
 #####
-# topicSplitCheck 
+# topicSplitCheck
 # handle splits intelligently
 #
 proc topicSplitCheck {hr min day month year} {
@@ -1606,7 +1606,7 @@ proc topicSplitCheck {hr min day month year} {
 
 	set splitDiff [expr [clock seconds] - $topicLastSplit]
 	putloglev 1 * "topicengine: checking for splits: diff between now and last split is $splitDiff sec"
-	
+
 	if {$splitDiff > 120} {
 		# redo topic in every chan
 		#don't do this is the setting is off

TriviaEngine/TriviaEngine-sqlite.tcl

@@ -1,5 +1,5 @@
 # The trivia engine YAY
-# vim: foldmethod=marker:foldcolumn=2:foldmarker=<<<,>>>:sw=2:ts=2 
+# vim: foldmethod=marker:foldcolumn=2:foldmarker=<<<,>>>:sw=2:ts=2
 
 ### INIT <<<
 package require sqlite
@@ -91,7 +91,7 @@ set trivia_bmotion_bot "NoTopic"
 # Send a botnet command to the bmotion bot
 proc trivia_bmotion_send { command params } {
 	global trivia_bmotion_bot
-	
+
 	if {$trivia_bmotion_bot == ""} {
 		return 0
 	}
@@ -128,7 +128,7 @@ proc trivia_msg { nick host handle cmd } {
 			set category [trivia_sqlite_escape $category]
 			set sql "SELECT cat_id FROM categories WHERE cat_name='$category'"
 			set cat_id 0
-			
+
 			set cat_id [trivia_db_handle eval $sql]
 			if {$cat_id != ""} {
 				puthelp "PRIVMSG $nick :Moving question $trivia_last_qid to category$trivia_c(purple) $category$trivia_c(off) ($cat_id)"
@@ -178,7 +178,7 @@ proc trivia_msg { nick host handle cmd } {
 #<<< debug
 		if [regexp -nocase {^debug (.+)} $cmd matches func] {
 			global trivia_debug_mode
-			
+
 			if {$trivia_debug_mode == 0} {
 				putquick "PRIVMSG $nick :Debug mode is disabled. Cannot use debug commands."
 				return 0
@@ -243,7 +243,7 @@ proc trivia_msg { nick host handle cmd } {
 					trivia_db_handle eval $sql result {
 						set question_id $result(question_id)
 					}
-					
+
 					if {$question_id == 0} {
 						putserv "PRIVMSG $nick :I can't seem to find that report, sorry :("
 						return 0
@@ -408,7 +408,7 @@ proc trivia_correct { nick } {
 	trivia_bmotion_send "winner" "$nick $answer"
 	if {$newuser == 1} {
 	  putquick "PRIVMSG $trivia_channel :Welcome to our newest player,  $trivia_c(purple)$nick$trivia_c(off) :)"
-	}	
+	}
 	putquick "PRIVMSG $trivia_channel :Rankings: [trivia_near_five3 $uid]"
 
 	set leader [trivia_leader]
@@ -914,7 +914,7 @@ proc trivia_get_question { } {
 
 		set trivia_q_question [string trim $trivia_q_question]
 		set trivia_q_answer [string trim $trivia_q_answer]
-	} 
+	}
 
 	if {$trivia_q_id == ""} {
 		return
@@ -1295,7 +1295,7 @@ proc trivia_get_rank { uid } {
 	set sql "SELECT user_id FROM users ORDER by user_score DESC"
 	set dt [trivia_get_period]
 	set sql "select user_id, count(dt) as d from scores where dt > $dt group by user_id order by d desc"
-	
+
 	set pos 0
 	trivia_db_handle eval $sql {
 		incr pos
@@ -1622,7 +1622,7 @@ proc trivia_near_five3 { uid } {
 			append output " $entry "
 		}
 	}
-	
+
 	putlog $output
 	return $output
 
@@ -1805,10 +1805,10 @@ proc trivia_score_winners { } {
 	set now [clock seconds]
 
 	set updates [list]
-	
+
 	#knock off a week
 	set cutoff [expr $now - 604800]
-	
+
 	set sql "SELECT user_id, COUNT(*) AS score FROM scores WHERE dt > $cutoff GROUP BY user_id ORDER BY score DESC LIMIT 5"
 	putloglev d * $sql
 
@@ -1825,7 +1825,7 @@ proc trivia_score_winners { } {
 			lappend winner_name [list $user_name [lindex $winner 0] [lindex $winner 1]]
 		}
 	}
-		
+
 	putlog $winners
 	putlog $winner_name
 
@@ -1880,7 +1880,7 @@ proc trivia_score_time_left { } {
 		putloglev d * [clock format $trivia_score_time]
 		return
 	}
-	
+
 	set diff [expr $trivia_score_time - $now]
 	putloglev d * "trivia_score_time_left: difference is $diff seconds"
 

TriviaEngine/TriviaEngine.tcl

@@ -210,7 +210,7 @@ proc trivia_correct { nick } {
 	putquick "PRIVMSG $trivia_channel :Congratulations $trivia_c(purple)$nick$trivia_c(off)! The answer was$trivia_c(purple) $answer$trivia_c(off)."
 	if {$newuser == 1} {
 	  putquick "PRIVMSG $trivia_channel :Welcome to our newest player,  $trivia_c(purple)$nick$trivia_c(off) :)"
-	}	
+	}
 	putquick "PRIVMSG $trivia_channel :rank0rs: [trivia_near_five2 $uid]"
 
 	#set score [trivia_get_score $uid]

TriviaEngine/schema.sql

@@ -41,4 +41,3 @@ user_id bigint(20) not null default '0',
 dt bigint(2) not null default '0',
 score int not null default '0'
 );
-

noIPhost/noiphost.tcl

@@ -10,15 +10,15 @@
 ## INSTRUCTIONS
 ###############################################################################
 
-# This script bans users joining your channel with non-resolving hosts. Bans 
-# last for a day. (Change the 1440 in the line near the end of the script to 
+# This script bans users joining your channel with non-resolving hosts. Bans
+# last for a day. (Change the 1440 in the line near the end of the script to
 # change this).
-# 
+#
 # Users who are +o, +v, or +f in your bot (local or global) are left alone.
-# 
+#
 # Enable the 'noiphosts' flag for channels you want to protect.
 # --> .chanset #somechannel +noiphosts
-# 
+#
 # Enable the debug level on the partyline for some debug output
 # --> .console +d (to enable)
 # --> .console -d (to disable)
@@ -41,7 +41,7 @@ proc bancheck_join { nick host handle channel } {
 	}
 
   putloglev d * "noiphosts: join by $host to $channel"
-  
+
   #don't apply to friends, voices, ops
 	if {[matchattr $handle +fov|+fov $channel]} {
     putloglev d * "noiphosts: $nick is a friend"