From 28c2d4608149b55d7547eab563e688814f3d7254 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Tue, 14 May 2019 07:55:17 +0100 Subject: Fix type issues with the location ids On one code path, they were handled as numbers, whereas elsewhere they were handled as strings. This led to the package-metadata code trying to insert duplicate entries. Instead, just handle them as strings everywhere. --- guix-data-service/model/location.scm | 16 +++++++--------- 1 file changed, 7 insertions(+), 9 deletions(-) (limited to 'guix-data-service/model/location.scm') diff --git a/guix-data-service/model/location.scm b/guix-data-service/model/location.scm index 1a01b9a..9850377 100644 --- a/guix-data-service/model/location.scm +++ b/guix-data-service/model/location.scm @@ -42,13 +42,11 @@ (list file (number->string line) (number->string column))) - (((id)) - (string->number id)) + (((id)) id) (() - (string->number - (caar - (exec-query conn - insert-location - (list file - (number->string line) - (number->string column)))))))))) + (caar + (exec-query conn + insert-location + (list file + (number->string line) + (number->string column))))))))) -- cgit v1.2.3