[Genex-cvs-commit] genex-server/Genex/Contact Contact.pm,1.42,1.43

[<jas...@us...>]

Update of /cvsroot/genex/genex-server/Genex/Contact
In directory sc8-pr-cvs1:/tmp/cvs-serv10811/Contact

Modified Files:
	Contact.pm 
Log Message:
new modules

Index: Contact.pm
===================================================================
RCS file: /cvsroot/genex/genex-server/Genex/Contact/Contact.pm,v
retrieving revision 1.42
retrieving revision 1.43
diff -C2 -d -r1.42 -r1.43
*** Contact.pm	24 Apr 2003 00:19:02 -0000	1.42
--- Contact.pm	24 Apr 2003 21:35:34 -0000	1.43
***************
*** 644,649 ****
          $value =~ s/(\w)\s*$/$1/;
          # we have to quote the column names in case they have reserved words
!         $unique = $dbh->quote_identifier($unique);
!          push(@clauses,"$unique=" . $dbh->quote($value));
        }
        $UNIQUE_WHERE = join(' AND ', @clauses);
--- 644,648 ----
          $value =~ s/(\w)\s*$/$1/;
          # we have to quote the column names in case they have reserved words
!          push(@clauses,$dbh->quote_identifier($unique). "=" . $dbh->quote($value));
        }
        $UNIQUE_WHERE = join(' AND ', @clauses);