diff options
author | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2009-12-01 20:35:37 +0100 |
---|---|---|
committer | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2009-12-01 20:35:37 +0100 |
commit | c44e70ba8b1a268f3e537e730fc4166b48707be4 (patch) | |
tree | 795f03aa7620a54aecdea0448df870adb1990cd2 /src | |
parent | f5384e034424601bb9d0d1442541e773e0160b9e (diff) |
Sort the student list by name.
Diffstat (limited to 'src')
-rw-r--r-- | src/logikorr/servlet.clj | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/logikorr/servlet.clj b/src/logikorr/servlet.clj index 79ff1e0..7160f1f 100644 --- a/src/logikorr/servlet.clj +++ b/src/logikorr/servlet.clj @@ -43,7 +43,9 @@ (ds/create {:kind "revision" :number 0}))) (defn find-students [] - (ds/find-all (doto (Query. "student" (:key (current-revision)))))) + (ds/find-all (doto (Query. "student" (:key (current-revision))) + (.addSort "last-name") + (.addSort "first-name")))) (defn position [coll thing] (loop [i 0, |