annotate bin/culprits-ng @ 7946:8ecffca9813d

<moon__> mkx bin/hfs//erro \'You have discovered an eerie cavern. The air aboe the dark stone floor is alive ith vortices of purple light and dark, boiling clouds. Seemingly bottemless pits mark the surface. "$1" stand below\'
author HackBot
date Sat, 07 May 2016 18:36:18 +0000
parents 974c1217a5cd
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7009
de7ea13e0143 <b_jonas> perl -e($o="bin/culprits-ng"); open$O,">",$o or die; print $O "#!/bin/sh\\n",q{exec hg log -l 512 --template "{desc}\\0" -- "$@" | perl -0ne \'/^<([^>]*)>/ and!$t{$1}++and print"$1 "\'},"\\n"; close$O;chmod 0755,$o or die;
HackBot
parents: 7008
diff changeset
1 #!/bin/sh
7010
974c1217a5cd <b_jonas> perl -e($o="bin/culprits-ng"); open$O,">",$o or die; print $O "#!/bin/sh\\n",q{exec hg log -l 512 --template "{desc}\\0" -- "$@" | perl -0ne \'/^<([^>]*)>/ and print"$1 "\'},"\\n"; close$O;chmod 0755,$o or die;
HackBot
parents: 7009
diff changeset
2 exec hg log -l 512 --template "{desc}\0" -- "$@" | perl -0ne '/^<([^>]*)>/ and print"$1 "'