Index: openacs-4/packages/acs-content-repository/tcl/image-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/image-procs.tcl,v diff -u -r1.9.4.1 -r1.9.4.2 --- openacs-4/packages/acs-content-repository/tcl/image-procs.tcl 8 Sep 2014 07:24:35 -0000 1.9.4.1 +++ openacs-4/packages/acs-content-repository/tcl/image-procs.tcl 8 Sep 2014 07:58:50 -0000 1.9.4.2 @@ -220,7 +220,7 @@ Find imagemagick identify binary @author Dave Bauer (dave@solutiongrove.com) - @creation_date 2006-08-27 + @creation-date 2006-08-27 } { # FIXME create parameter return [parameter::get \ @@ -234,7 +234,7 @@ Find imagemagick convert binary @author Dave Bauer (dave@solutiongrove.com) - @creation_date 2006-08-27 + @creation-date 2006-08-27 } { #FIXME create parameter return [parameter::get \ @@ -254,7 +254,7 @@ @return List in array get format with names of width and height @author Dave Bauer (dave@solutiongrove.com) - @creation_date 2006-08-27 + @creation-date 2006-08-27 } { switch -- \ [image::filename_mime_type \ @@ -284,7 +284,7 @@ @param mime_type If known, the mime type of the file @author Dave Bauer (dave@thedesignexperience.org) - @creation_date 2006-08-27 + @creation-date 2006-08-27 } { if {$mime_type eq ""} { set mime_type [ns_guesstype $filename]