Index: openacs-4/packages/file-storage/tcl/file-storage-callback-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/tcl/file-storage-callback-procs.tcl,v diff -u -r1.11.2.2 -r1.11.2.3 --- openacs-4/packages/file-storage/tcl/file-storage-callback-procs.tcl 2 Jan 2016 20:13:29 -0000 1.11.2.2 +++ openacs-4/packages/file-storage/tcl/file-storage-callback-procs.tcl 1 Nov 2016 17:17:14 -0000 1.11.2.3 @@ -60,8 +60,8 @@ } { # We probably don't need the whole big query here. TODO: Review. - db_0or1row fs_datasource {} -column_array datasource - + db_0or1row dbqd.file-storage.tcl.file-storage-callback-procs.fs_datasource {} -column_array datasource + return [list object_id $object_id \ title $datasource(title) \ content $datasource(content) \