Index: openacs-4/packages/dotlrn-homework/www/folder-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/folder-chunk.tcl,v diff -u -r1.2.2.2.4.1 -r1.2.2.2.4.2 --- openacs-4/packages/dotlrn-homework/www/folder-chunk.tcl 30 Aug 2004 16:44:55 -0000 1.2.2.2.4.1 +++ openacs-4/packages/dotlrn-homework/www/folder-chunk.tcl 3 Sep 2004 13:30:46 -0000 1.2.2.2.4.2 @@ -60,6 +60,16 @@ set qualify_by_owner [db_map qualify_by_owner] } +#AG: In Oracle this query is a seemingly nonsensical "select 2 from dual". +#The problem is, the db logic in PG is completely different and requires a query. +#To avoid propagating these differences up to Tcl we use a query in Oracle too. +if {![exists_and_not_null min_level]} { + set min_level [db_string select_default_min_level {}] +} +if {![exists_and_not_null max_level]} { + set max_level $min_level +} + # If all the files belong to a single user we won't show the name of the user # who has created the file. set show_users_p 0