Update of /cvsroot/hcoop/domtool2/src
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv25505/src
Modified Files:
main.sml
Log Message:
Print on start of mysql-fixperms in domtool-server
Index: main.sml
===================================================================
RCS file: /cvsroot/hcoop/domtool2/src/main.sml,v
retrieving revision 1.106
retrieving revision 1.107
diff -C2 -d -r1.106 -r1.107
*** main.sml 10 Jul 2008 23:38:53 -0000 1.106
--- main.sml 24 Nov 2008 14:08:35 -0000 1.107
***************
*** 1556,1567 ****
| MsgMysqlFixperms =>
! doIt (fn () => if OS.Process.isSuccess
! (OS.Process.system
"/usr/bin/sudo -H /afs/hcoop.net/common/etc/scripts/mysql-grant-table-drop")
then
! ("Requested mysql-fixperms",
! NONE)
else
("Requested
mysql-fixperms, but execution failed!",
SOME "Script execution
failed."))
! (fn () => ())
| MsgDescribe dom =>
--- 1556,1568 ----
| MsgMysqlFixperms =>
! (print "Starting mysql-fixperms\n";
! doIt (fn () => if OS.Process.isSuccess
! (OS.Process.system
"/usr/bin/sudo -H /afs/hcoop.net/common/etc/scripts/mysql-grant-table-drop")
then
! ("Requested
mysql-fixperms",
! NONE)
else
("Requested
mysql-fixperms, but execution failed!",
SOME "Script execution
failed."))
! (fn () => ()))
| MsgDescribe dom =>
-------------------------------------------------------------------------
This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
Build the coolest Linux based applications with Moblin SDK & win great prizes
Grand prize is a trip for two to an Open Source event anywhere in the world
http://moblin-contest.org/redirect.php?banner_id=100&url=/
_______________________________________________
hcoop-cvs mailing list
hcoop-cvs@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/hcoop-cvs
