webyesod: make filter form work in chrome 6

2010-07-08 02:04:20 +00:00 · 2010-07-08 02:04:20 +00:00 · 2e3c5bc281
commit 2e3c5bc281
parent 63de5e0127
1 changed files with 2 additions and 2 deletions
--- a/Hledger/Cli/Commands/Web.hs
+++ b/Hledger/Cli/Commands/Web.hs
@ -187,14 +187,14 @@ navlinks here a p = [$hamlet|

 searchform :: HledgerWebAppRoute -> String -> String -> Hamlet HledgerWebAppRoute
 searchform here a p = [$hamlet|
- %form#searchform
+ %form#searchform!method=GET
  filter by: $
  %input!name=a!size=20!value=$string.a$
  ^ahelp^ $
  in period: $
  %input!name=p!size=20!value=$string.p$
  ^phelp^ $
-  %input!name=submit!type=submit!value=filter!style=display:none;
+  %input!type=submit!value=filter
  ^resetlink^
 |]
 where