Mercurial > repo

annotate paste/paste.5734 @ 12473:d5369f0dbe17 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<int-e> learn GregorR is a recovering absentee. He\'s known for his hack ego and hat tricks.
author HackEso <hackeso@esolangs.org>
date Tue, 14 Feb 2023 05:42:31 +0000
parents 6568d45e3294
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
854
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
1 #!/bin/bash
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
2 if [ ! "$1" ]
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
3 then
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
4 PASTE=-
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
5 else
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
6 PASTE="$1"
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
7 fi
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
8
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
9 PASTENUM="$RANDOM"
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
10
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
11 mkdir -p $HACKENV/paste
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
12
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
13 echo 'http://codu.org/projects/hackbot/fshg/index.cgi/raw-file/tip/paste/paste.'"$PASTENUM"
6568d45e3294 <Sgeo__> paste bin/paste
HackBot
parents:
diff changeset
14 cat "$PASTE" > $HACKENV/paste/paste."$PASTENUM"