Index: openacs-4/packages/acs-authentication/acs-authentication.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/acs-authentication.info,v diff -u -N -r1.7 -r1.8 --- openacs-4/packages/acs-authentication/acs-authentication.info 24 Oct 2003 16:44:19 -0000 1.7 +++ openacs-4/packages/acs-authentication/acs-authentication.info 28 Oct 2003 16:37:19 -0000 1.8 @@ -18,13 +18,14 @@ - + + Index: openacs-4/packages/acs-authentication/tcl/sync-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-authentication/tcl/sync-procs.tcl,v diff -u -N -r1.25 -r1.26 --- openacs-4/packages/acs-authentication/tcl/sync-procs.tcl 24 Oct 2003 16:44:19 -0000 1.25 +++ openacs-4/packages/acs-authentication/tcl/sync-procs.tcl 28 Oct 2003 16:37:20 -0000 1.26 @@ -356,12 +356,14 @@ } else { set user_id $result(user_id) - set dotlrn_urls [site_node::get_children \ - -package_key "dotlrn" \ - -node_id [site_node::get_node_id -url /]] + set add_to_dotlrn_p [parameter::get_from_package_key \ + -parameter SyncAddUsersToDotLrnP \ + -package_key "acs-authentication" \ + -default 0] - if { [llength $dotlrn_urls] > 0 } { - # .LRN is installed and mounted, add user to .LRN + if { $add_to_dotlrn_p } { + # Add user to .LRN + # Beware that this creates a portal and lots of other things for each user set type [parameter::get_from_package_key \ -parameter SyncDotLrnUserType \