Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v diff -u -r1.80 -r1.81 --- openacs-4/packages/xowiki/tcl/includelet-procs.tcl 12 Dec 2008 13:39:19 -0000 1.80 +++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl 16 Dec 2008 09:26:44 -0000 1.81 @@ -2277,7 +2277,6 @@ -package_id -method -link - -src -alt -title -return_url @@ -2288,7 +2287,6 @@ set html "" if {![info exists return_url] || $return_url eq ""} {set return_url [$package_id url]} if {![info exists alt]} {set alt $method} - if {![info exists src]} {set src [my set src]} if {![info exists link] || $link eq ""} { if {[$page istype ::xowiki::Package]} { set link [$package_id make_link $package_id edit-new object_type \ @@ -2300,7 +2298,8 @@ } } if {$link ne ""} { - set html "\"$alt\"" + set button_class [namespace tail [my info class]] + set html "" } return $html } @@ -2329,15 +2328,13 @@ } return [my render_button \ -page $page -method edit -package_id $package_id \ - -title $title -alt $alt -return_url $return_url \ - -src /resources/acs-subsite/Edit16.gif] + -title $title -alt $alt -return_url $return_url] } ::xowiki::IncludeletClass create delete-item-button \ -superclass ::xowiki::includelet::item-button \ -parameter { {__decoration none} - {src /resources/acs-subsite/Delete16.gif} {parameter_declaration { {-page_id} {-title "#xowiki.delete#"} @@ -2360,7 +2357,6 @@ -superclass ::xowiki::includelet::item-button \ -parameter { {__decoration none} - {src /resources/acs-subsite/Zoom16.gif} {parameter_declaration { {-page_id} {-title "#xowiki.view#"} @@ -2385,7 +2381,6 @@ -superclass ::xowiki::includelet::item-button \ -parameter { {__decoration none} - {src /resources/acs-subsite/Add16.gif} {parameter_declaration { {-page_id} {-alt "new"} @@ -2419,7 +2414,6 @@ ::xowiki::IncludeletClass create copy-item-button -superclass ::xowiki::includelet::item-button \ -parameter { {__decoration none} - {src /resources/acs-subsite/Copy16.gif} {parameter_declaration { {-page_id} {-alt "copy"} @@ -3283,4 +3277,5 @@ append content "

$title

" return $content } + }