aboutsummaryrefslogtreecommitdiff
path: root/gn/data/group.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gn/data/group.scm')
-rw-r--r--gn/data/group.scm5
1 files changed, 5 insertions, 0 deletions
diff --git a/gn/data/group.scm b/gn/data/group.scm
index 3d31a0b..014b689 100644
--- a/gn/data/group.scm
+++ b/gn/data/group.scm
@@ -10,6 +10,7 @@
#:export (
get-group-links
+ get-group-data
))
(define (get-group-links gnid func)
@@ -22,3 +23,7 @@
(func (car r))
#f)) recs)
))
+
+(define (get-group-data id)
+ (car (cdr (make-pairs (lambda () (sparql-group-info (string-append "gn:" id))))
+ )))