# HG changeset patch # User HackBot # Date 1462715230 0 # Node ID 3800bd1a5e3e24e3e3389d002cbd2d911c417f8f # Parent 21888741373f4e3d2840a29eb47515fa90c57bde mkx bin/lastwisdoms//find .hg/store/data/wisdom -type f -print0 | xargs -0 /bin/ls -t | perl -pe \'use POSIX;chop;$d=strftime("%F",localtime((stat($_))[9]));s=^.hg/store/data/wisdom/(.*).i$=\\1 // =;s=^=/$d/ = if$d ne$p;$p=$d;s=_(.)=uc($1)=eg;s=~([0-9a-f][0-9a-f])=chr hex$1=eg\' diff -r 21888741373f -r 3800bd1a5e3e bin/lastwisdoms --- a/bin/lastwisdoms Sun May 08 12:22:38 2016 +0000 +++ b/bin/lastwisdoms Sun May 08 13:47:10 2016 +0000 @@ -1,2 +1,1 @@ -#!/bin/sh -exec hg log --template "{date|shortdate}\0{files}\0" -I "wisdom/**" | perl -0ne 'chomp;$s{$_}++and next;s"^wisdom/"";print$_," ";' +find .hg/store/data/wisdom -type f -print0 | xargs -0 /bin/ls -t | perl -pe 'use POSIX;chop;$d=strftime("%F",localtime((stat($_))[9]));s=^.hg/store/data/wisdom/(.*).i$=\1 // =;s=^=/$d/ = if$d ne$p;$p=$d;s=_(.)=uc($1)=eg;s=~([0-9a-f][0-9a-f])=chr hex$1=eg'