+#### Terms is broken time being, don't bother testing it
+# Termlists;
+#my $rs4 = $sess->search(pqf => '@attr 1=4 @and IDZebra Session');
+#$expected = 2;
+#$hits = $rs4->count;
+#ok(($hits == $expected), "RPN search - found $hits/$expected records");
+#print STDERR "Test 8: found $hits of $expected\n";
+#
+#my @terms = $rs4->terms();
+#ok(($#terms == 1), "Got 2 terms in RPN expression");
+#my $cc = 0;
+#foreach my $t (@terms) {
+# if ($t->{term} eq 'IDZebra') {
+# ok(($t->{count} = $filecount*2), "Term IDZebra ($t->{count})");
+# $cc++;
+# }
+# elsif ($t->{term} eq 'Session') {
+# ok(($t->{count} = 2), "Term Session ($t->{count})");
+# $cc++;
+# } else {
+# ok(0,"Invalid term $t->{term}");
+# }
+#
+#}
+#ok (($cc == 2), "Got 2 terms for RS");
+
+