Mercurial > repo

changeset 7971:3800bd1a5e3e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<int-e> 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\'
author HackBot
date Sun, 08 May 2016 13:47:10 +0000
parents 21888741373f
children 0cec9943dd32
files bin/lastwisdoms
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- 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'