Index: openacs-4/packages/richtext-ckeditor4/tcl/richtext-init.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/richtext-ckeditor4/tcl/richtext-init.tcl,v diff -u -r1.2.2.1 -r1.2.2.2 --- openacs-4/packages/richtext-ckeditor4/tcl/richtext-init.tcl 9 Feb 2020 15:48:07 -0000 1.2.2.1 +++ openacs-4/packages/richtext-ckeditor4/tcl/richtext-init.tcl 19 Jul 2024 11:46:20 -0000 1.2.2.2 @@ -1,5 +1,21 @@ template::util::richtext::register_editor ckeditor4 +if {[apm_package_installed_p xowiki]} { + # + # We become the preferred richtext editor for xowiki, if none was + # chosen so far. + # + set preferred_editor [::parameter::get_global_value \ + -package_key xowiki \ + -parameter PreferredRichtextEditor] + if {$preferred_editor eq ""} { + ::parameter::set_global_value \ + -package_key xowiki \ + -parameter PreferredRichtextEditor \ + -value "ckeditor4" + } +} + # Local variables: # mode: tcl # tcl-indent-level: 4 Index: openacs-4/packages/richtext-tinymce/tcl/richtext-init.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/richtext-tinymce/tcl/richtext-init.tcl,v diff -u -r1.2.2.1 -r1.2.2.2 --- openacs-4/packages/richtext-tinymce/tcl/richtext-init.tcl 9 Feb 2020 15:48:57 -0000 1.2.2.1 +++ openacs-4/packages/richtext-tinymce/tcl/richtext-init.tcl 19 Jul 2024 11:46:20 -0000 1.2.2.2 @@ -1,5 +1,21 @@ template::util::richtext::register_editor tinymce +if {[apm_package_installed_p xowiki]} { + # + # We become the preferred richtext editor for xowiki, if none was + # chosen so far. + # + set preferred_editor [::parameter::get_global_value \ + -package_key xowiki \ + -parameter PreferredRichtextEditor] + if {$preferred_editor eq ""} { + ::parameter::set_global_value \ + -package_key xowiki \ + -parameter PreferredRichtextEditor \ + -value "tinymce" + } +} + # Local variables: # mode: tcl # tcl-indent-level: 4 Index: openacs-4/packages/richtext-xinha/tcl/richtext-init.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/richtext-xinha/tcl/richtext-init.tcl,v diff -u -r1.2.2.1 -r1.2.2.2 --- openacs-4/packages/richtext-xinha/tcl/richtext-init.tcl 9 Feb 2020 15:49:38 -0000 1.2.2.1 +++ openacs-4/packages/richtext-xinha/tcl/richtext-init.tcl 19 Jul 2024 11:46:20 -0000 1.2.2.2 @@ -1,5 +1,21 @@ template::util::richtext::register_editor xinha +if {[apm_package_installed_p xowiki]} { + # + # We become the preferred richtext editor for xowiki, if none was + # chosen so far. + # + set preferred_editor [::parameter::get_global_value \ + -package_key xowiki \ + -parameter PreferredRichtextEditor] + if {$preferred_editor eq ""} { + ::parameter::set_global_value \ + -package_key xowiki \ + -parameter PreferredRichtextEditor \ + -value "xinha" + } +} + # Local variables: # mode: tcl # tcl-indent-level: 4 Index: openacs-4/packages/xowiki/xowiki.info =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/xowiki.info,v diff -u -r1.180.2.124 -r1.180.2.125 --- openacs-4/packages/xowiki/xowiki.info 2 May 2024 14:06:47 -0000 1.180.2.124 +++ openacs-4/packages/xowiki/xowiki.info 19 Jul 2024 11:46:19 -0000 1.180.2.125 @@ -10,7 +10,7 @@ t xowiki - + Gustaf Neumann A xotcl-based enterprise wiki system with multiple object types 2023-07-11 @@ -55,15 +55,14 @@ BSD-Style 2 - + - @@ -83,7 +82,7 @@ - +