browser: search categories on uppercase form input

[sheet.git] / browser.plp

diff --git a/browser.plp b/browser.plp
index 9adf10ef5a53437b81f9d282c524abea3fcb6acb..d623a344535af64c343ed15718756ad67fd1440d 100644 (file)
--- a/browser.plp
+++ b/browser.plp
@@ -172,7 +172,7 @@ sub saytitlecol {
 
        for ($row->{categories}) {
                my $cell = $_ ? lc $_->[0] : '-';
-               print '<th>', $cell;
+               printf '<th title="%s">%s', join(' + ', @$_), $cell;
        }
 
        print '<td>', map {