Changeset 465
- Timestamp:
- Oct 13, 2007, 10:59:32 PM (17 years ago)
- Location:
- locker
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
locker/deploy/bin/mediawiki
r456 r465 1 1 #!/usr/bin/perl 2 2 use strict; 3 use lib '/mit/scripts/deploy dev/bin';3 use lib '/mit/scripts/deploy/bin'; 4 4 use onserver; 5 5 -
locker/deploy/bin/onathena
r463 r465 38 38 } 39 39 40 override=1 40 41 if [ "$override" = "" ]; then 41 42 echo "The scripts.mit.edu automatic installers are currently unavailable." -
locker/sql/bin/get-next-database
r382 r465 5 5 $newdb = str_replace($u.'+','',$argv[1]); 6 6 $testdb = str_replace('.','',$u).'+'.$newdb; 7 $dbs = explode("\n",file_get_contents('https://sql.mit.edu/tools/list_dbs .php?h=' . urlencode($h) . '&u=' . urlencode($u) . '&p=' . urlencode($p)));7 $dbs = explode("\n",file_get_contents('https://sql.mit.edu/tools/list_dbs?h=' . urlencode($h) . '&u=' . urlencode($u) . '&p=' . urlencode($p))); 8 8 if (in_array($testdb,$dbs)) { 9 9 $i = 1;
Note: See TracChangeset
for help on using the changeset viewer.