Changeset 1001 for trunk/plugins/en/output_expand.tcl

Timestamp:

04/21/09 08:56:50 (3 years ago)

Author:

james

Message:

make 10% less annoying

File:

• trunk/plugins/en/output_expand.tcl (modified) (1 diff)

trunk/plugins/en/output_expand.tcl

@@ -17 +17 @@
 
 proc bMotion_plugin_output_expand { channel text } {
-        if {[rand 100] > 80} {
+        if {[rand 100] > 90} {
                 if [regexp -nocase "^\[a-z\]{4,}$" $text] {
                         set letters [split $text {}]