Index: openacs-4/packages/forums/lib/message/attachment-list.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/lib/message/attachment-list.tcl,v diff -u -N -r1.8.2.10 -r1.8.2.11 --- openacs-4/packages/forums/lib/message/attachment-list.tcl 18 Jul 2019 15:56:06 -0000 1.8.2.10 +++ openacs-4/packages/forums/lib/message/attachment-list.tcl 21 Oct 2022 08:40:22 -0000 1.8.2.11 @@ -17,7 +17,7 @@ # Only if the user can edit a message, which currently requires admin privileges # set detach_p [permission::permission_p -object_id $message(message_id) -privilege admin] -set detach_icon "/resources/acs-subsite/Delete16.gif" +set detach_icon trash # # Get the attachments # @@ -32,7 +32,7 @@ # # URL # - set icon "/resources/acs-subsite/url-button.gif" + set icon link # # Avoid redirecting to external hosts made by "go-to-attachment" by just linking the original URL # @@ -43,7 +43,7 @@ # a 'content_revision' or a subtype of them. # set object_type [acs_object_type $id] - set icon "/resources/acs-subsite/attach.png" + set icon paperclip if {[content::item::is_subclass \ -object_type $object_type \ -supertype "content_item"]} {