From b682260545e6ae0e25815bb005ba9a97292285b7 Mon Sep 17 00:00:00 2001
From: lookshe <lookshe@fumuga.com>
Date: Tue, 17 Apr 2012 23:02:12 +0200
Subject: added youtu.be as youtube links also

---
 tinyurl.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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]
-- 
cgit v1.2.3