Index: openacs-4/contrib/obsolete-packages/postcard/sql/postgresql/postcard-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/postcard/sql/postgresql/postcard-create.sql,v diff -u -r1.2 -r1.3 --- openacs-4/contrib/obsolete-packages/postcard/sql/postgresql/postcard-create.sql 21 Aug 2001 22:15:43 -0000 1.2 +++ openacs-4/contrib/obsolete-packages/postcard/sql/postgresql/postcard-create.sql 3 Sep 2001 18:40:46 -0000 1.3 @@ -122,7 +122,7 @@ lob integer references lobs, mime_type varchar(100), title varchar(1000), - description varchar(4000) + description text ); -- to enable pg lob support see kernel/sql/postgresql/lobs.sql @@ -134,7 +134,7 @@ card_picture integer references postcard_images, recipient varchar(1000), sender varchar(1000), - message varchar(4000), + message text, pickup_code varchar(1000), picked_up date ); Index: openacs-4/packages/acs-admin/www/apm/packages-install.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/apm/packages-install.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/acs-admin/www/apm/packages-install.tcl 28 Aug 2001 23:51:53 -0000 1.3 +++ openacs-4/packages/acs-admin/www/apm/packages-install.tcl 3 Sep 2001 18:40:46 -0000 1.4 @@ -36,6 +36,7 @@ set version_name $version(name) set package_name $version(package-name) set package_key $version(package.key) +ns_log Notice "Huh? key: $version(package.key) name: $version(package-name) version: $version(name) [db_package_supports_rdbms_p $version(database_support)]" if { [db_package_supports_rdbms_p $version(database_support)] } { if { [apm_package_registered_p $package_key] } { if { [apm_higher_version_installed_p $package_key $version_name] } { Index: openacs-4/packages/acs-bootstrap-installer/bootstrap.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/bootstrap.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/acs-bootstrap-installer/bootstrap.tcl 29 Aug 2001 21:22:48 -0000 1.5 +++ openacs-4/packages/acs-bootstrap-installer/bootstrap.tcl 3 Sep 2001 18:40:46 -0000 1.6 @@ -129,14 +129,11 @@ } # Load *-procs.tcl and *-init.tcl files for enabled packages. - ns_log Notice "Loading Tcl library files..." apm_load_libraries -procs # Load up the Queries (OpenACS, ben@mit.edu) - ns_log Notice "Loading QUERIES!! OpenACS - ben" apm_load_queries - ns_log Notice "Loading Tcl Initialization files..." apm_load_libraries -init if { ![nsv_exists rp_properties request_count] } { Index: openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/00-database-procs.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl 19 Aug 2001 21:26:05 -0000 1.5 +++ openacs-4/packages/acs-tcl/tcl/00-database-procs.tcl 3 Sep 2001 18:40:46 -0000 1.6 @@ -28,9 +28,27 @@ if { [llength $db_type_list] == 0 || [lsearch $db_type_list [db_type]] != -1 } { return 1 } + + # DRB: Legacy package check - we allow installation of old aD Oracle 4.2 packages, + # though we don't guarantee that they work. + + if { [db_type] == "oracle" && [lsearch $db_type_list "oracle-8.1.6"] != -1 } { + return 1 + } + return 0 } +ad_proc db_legacy_package_p { db_type_list } { + Returns 1 if the package is a legacy package. We can only tell for certain if + it explicitly supports Oracle 8.1.6 rather than the OpenACS more general oracle. +} { + if { [lsearch $db_type_list "oracle-8.1.6"] != -1 } { + return 1 + } + return 0 +} + proc_doc db_version { } { Returns the RDBMS version (i.e. 8.1.6 is a recent Oracle version; 7.1 a recent PostgreSQL version. Index: openacs-4/packages/postcard/sql/postgresql/postcard-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/postcard/sql/postgresql/postcard-create.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/postcard/sql/postgresql/postcard-create.sql 21 Aug 2001 22:15:43 -0000 1.2 +++ openacs-4/packages/postcard/sql/postgresql/postcard-create.sql 3 Sep 2001 18:40:46 -0000 1.3 @@ -122,7 +122,7 @@ lob integer references lobs, mime_type varchar(100), title varchar(1000), - description varchar(4000) + description text ); -- to enable pg lob support see kernel/sql/postgresql/lobs.sql @@ -134,7 +134,7 @@ card_picture integer references postcard_images, recipient varchar(1000), sender varchar(1000), - message varchar(4000), + message text, pickup_code varchar(1000), picked_up date );