Index: openacs-4/packages/xowiki/tcl/menu-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/menu-procs.tcl,v diff -u -N -r1.19.2.19 -r1.19.2.20 --- openacs-4/packages/xowiki/tcl/menu-procs.tcl 20 Aug 2022 15:44:00 -0000 1.19.2.19 +++ openacs-4/packages/xowiki/tcl/menu-procs.tcl 22 Aug 2022 17:06:40 -0000 1.19.2.20 @@ -497,7 +497,7 @@ entry { # sample entry: entry -name New.YouTubeLink -label YouTube -form en:YouTube.form if {$kind eq "form_link"} { - ad_log warning "$me, name 'form_link' is deprecated, use 'entry' instead" + ad_log_deprecated menu-entry $link entry } if {[dict exists $properties -link]} { set link [dict get $properties -link]