From e78ac716347d97b0b3daa8c15ad3be42ce3e5d87 Mon Sep 17 00:00:00 2001
From: "Alan J. Pippin" <ajp@server.pippins.net>
Date: Wed, 30 Jan 2008 08:00:32 -0700
Subject: [PATCH] Made DBI connect changes suggested by Brett Williams.

---
 bin/backup_phpgw_db  | 5 +++--
 bin/import_ward_data | 2 +-
 bin/parse_ward_data  | 2 +-
 3 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/bin/backup_phpgw_db b/bin/backup_phpgw_db
index b00afda..beaf254 100755
--- a/bin/backup_phpgw_db
+++ b/bin/backup_phpgw_db
@@ -1,13 +1,14 @@
 #!/bin/bash
 
 MNTPNT="/backup"
+MOUNTIT=1
 DSTDIR="/backup/mysql/"
 DBNAME=phpgroupware
 DBUSER=phpgroupware
 DBPASS=phpgroupware
 
-mount -w -o remount $MNTPNT 
+[ $MOUNTIT == 1 ] && mount -w -o remount $MNTPNT 
 /usr/bin/mysqldump --databases $DBNAME -u $DBUSER --password=$DBPASS -c > $DSTDIR/mysql_phpgw_backup.sql
 ls -l $DSTDIR/mysql_phpgw_backup.sql
-mount -r -o remount $MNTPNT
+[ $MOUNTIT == 1 ] && mount -r -o remount $MNTPNT
 
diff --git a/bin/import_ward_data b/bin/import_ward_data
index ef6d62b..53a3c3d 100755
--- a/bin/import_ward_data
+++ b/bin/import_ward_data
@@ -667,7 +667,7 @@ sub check_for_changed_ids
 
 ###################################################
 # Open a connection to the database
-$dbh=DBI->connect("dbi:mysql:dbname=$dbname;host=$dbhost;port=$dbport",$dbuser,$dbpass,{
+$dbh=DBI->connect("dbi:mysql:dbname=$dbname:host=$dbhost:port=$dbport",$dbuser,$dbpass,{
     AutoCommit=>0,
     PrintError=>0}) or print "Connect Failure:".$DBI::errstr."\n" and exit 2;
 
diff --git a/bin/parse_ward_data b/bin/parse_ward_data
index c2397cf..7a3c072 100755
--- a/bin/parse_ward_data
+++ b/bin/parse_ward_data
@@ -94,7 +94,7 @@ sub print_birthdays
 
 ###################################################
 # Open a connection to the database
-$dbh=DBI->connect("dbi:mysql:dbname=$dbname;host=$dbhost;port=$dbport",$dbuser,$dbpass,{
+$dbh=DBI->connect("dbi:mysql:dbname=$dbname:host=$dbhost:port=$dbport",$dbuser,$dbpass,{
     AutoCommit=>0,
     PrintError=>0}) or print "Connect Failure:".$DBI::errstr."\n" and exit 2;
 
-- 
2.34.1