--- nfo/perl/scripts/giantdisc/bin/gdc.pl	2005/03/08 20:53:46	1.2
+++ nfo/perl/scripts/giantdisc/bin/gdc.pl	2005/03/08 21:00:45	1.3
@@ -22,6 +22,7 @@
 use gdclient;
 
 my $action = shift;
+my $hostname = 'siggi';
 
 sub usage {
   print "Usage: gdc.pl ripcd|ripstatus", "\n";
@@ -41,7 +42,7 @@
 
 
 sub ripcd {
-  gd_connect("siggi");
+  gd_connect($hostname);
   
   # 1. check if cd is already in database (probably ripped?)
   if (my $check_cd = gd_command("chcd", undef, 1)) {
@@ -85,7 +86,7 @@
 }
 
 sub ripstatus {
-  gd_connect("siggi");
+  gd_connect($hostname);
 
   while (1) {
     my $status_rip = gd_command("grpst", undef, 1);