diff --git a/scripts/plot b/scripts/plot
index 9a68e96..b864047 100755
--- a/scripts/plot
+++ b/scripts/plot
@@ -38,7 +38,7 @@
     (for* ([day (in-range 1 26)] [level (in-range 1 3)])
       (match (hash-ref* val (list 'completion_day_level day level 'get_star_ts) #f)
         [#f (void)]
-        [(app string->number (? number? time))
+        [(? number? time)
          (hash-update! timeline time (lambda (v) (cons (tl-entry mid day level) v)) '())])))
 
   (define timestamps (sort (hash-keys timeline) <))