Index: openacs-4/packages/dotlrn/www/admin/class-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/Attic/class-oracle.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/dotlrn/www/admin/class-oracle.xql	22 Jul 2002 16:28:31 -0000	1.1
@@ -0,0 +1,18 @@
+<?xml version="1.0"?>
+
+<queryset>
+    <rdbms><type>oracle</type><version>8.1.6</version></rdbms>
+
+    <fullquery name="select_terms_for_select_widget">
+        <querytext>
+    select dotlrn_terms.term_name || ' ' || dotlrn_terms.term_year,
+           dotlrn_terms.term_id
+    from dotlrn_terms
+    where dotlrn_terms.end_date > (sysdate - 360)
+    and dotlrn_terms.start_date < (sysdate + 360)
+    order by dotlrn_terms.start_date,
+             dotlrn_terms.end_date
+        </querytext>
+    </fullquery>
+
+</queryset>
Index: openacs-4/packages/dotlrn/www/admin/class-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/Attic/class-postgresql.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/dotlrn/www/admin/class-postgresql.xql	22 Jul 2002 16:28:31 -0000	1.1
@@ -0,0 +1,18 @@
+<?xml version="1.0"?>
+
+<queryset>
+    <rdbms><type>postgresql</type><version>7.1</version></rdbms>
+
+    <fullquery name="select_terms_for_select_widget">
+        <querytext>
+    select dotlrn_terms.term_name || ' ' || dotlrn_terms.term_year,
+           dotlrn_terms.term_id
+    from dotlrn_terms
+    where dotlrn_terms.end_date > (now() - 360)
+    and dotlrn_terms.start_date < (now() + 360)
+    order by dotlrn_terms.start_date,
+             dotlrn_terms.end_date
+        </querytext>
+    </fullquery>
+
+</queryset>
Index: openacs-4/packages/dotlrn/www/admin/class.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/class.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/dotlrn/www/admin/class.tcl	23 May 2002 23:36:33 -0000	1.13
+++ openacs-4/packages/dotlrn/www/admin/class.tcl	22 Jul 2002 16:28:31 -0000	1.14
@@ -39,15 +39,7 @@
 
 set description [ad_quotehtml $description]
 
-set terms [db_list_of_lists select_terms_for_select_widget {
-    select dotlrn_terms.term_name || ' ' || dotlrn_terms.term_year,
-           dotlrn_terms.term_id
-    from dotlrn_terms
-    where dotlrn_terms.end_date > (sysdate - 360)
-    and dotlrn_terms.start_date < (sysdate + 360)
-    order by dotlrn_terms.start_date,
-             dotlrn_terms.end_date
-}]
+set terms [db_list_of_lists select_terms_for_select_widget {}]
 set terms [linsert $terms 0 {All -1}]
 
 form create term_form