Changeset 8783 in genesis for config/iris/node/FreeBSD
- Timestamp:
- Feb 8, 2011, 10:13:43 AM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
config/iris/node/FreeBSD/8.0-RELEASE/g_list.pl
r8677 r8783 87 87 }; 88 88 89 90 89 #als geen node gespecificeerd dan kijken of svn geupdate is gevraagd 91 if(!$node) { 92 if( $ENV{"QUERY_STRING"}=~/update/i) { 93 printline("<PRE>"); 94 #select(STDERR); $| = 1; # make unbuffered 95 #select(STDOUT); $| = 1; # make unbuffered 96 printline(`$svn update $ndir`); 97 printline("</PRE>"); 98 printline("<H2>Done.<H2><P>"); 99 printline("Click <A HREF=$source>here</A>"); 100 printline("if you're not forwarded automaticly in 5 seconds.<P>"); 101 printline("<META HTTP-EQUIV=REFRESH CONTENT=5;URL=$source>"); 102 } 103 else { 104 g_list( ); 105 } 90 if( $ENV{"QUERY_STRING"}=~/update/i) { 91 printline("<PRE>"); 92 #select(STDERR); $| = 1; # make unbuffered 93 #select(STDOUT); $| = 1; # make unbuffered 94 printline(`$svn update $ndir`); 95 printline("</PRE>"); 96 printline("<H2>Done.<H2><P>"); 97 printline("Click <A HREF=$source>here</A>"); 98 printline("if you're not forwarded automaticly in 5 seconds.<P>"); 99 printline("<META HTTP-EQUIV=REFRESH CONTENT=5;URL=$source>"); 100 } 101 elsif( !$node ) { 102 g_list( ); 106 103 } 107 104 elsif( $node eq 'filelist' ) {
Note:
See TracChangeset
for help on using the changeset viewer.