Mercurial > repo

view bin/? @ 7010:974c1217a5cd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<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;
author HackBot
date Thu, 25 Feb 2016 07:22:49 +0000
parents f72b8824feb4
children
line wrap: on
line source

#!/bin/bash
topic=$(echo "$1" | lowercase | sed "s/noo\+dl/nooodl/;s/ *$//")
topic1=$(echo "$topic" | sed "s/s$//")
cd wisdom
if [ \( "_$topic1"_ = "_ngevd"_ \) -a \( -e ngevd \) ];
    then cat /dev/urandom;
    elif [ -e "$topic" ];
    then cat "$topic" | rnooodl;
    elif [ -e "$topic1" ];
    then cat "$topic1" | rnooodl;
    else echo "$1? ¯\(°​_o)/¯"; exit 1;
fi