diff --git a/loglisten.c b/loglisten.c
index 3de67bb2..4927deba 100644
--- a/loglisten.c
+++ b/loglisten.c
@@ -133,15 +133,16 @@ int AnalyzeCommand(char *command) {
   
   Tcl_SplitList(NULL, command, &argc, &argv);
   arg0 = 0;
-  if (argc > 0 && (strcmp(argv[0], "fulltransact") == 0
-                   || strcmp(argv[0], "transact") == 0)) {
+  if (argc > 0 && (strcasecmp(argv[0], "fulltransact") == 0
+                   || strcasecmp(argv[0], "transact") == 0)) {
     arg0 = 1;
   }
   if (argc <= arg0 + 1) {
     writable = 0; /* single word -> guess read only */
     goto Free;
   }
-  if (strcmp(argv[arg0], "sicsdescriptor") == 0
+  if (strcmp(argv[arg0], "hval") == 0
+      || strcmp(argv[arg0], "sicsdescriptor") == 0
       || strcmp(argv[arg0], "_tcl") == 0) {
     writable = 0;
     goto Free;