view bin/culprits-ng @ 8750:8934300cd6d1

<b_jonas> `` perl -i -pe \'s/("\\x241)/-- $1/\' bin/random-card
author HackBot
date Tue, 05 Jul 2016 13:39:32 +0000
parents 974c1217a5cd
children
line wrap: on
line source

#!/bin/sh
exec hg log -l 512 --template "{desc}\0" -- "$@" | perl -0ne '/^<([^>]*)>/ and print"$1 "'