aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2021-01-03 12:50:07 +0000
committerChristopher Baines <mail@cbaines.net>2021-01-03 12:50:07 +0000
commite3878fefb4184f3ad45a6e6f434767c0bf109db8 (patch)
tree181f98323b160f0ebb0b869536f393b3b9d8b4c2 /guix-data-service
parent7b662536397dc83cd7ff5c296ca30bb9b5da1520 (diff)
downloaddata-service-e3878fefb4184f3ad45a6e6f434767c0bf109db8.tar
data-service-e3878fefb4184f3ad45a6e6f434767c0bf109db8.tar.gz
Fix a regression in the metrics page
From the squee NULL handling change.
Diffstat (limited to 'guix-data-service')
-rw-r--r--guix-data-service/metrics.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/guix-data-service/metrics.scm b/guix-data-service/metrics.scm
index 16d7fb9..7af8924 100644
--- a/guix-data-service/metrics.scm
+++ b/guix-data-service/metrics.scm
@@ -78,9 +78,9 @@ LEFT JOIN pg_tablespace ON tablespace_id = pg_tablespace.oid")
((name tablespace row-estimate table-bytes toast-bytes)
(list name
tablespace
- (or (string->number row-estimate) 0)
- (or (string->number table-bytes) 0)
- (or (string->number toast-bytes) 0))))
+ (or (string->number (or row-estimate "")) 0)
+ (or (string->number (or table-bytes "")) 0)
+ (or (string->number (or toast-bytes "")) 0))))
(exec-query conn query)))
(define (fetch-pg-stat-user-tables-metrics conn)