# HG changeset patch # User HackBot # Date 1479484882 0 # Node ID 4d7f1e7a9c7fd61e079ae29f8e274578f04143e7 # Parent 2ce5469aca50b2fb02281c55aaa42d9b64d4a587 sled bin/wercome//s/jp/ja/ diff -r 2ce5469aca50 -r 4d7f1e7a9c7f bin/wercome --- a/bin/wercome Fri Nov 18 16:01:07 2016 +0000 +++ b/bin/wercome Fri Nov 18 16:01:22 2016 +0000 @@ -1,2 +1,2 @@ #!/usr/bin/perl -w -if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "bin/@", $_ . " ? welcome.ja"; } else { exec "bin/?", "welcome.jp"; } +if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "bin/@", $_ . " ? welcome.ja"; } else { exec "bin/?", "welcome.ja"; }