Index: openacs-4/packages/acs-kernel/acs-kernel.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/acs-kernel.info,v diff -u -N -r1.150.2.5 -r1.150.2.6 --- openacs-4/packages/acs-kernel/acs-kernel.info 22 Feb 2019 18:21:58 -0000 1.150.2.5 +++ openacs-4/packages/acs-kernel/acs-kernel.info 23 Feb 2019 13:03:40 -0000 1.150.2.6 @@ -9,15 +9,15 @@ f t - + OpenACS Core Team Routines and data models providing the foundation for OpenACS-based Web services. 2017-08-06 OpenACS The OpenACS kernel contains the core datamodel create and drop scripts for such things as objects, groups, parties and the supporting PL/SQL and PL/pgSQL procedures. 3 - + Index: openacs-4/packages/acs-kernel/sql/oracle/community-core-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/oracle/community-core-create.sql,v diff -u -N -r1.19.10.1 -r1.19.10.2 --- openacs-4/packages/acs-kernel/sql/oracle/community-core-create.sql 22 Feb 2019 18:21:58 -0000 1.19.10.1 +++ openacs-4/packages/acs-kernel/sql/oracle/community-core-create.sql 23 Feb 2019 13:03:40 -0000 1.19.10.2 @@ -601,7 +601,6 @@ check (prefer_text_only_p in ('t','f')), -- an ISO 639 language code (in lowercase) language_preference char(2) default 'en', - public_avatar_p char(1) default 'f', dont_spam_me_p char(1) default 'f' constraint user_prefs_dont_spam_me_p_ck check (dont_spam_me_p in ('t','f')), Index: openacs-4/packages/acs-kernel/sql/oracle/upgrade/upgrade-5.10.0d12-5.10.0d13.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/oracle/upgrade/Attic/upgrade-5.10.0d12-5.10.0d13.sql,v diff -u -N --- openacs-4/packages/acs-kernel/sql/oracle/upgrade/upgrade-5.10.0d12-5.10.0d13.sql 22 Feb 2019 18:21:58 -0000 1.1.2.3 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,10 +0,0 @@ --- --- Upgrade script from 5.10.0d12 to 5.10.0d13 --- --- @author Hector Romojaro (hector.romojaro@gmail.com) --- --- @cvs-id $Id: upgrade-5.10.0d12-5.10.0d13.sql,v 1.1.2.3 2019/02/22 18:21:58 hectorr Exp $ --- - --- Add public_avatar_p preference to user_preferences table -alter table user_preferences add public_avatar_p char(1) default 'f'; Index: openacs-4/packages/acs-kernel/sql/postgresql/community-core-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/postgresql/community-core-create.sql,v diff -u -N -r1.29.6.1 -r1.29.6.2 --- openacs-4/packages/acs-kernel/sql/postgresql/community-core-create.sql 22 Feb 2019 18:21:58 -0000 1.29.6.1 +++ openacs-4/packages/acs-kernel/sql/postgresql/community-core-create.sql 23 Feb 2019 13:03:40 -0000 1.29.6.2 @@ -667,7 +667,6 @@ -- an ISO 639 language code (in lowercase) language_preference char(2) default 'en', dont_spam_me_p boolean default 'f', - public_avatar_p boolean default 'f', email_type varchar(64), timezone varchar(100) ); Index: openacs-4/packages/acs-kernel/sql/postgresql/upgrade/upgrade-5.10.0d12-5.10.0d13.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/postgresql/upgrade/Attic/upgrade-5.10.0d12-5.10.0d13.sql,v diff -u -N --- openacs-4/packages/acs-kernel/sql/postgresql/upgrade/upgrade-5.10.0d12-5.10.0d13.sql 22 Feb 2019 18:21:58 -0000 1.1.2.3 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,10 +0,0 @@ --- --- Upgrade script from 5.10.0d12 to 5.10.0d13 --- --- @author Hector Romojaro (hector.romojaro@gmail.com) --- --- @cvs-id $Id: upgrade-5.10.0d12-5.10.0d13.sql,v 1.1.2.3 2019/02/22 18:21:58 hectorr Exp $ --- - --- Add public_avatar_p preference to user_preferences table -alter table user_preferences add public_avatar_p boolean default 'f'; Index: openacs-4/packages/acs-subsite/tcl/avatar-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/Attic/avatar-procs.tcl,v diff -u -N --- openacs-4/packages/acs-subsite/tcl/avatar-procs.tcl 22 Feb 2019 18:21:58 -0000 1.1.2.1 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,38 +0,0 @@ -ad_library { - - Tcl API for avatars (user profile pictures) - - @author Hector Romojaro (hector.romojaro@gmail.com) -} - -namespace eval avatar {} - -ad_proc -public avatar::get_public_p { - -user_id:required -} { - Returns the 'public_avatar_p' field from the user_preferences table - - @param user_id User ID -} { - return [db_string get_public_avatar_p {}] -} - -ad_proc -public avatar::set_public_p { - -user_id:required - -value:required -} { - Changes the 'public_avatar_p' field from the user_preferences table - - @param user_id User ID - @param value New value -} { - db_transaction { - db_dml update_public_avatar_p {} - } -} - -# Local variables: -# mode: tcl -# tcl-indent-level: 4 -# indent-tabs-mode: nil -# End: Index: openacs-4/packages/acs-subsite/tcl/avatar-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/Attic/avatar-procs.xql,v diff -u -N --- openacs-4/packages/acs-subsite/tcl/avatar-procs.xql 22 Feb 2019 18:21:58 -0000 1.1.2.1 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,25 +0,0 @@ - - - - - - - update user_preferences - set public_avatar_p = :value - where user_id = :user_id - - - - - - - - - select public_avatar_p - from user_preferences - where user_id = :user_id - - - - -