[m-dev.] trivial diff: fix PATH in test_mercury
David Glen JEFFERY
dgj at cs.mu.OZ.AU
Wed Jul 5 14:54:17 AEST 2000
On 05-Jul-2000, David Glen JEFFERY <dgj at cs.mu.OZ.AU> wrote:
> I'm going to get this thing working one day, I swear...
Seriously, soon.
I'll just commit this if there's no objections.
===================================================================
Estimated hours taken: 0.25
tools/test_mercury:
Only rebuild the index files on the www site when running on
murlibobo --- that is the only machine that changes the
contents of the www site.
===================================================================
Index: test_mercury
===================================================================
RCS file: /home/staff/zs/imp/mercury/tools/test_mercury,v
retrieving revision 1.113
diff -u -t -r1.113 test_mercury
--- test_mercury 2000/07/05 04:19:48 1.113
+++ test_mercury 2000/07/05 04:52:55
@@ -653,12 +653,18 @@
esac
# Now rebuild the index files on the www site
-echo "test_mercury generating index files on www site, starting at `date`" 1>&2
-(
-cd $BETA_WEBDIR_TOP
-generate_index_html
-)
-echo "test_mercury generating index files on www site, finished at `date`" 1>&2
+case $HOST in
+ murlibobo)
+ echo "test_mercury generating www index files, starting at `date`" 1>&2
+ (
+ cd $BETA_WEBDIR_TOP
+ generate_index_html
+ )
+ echo "test_mercury generating www index files, finished at `date`" 1>&2
+ ;;
+ *)
+ ;;
+esac
: check for success
dgj
--
David Jeffery (dgj at cs.mu.oz.au) | If your thesis is utterly vacuous
PhD student, | Use first-order predicate calculus.
Dept. of Comp. Sci. & Soft. Eng.| With sufficient formality
The University of Melbourne | The sheerist banality
Australia | Will be hailed by the critics: "Miraculous!"
| -- Anon.
--------------------------------------------------------------------------
mercury-developers mailing list
Post messages to: mercury-developers at cs.mu.oz.au
Administrative Queries: owner-mercury-developers at cs.mu.oz.au
Subscriptions: mercury-developers-request at cs.mu.oz.au
--------------------------------------------------------------------------
More information about the developers
mailing list