CVS Update: gleipnir

[Dan Brosemer <odin@cleannorth.org>]

Log Message:
-----------
Correctly armor $ingroups here too.

Modified Files:
--------------
    gleipnir/public_html/gallery:
        picture.pl
        upload.pl

Revision Data
-------------
Index: picture.pl
===================================================================
RCS file: /cvs/gleipnir/public_html/gallery/picture.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -Lpublic_html/gallery/picture.pl -Lpublic_html/gallery/picture.pl -u -r1.4 -r1.5
--- public_html/gallery/picture.pl
+++ public_html/gallery/picture.pl
@@ -66,7 +66,7 @@
 
 	my $SQL = <<EOT;
 select gp.pictureid, gp.gallery, gp.image_path, gp.title, gp.caption, gp.exif, gp.uploader, gp.uploaded, g.identifier, g.description 
-from gallery_picture gp left join gallery g on g.galleryid = gp.gallery where gp.pictureid = ? and $ingroups
+from gallery_picture gp left join gallery g on g.galleryid = gp.gallery where gp.pictureid = ? and ($ingroups)
 EOT
 	
 	my $cursor = $dbh->prepare($SQL);
Index: upload.pl
===================================================================
RCS file: /cvs/gleipnir/public_html/gallery/upload.pl,v
retrieving revision 1.9
retrieving revision 1.10
diff -Lpublic_html/gallery/upload.pl -Lpublic_html/gallery/upload.pl -u -r1.9 -r1.10
--- public_html/gallery/upload.pl
+++ public_html/gallery/upload.pl
@@ -53,7 +53,7 @@
   $ingroups = " gid is null " . $ingroups;
 
   my $SQL =<<EOT;
-select identifier, galleryid from gallery where $ingroups
+select identifier, galleryid from gallery where ($ingroups)
 EOT
 
   my $cursor = $dbh->prepare($SQL);