summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorlookshe <lookshe@fumuga.com>2012-04-17 23:02:12 +0200
committerlookshe <lookshe@fumuga.com>2012-04-17 23:02:12 +0200
commitb682260545e6ae0e25815bb005ba9a97292285b7 (patch)
tree15831a838f9913081e5ff4c934b96062ceddfbb0
parent7717e82cae372dff57e28527c50c1b8817852b0f (diff)
added youtu.be as youtube links also
-rw-r--r--tinyurl.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/tinyurl.tcl b/tinyurl.tcl
index 3aa9bed..78e7518 100644
--- a/tinyurl.tcl
+++ b/tinyurl.tcl
@@ -68,7 +68,7 @@ foreach act_arg $arg {
}
}
- if {([string match "*youtube*watch*" $url] == 1)} {
+ if {([string match "*youtube*watch*" $url] == 1) || ([string match "*youtu.bei*" $url] ==1)} {
set title [exec perl -e "use URI::Title;binmode(STDOUT, \":utf8\");print URI::Title::title(\"$url\");"]
if {([string match "* - YouTube" $title] == 1)} {
set title [string range $title 0 end-10]