Mercurial > repo

view bin/paste @ 2266:4767030cee0e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<elliott> addquote <ais523> Phantom_Hoover: my department teaches prolog, to second years I think <ais523> some people choose it because it isn\'t ocaml, and then are disappointed to find it has lists
author HackBot
date Tue, 26 Feb 2013 18:41:42 +0000
parents 7914d7e0b500
children 03afb1619ef2
line wrap: on
line source

#!/bin/bash
if [ ! "$1" ]
then
    PASTENUM="$RANDOM"

    mkdir -p $HACKENV/paste

    url paste/paste."$PASTENUM"
    cat > $HACKENV/paste/paste."$PASTENUM"
else # Save making a file when it already exists.
    url "$1"
fi