Changeset 891 for trunk/modules/friendship.tcl

Timestamp:

02/17/08 18:54:27 (11 months ago)

Author:

james

Message:

exciting times

Files:

• trunk/modules/friendship.tcl (modified) (2 diffs)

trunk/modules/friendship.tcl

@@ -63 +63 @@
 proc setFriendshipHandle { handle friendship } {
         if {$friendship > 100} {
-                bMotion_putloglev 2 * "friendship: friendship for $nick went over 100, capping back to 90"
+                bMotion_putloglev 2 * "friendship: friendship for $handle went over 100, capping back to 90"
                 set friendship 90
         }
 
         if {$friendship < 1} {
-                bMotion_putloglev 2 * "friendship: friendship for $nick went under 1, capping back to 10"
+                bMotion_putloglev 2 * "friendship: friendship for $handle went under 1, capping back to 10"
                 set friendship 10
         }
@@ -85 +85 @@
                 if {![validuser $nick]} {
                         bMotion_putloglev 1 * "friendship: couldn't find a handle for $nick to set friendship."
-                        return 50
+                        return 0
                 }
                 set handle $nick
         }
 
-
-        if {$friendship > 100} {
-                bMotion_putloglev 2 * "friendship: friendship for $nick went over 100, capping back to 9"
-                set friendship 99
-        }
-
-        if {$friendship < 0} {
-                bMotion_putloglev 2 * "friendship: friendship for $nick went under 0, capping back to 1"
-                set friendship 1
-        }
-
-
-        catch {
-                setuser $handle XTRA friend $friendship
-        }
+        setFriendshipHandle $handle $friendship
 }