Index: openacs-4/packages/acs-subsite/tcl/package-procs-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/package-procs-postgresql.xql,v diff -u -r1.20.2.2 -r1.20.2.3 --- openacs-4/packages/acs-subsite/tcl/package-procs-postgresql.xql 28 Oct 2015 09:38:34 -0000 1.20.2.2 +++ openacs-4/packages/acs-subsite/tcl/package-procs-postgresql.xql 13 Jun 2016 07:44:32 -0000 1.20.2.3 @@ -38,13 +38,13 @@ - select case when exists (select 1 - from user_objects - where status = 'INVALID' - and object_name = upper(:package_name) - and object_type = upper(:type)) - then 0 else 1 end - +-- select case when exists (select 1 +-- from user_objects +-- where status = 'INVALID' +-- and object_name = upper(:package_name) +-- and object_type = upper(:type)) +-- then 0 else 1 end + select 1 from dual; Index: openacs-4/packages/acs-subsite/tcl/package-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/package-procs.tcl,v diff -u -r1.26.2.4 -r1.26.2.5 --- openacs-4/packages/acs-subsite/tcl/package-procs.tcl 2 Jan 2016 13:47:26 -0000 1.26.2.4 +++ openacs-4/packages/acs-subsite/tcl/package-procs.tcl 13 Jun 2016 07:44:32 -0000 1.26.2.5 @@ -308,6 +308,14 @@ db_exec_plsql $stmt_name $code # Let's check to make sure the package is valid + # + # This seems to be a speciality in Oracle: The status of a + # program unit (PL/SQL package, procedure, or function) is set + # to INVALID if a database object on which it depends is + # changed. That program unit must then be recompiled (which + # Oracle Database will often do automatically the next time + # you try to use that program unit). + # if { ![db_string package_valid_p {}] } { error "$object_type \"$package_name\" is not valid after compiling:\n\n$code\n\n" } @@ -396,7 +404,7 @@ object_type } { Resets the cached views for all chains (e.g. all variations of - start_with in package_object_view) for the specified object type. + start_with in package_object_view) for the specified object type. @author Michael Bryzek (mbryzek@arsdigita.com) @creation-date 12/2000