Support for specifying a keyword to search for

diff --git a/src/InfoCon/account/list.wml b/src/InfoCon/account/list.wml
index e5e4775..ed516dd 100644 (file)
--- a/src/InfoCon/account/list.wml
+++ b/src/InfoCon/account/list.wml
@@ -41,6 +41,9 @@
   if (strlen($category)) {
     $where[] = "category = '$category'";
   }
+  if (strlen($keyword)) {
+    $where[] = "descr ~* '$keyword'";
+  }
   if (strlen($from_to)) {
     $where[] = "from_to = '$from_to'";
   }

diff --git a/src/InfoCon/account/query.wml b/src/InfoCon/account/query.wml
index b641a90..4eca27d 100644 (file)
--- a/src/InfoCon/account/query.wml
+++ b/src/InfoCon/account/query.wml
@@ -60,6 +60,7 @@
     printf ("<option value=\"%s\">%s", $cat['from_to'], $cat['from_to']);
   }
 ?></select><br>
+<b>Keyword</b>: <input name=keyword size=25 maxlength=40><br>
 <b>Zahlung</b>: <input type=checkbox name=input value=1 checked> Einnahmen <input type=checkbox name=output value=1 checked> Ausgaben<br>
 
 <p><center><input type=submit value="Query"> <input type=reset value="Reset"></center><p>