Mercurial > repo

view paste/paste.18999 @ 2616:4d2f0fd95455

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<oerjan> (echo \' module Main where\'; echo \'main = putStr "It works!"\') > Test.hs
author HackBot
date Sat, 06 Apr 2013 22:41:48 +0000
parents ab2c49f31e97
children
line wrap: on
line source

#!/bin/sh
cd /var/irclogs/_esoteric
if [ "$1" ]; then
    grep -P -i -- "$1" ????-??-??.txt | shuf -n 1
else
    file=$(shuf -en 1 ????-??-??.txt)
    echo "$file:$(shuf -n 1 $file)"
fi