patch-wml_include_des_imgdot_src 650 B

12345678910111213141516171819202122
  1. $OpenBSD: patch-wml_include_des_imgdot_src,v 1.1.1.1 2006/07/14 16:12:14 bernd Exp $
  2. --- wml_include/des/imgdot.src.orig Fri Jun 16 00:49:02 2006
  3. +++ wml_include/des/imgdot.src Fri Jun 16 00:49:15 2006
  4. @@ -13,7 +13,7 @@
  5. <protect pass=2>
  6. <:
  7. -use WML::GD;
  8. +use GD;
  9. # general function for creating a dot image
  10. sub imgdot {
  11. @@ -39,7 +39,7 @@ sub imgdot {
  12. # create image if it does not still exist
  13. if (not -f $file) {
  14. - $im = new WML::GD::Image($x, $y);
  15. + $im = new GD::Image($x, $y);
  16. $col = $im->colorAllocate($r, $g, $b);
  17. $im->transparent($col) if $transp;
  18. eval "\$data = \$im->$format";