diff options
Diffstat (limited to 'guix-qa-frontpage')
| -rw-r--r-- | guix-qa-frontpage/patchwork.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix-qa-frontpage/patchwork.scm b/guix-qa-frontpage/patchwork.scm index 06d18e4..e1ee24f 100644 --- a/guix-qa-frontpage/patchwork.scm +++ b/guix-qa-frontpage/patchwork.scm @@ -194,7 +194,9 @@ (define (strip-title-prefix str) (if (string-prefix? "[" str) (let ((start (string-index str #\]))) - (string-drop str (+ 1 start))) + (if start + (string-drop str (+ 1 start)) + str)) str)) (define issue-number-to-series-hash-table |