From 266b01adfd654dd1cf033d31419ff4d947ebff7c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Sat, 9 May 2020 05:17:38 +0200
Subject: Clean up util header.

---
 module/util.scm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/module/util.scm b/module/util.scm
index fb0e0063..0a51e5a5 100644
--- a/module/util.scm
+++ b/module/util.scm
@@ -3,10 +3,9 @@
   #:use-module (srfi srfi-88)           ; postfix keywords
   #:use-module ((ice-9 optargs) #:select (define*-public))
   #:use-module ((sxml fold) #:select (fold-values))
-  #:use-module (srfi srfi-9 gnu)
+  #:use-module ((srfi srfi-9 gnu) #:select (set-fields))
   #:re-export (define*-public)
-  #:export (for define-quick-record
-                mod! sort* sort*!
+  #:export (for mod! sort* sort*!
                 mod/r! set/r!
                 find-min
                 catch-multiple
-- 
cgit v1.2.3