summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2019-06-18 22:56:18 +0200
committerRicardo Wurmus <rekado@elephly.net>2019-06-18 23:36:37 +0200
commit767f34bd68178af46d48d80a08d6258c71b45ce2 (patch)
treea3afa9b511fbcc9d7fe68fe0e481f4323477ebdd
parent9017b9fbc15178a1e6c4c50886c532df9a63328e (diff)
downloadcuirass-767f34bd68178af46d48d80a08d6258c71b45ce2.tar
cuirass-767f34bd68178af46d48d80a08d6258c71b45ce2.tar.gz
database: db-get-specifications: Order specs by name.
* src/cuirass/database.scm (db-get-specifications): Order rows by "name".
-rw-r--r--src/cuirass/database.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/cuirass/database.scm b/src/cuirass/database.scm
index be7ae8d..a0e6c63 100644
--- a/src/cuirass/database.scm
+++ b/src/cuirass/database.scm
@@ -353,7 +353,7 @@ package_path_inputs, proc_input, proc_file, proc, proc_args) \
(define (db-get-specifications)
(with-db-critical-section db
- (let loop ((rows (sqlite-exec db "SELECT * FROM Specifications;"))
+ (let loop ((rows (sqlite-exec db "SELECT * FROM Specifications ORDER BY name DESC;"))
(specs '()))
(match rows
(() specs)