Mercurial > hg > amuse

diff implementations/midi-db/db-select-functions.lisp @ 315:d1ff5dad3f8d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Improve printing of list-collections. Ignore-this: 3073e6c1462cf98ca5752179ab6ecb1d darcs-hash:20100414191443-16a00-e2f9962b0cea652890be18297fdbd4bf7d533c84.gz
author j.forth <j.forth@gold.ac.uk>
date Wed, 14 Apr 2010 20:14:43 +0100
parents f99fd6a7bbfc
children
line wrap: on
line diff
--- a/implementations/midi-db/db-select-functions.lisp	Wed Apr 14 19:52:57 2010 +0100
+++ b/implementations/midi-db/db-select-functions.lisp	Wed Apr 14 20:14:43 2010 +0100
@@ -74,6 +74,7 @@
   #.(clsql:locally-enable-sql-reader-syntax)
   (let ((header-rows (clsql:select
 		      [collection-id]
+		      [composition-id]
 		      [filename]
 		      [timebase]
 		      [start]
@@ -94,6 +95,7 @@
   #.(clsql:locally-enable-sql-reader-syntax)
   (let ((header-rows (clsql:select
 		      [collection-id]
+		      [composition-id]
 		      [filename]
 		      [timebase]
 		      [start]