From 7da27c66ad6129b0709641e99af8829746377fba Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sat, 13 Aug 2022 10:45:11 -0700
Subject: Bugfix: -p <num> patchset selection.

- match-case must check value against integer predicate,
  rather than the list pattern (integerp ...).
---
 ger2err | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ger2err b/ger2err
index d1b9efc..172290b 100755
--- a/ger2err
+++ b/ger2err
@@ -136,7 +136,7 @@
       (match-case o.out-args
         ((@change-id) (let ((ps-hash (get-gerrit-comments change-id o.resolved)))
                         (match-case ps-sel
-                          (@(or (integerp @psnum)
+                          (@(or @(integerp @psnum)
                                 @(and :highest
                                       @(with psnum [find-max-key ps-hash : car])))
                             (print-as-errors [ps-hash psnum]))
-- 
cgit v1.2.3