Mercurial > ~darius > hgwebdir.cgi > cddb-stuff

annotate getcdinfo @ 9:f3f2657296d2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use Tcl 8.2 Catch socket errors. Create separate dummy file generation proc.
author darius
date Thu, 18 Jul 2002 06:37:12 +0000
parents 5cead4da1db9
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2
5cead4da1db9 Initial import.
darius
parents:
diff changeset
1 #!/bin/sh
5cead4da1db9 Initial import.
darius
parents:
diff changeset
2
5cead4da1db9 Initial import.
darius
parents:
diff changeset
3 # Find where we where run from
5cead4da1db9 Initial import.
darius
parents:
diff changeset
4 root=`dirname $0`
5cead4da1db9 Initial import.
darius
parents:
diff changeset
5
5cead4da1db9 Initial import.
darius
parents:
diff changeset
6 "$root/get_cdinfo.tcl" cdinfo.txt `"$root/cddb-id" -f /dev/acd0c -m`
5cead4da1db9 Initial import.
darius
parents:
diff changeset
7