diff hg-browse @ 3:f05a6c7471fa

tweak
author anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Sat, 06 Apr 2019 17:34:35 +0900
parents 3656bdd46f54
children 6c212f9834b6
line wrap: on
line diff
--- a/hg-browse	Sat Feb 16 16:56:42 2019 +0900
+++ b/hg-browse	Sat Apr 06 17:34:35 2019 +0900
@@ -53,7 +53,7 @@
     my $input  = shift;
     my $http_domain = 'http://www.cr.ie.u-ryukyu.ac.jp/';
     my $url;
-    if ($input =~ m[.*firefly/(.*)]){
+    if (($input =~ m[.*?firefly.cr.ie.u-ryukyu.ac.jp/(.*)] )||($input =~  m[.*firefly/(.*)])){
         $url = $http_domain.$1;
     }
     @cmd = ('open',$url);