# HG changeset patch
# User HackBot
# Date 1370459986 0
# Node ID 6e797597142d2a6f51a21c13c6bba561bd20bc81
# Parent  728369e3705038705a369cd8d0b0531990063be9
<nooodl> mv index.html bin/thanks

diff -r 728369e37050 -r 6e797597142d bin/thanks
--- a/bin/thanks	Wed Jun 05 19:19:43 2013 +0000
+++ b/bin/thanks	Wed Jun 05 19:19:46 2013 +0000
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-$_ = $ARGV[0] || chomp(`words`); print "Thanks, $_. "; if (/[aeiouy]/) { s/^[^aeiouy]*/Th/; } else { s/^./T/; } print "$_.";
\ No newline at end of file
+$_ = $ARGV[0] || `words`; s/^\s+|\s+$//g; print "Thanks, $_. "; if (/[aeiouy]/) { s/^[^aeiouy]*/Th/; } else { s/^./T/; } print "$_.";
\ No newline at end of file
diff -r 728369e37050 -r 6e797597142d index.html
--- a/index.html	Wed Jun 05 19:19:43 2013 +0000
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,2 +0,0 @@
-#!/usr/bin/perl
-$_ = $ARGV[0] || `words`; s/^\s+|\s+$//g; print "Thanks, $_. "; if (/[aeiouy]/) { s/^[^aeiouy]*/Th/; } else { s/^./T/; } print "$_.";
\ No newline at end of file