Changeset 8677 in genesis for config/iris

Timestamp:

Nov 30, 2010, 12:12:47 AM (14 years ago)

Author:

richardvm

Message:

uri wasn't right

Location:

config/iris/node/FreeBSD/8.0-RELEASE

Files:

• g_list.pl (modified) (4 diffs)
• genesis.conf (modified) (2 diffs)

config/iris/node/FreeBSD/8.0-RELEASE/g_list.pl

@@ -9 +9 @@
 my $conf_file = dirname(__FILE__) . "/genesis.conf";
 do($conf_file) || die("Cann't open $conf_file");
-
 
 
@@ -73 +72 @@
   if ( $debug ) { print "File: $file\n"; }
 }
-else {
-  $title="listing";
-};
-
 
 #controleer wat de browser is
@@ -94 +89 @@
 
 #als geen node gespecificeerd dan kijken of svn geupdate is gevraagd
-if( $ENV{"QUERY_STRING"}=~/update/i) {
-  printline("<PRE>");
-  #select(STDERR); $| = 1;     # make unbuffered
-  #select(STDOUT); $| = 1;     # make unbuffered
-  printline(`$svn update $ndir`);
-  printline("</PRE>");
-  printline("<H2>Done.<H2><P>");
-  printline("Click <A HREF=$source>here</A>");
-  printline("if you're not forwarded automaticly in 5 seconds.<P>");
-  printline("<META HTTP-EQUIV=REFRESH CONTENT=5;URL=$source>");
-}
-else {
- g_list( );
-}
-
-if( $node eq 'filelist' ) {
+if(!$node) {
+  if( $ENV{"QUERY_STRING"}=~/update/i) {
+    printline("<PRE>");
+    #select(STDERR); $| = 1;     # make unbuffered
+    #select(STDOUT); $| = 1;     # make unbuffered
+    printline(`$svn update $ndir`);
+    printline("</PRE>");
+    printline("<H2>Done.<H2><P>");
+    printline("Click <A HREF=$source>here</A>");
+    printline("if you're not forwarded automaticly in 5 seconds.<P>");
+    printline("<META HTTP-EQUIV=REFRESH CONTENT=5;URL=$source>");
+  }
+  else {
+   g_list( );
+  }
+}
+elsif( $node eq 'filelist' ) {
   filelist( );
 }
@@ -170 +166 @@
       printline("<TR><TD><A HREF=$node/config>$node</A></TD>");
       foreach $file (sort @filelist) {
-        printline("<TD><A HREF=$node/$file>$file</A></TD>\n");
+        printline("<TD><A HREF=$uri$node/$file>$file</A></TD>\n");
       };
     };

config/iris/node/FreeBSD/8.0-RELEASE/genesis.conf

@@ -38 +38 @@
 
 chomp($hostname);
-$uri='/config/iris/node/freebsd/8.0-RELEASE/';
+$uri='/config/iris/node/FreeBSD/8.0-RELEASE/g_list.pl/';
 $cgi_dir="$uri";
 $source="$cgi_dir";
@@ -64 +64 @@
 ## ssh key variablen ##
 #global ssh_keys
-$global_keyPath="$home/config/nodes/global_keys";
+$global_keyPath="$home/../../../../../nodes/global_keys";
 #node specific
 $ssh_file='ssh_key'