summaryrefslogtreecommitdiffstats
path: root/tinyurl.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'tinyurl.tcl')
-rw-r--r--tinyurl.tcl1
1 files changed, 1 insertions, 0 deletions
diff --git a/tinyurl.tcl b/tinyurl.tcl
index d422126..3aa9bed 100644
--- a/tinyurl.tcl
+++ b/tinyurl.tcl
@@ -64,6 +64,7 @@ foreach act_arg $arg {
if {$tinyurl != "0"} {
set title [exec perl -e "use URI::Title;binmode(STDOUT, \":utf8\");print URI::Title::title(\"$url\");"]
putserv "PRIVMSG $chan :\002Tiny URL\002: $tinyurl \[$title\] (URL by \002$nick\002)"
+ return 0
}
}