diff options
author | ivan <ivan> | 2007-01-02 21:44:36 +0000 |
---|---|---|
committer | ivan <ivan> | 2007-01-02 21:44:36 +0000 |
commit | 129766f1fe5dd7e8d77133747c252baf8cff3962 (patch) | |
tree | aa9a9c32a657e3d6b3aec66cf45b32ce7a19e766 | |
parent | c7727be6391c2b48fe520edbc8df88a7762ac30c (diff) |
stupid semicolon!
-rw-r--r-- | FS/FS/cust_main.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index 9038d95a8..8603bde3d 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -1641,7 +1641,7 @@ sub num_ncancelled_pkgs { sub num_pkgs { my( $self, $sql ) = @_; - $sql = "AND $sql" if $sql && $sql !~ /^\s*$/ && $sql !~ /^\s*AND/i + $sql = "AND $sql" if $sql && $sql !~ /^\s*$/ && $sql !~ /^\s*AND/i; my $sth = dbh->prepare( "SELECT COUNT(*) FROM cust_pkg WHERE custnum = ? $sql" ) or die dbh->errstr; |