diff options
Diffstat (limited to 'gn/data/group.scm')
-rw-r--r-- | gn/data/group.scm | 5 |
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)))) + ))) |