[Rt-commit] r13910 - in rtfm/trunk: .

[falcone at bestpractical.com]

Author: falcone
Date: Wed Jul  9 12:36:13 2008
New Revision: 13910

Modified:
   rtfm/trunk/   (props changed)
   rtfm/trunk/html/RTFM/Article/Search.html

Log:
 r35238 at ketch:  falcone | 2008-07-08 10:56:29 -0400
 * quiet some warnings


Modified: rtfm/trunk/html/RTFM/Article/Search.html
==============================================================================
--- rtfm/trunk/html/RTFM/Article/Search.html	(original)
+++ rtfm/trunk/html/RTFM/Article/Search.html	Wed Jul  9 12:36:13 2008
@@ -105,7 +105,7 @@
 
 # If it is a number, load the article with that ID.  Otherwise, search
 # on name and summary.
-if ($ARGS{'q'} =~ /^(\d+)$/) {
+if ($ARGS{'q'} && $ARGS{'q'} =~ /^(\d+)$/) {
     return $m->comp("/RTFM/Article/Display.html", id => $1);
 } elsif ($ARGS{'q'}) {
     $articles->Limit( FIELD => 'Name',
@@ -423,7 +423,7 @@
 
     my $op;
     foreach my $value (@Match) {
-        if ( $value =~ /^~(.*)$/ ) {
+        if ( $value && $value =~ /^~(.*)$/ ) {
             $value = "%$1%";
             $op    = 'LIKE';
         }
@@ -452,7 +452,7 @@
     foreach my $value (@NoMatch) {
 
         # preprocess Classes, so we can search on class
-        if ( $value =~ /^~(.*)/ ) {
+        if ( $value && $value =~ /^~(.*)/ ) {
             $value = "%$1%";
             $op    = 'NOT LIKE';
         }