SVN: toys/rsget.pl/RSGet/Curl.pm

[sparky]

Author: sparky
Date: Sun Jun 27 01:13:35 2010
New Revision: 11599

Modified:
   toys/rsget.pl/RSGet/Curl.pm
Log:
- changed recognized vars from @{foo} to $(foo) to be consistent with lock_file


Modified: toys/rsget.pl/RSGet/Curl.pm
==============================================================================
--- toys/rsget.pl/RSGet/Curl.pm	(original)
+++ toys/rsget.pl/RSGet/Curl.pm	Sun Jun 27 01:13:35 2010
@@ -644,7 +644,7 @@
 	my $hook = shift;
 	my %opts = @_;
 
-	$hook =~ s/(\@{([a-z]*)})/shquote( $opts{ $2 } || $1 )/eg;
+	$hook =~ s/(\$\(([a-z]*)\))/shquote( $opts{ $2 } || $1 )/eg;
 
 	my $pid = fork;
 	unless ( defined $pid ) {