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

changeset 12:2bcb84ead02e default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use Tcl 8.2 Fix setting the album artist changes
author darius
date Thu, 18 Jul 2002 06:47:39 +0000
parents c122160e07da
children
files tracknamer.tcl
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/tracknamer.tcl	Thu Jul 18 06:38:42 2002 +0000
+++ b/tracknamer.tcl	Thu Jul 18 06:47:39 2002 +0000
@@ -1,6 +1,6 @@
 #!/bin/sh
 # tcl magic \
-exec tclsh8.0 $0 $*
+exec tclsh8.2 $0 $*
 
 #
 # This software is copyright Daniel O'Connor (darius@dons.net.au) 1998, 1999
@@ -137,7 +137,7 @@
     global tracks;
 
     set tracks(albumname) $tracks(tmp:albumname);
-    set $tracks(albumartist) tracks(tmp:albumartist);
+    set tracks(albumartist) $tracks(tmp:albumartist);
 
     for { set i 1 } { $i <= $tracks(number) } { incr i } {
 	set tracks(artist:$i) $tracks(tmp:artist:$i);