[magick-users] imagick_type_gen enhancement

[T o n g]

On Thu, 08 Jan 2009 15:08:22 +1000, Anthony Thyssen wrote:

> | Decoupling the font list generation and font registration will
> eliminate | all the above problems and many more that I haven't listed.
> |
> Well I have not seen, and have not been able to find your actual code as
> yet.

The core patch is very minimum:

$ rcsdiff -u imagick_type_gen
--- imagick_type_gen    2009/01/02 23:16:03     1.1
+++ imagick_type_gen    2009/01/08 17:00:18
@@ -344,14 +344,16 @@
 #
 #  Miscellanous functions
 #
+my @fonts = <>;
+ at fonts = map { chomp; $_ } @fonts;
 sub locate {
   # This fails under MacOSX
   #return split('\0', `locate -0er '\\.$_[0]\$'`);
 
   # Use perl to 'glob' expand '?' in locate output on MacOSX
   return grep {  /\.$_[0]$/ && -f $_ }
-           map { glob "$_" }
-             split "\n", `locate '.$_[0]'`;
+           #map { glob "$_" } 
+            @fonts;
 }
 
 sub herefile {  # Handle a multi-line quoted indented string

Of course, the inline document need to be changed too. That's why I asked 
first.


-- 
Tong (remove underscore(s) to reply)
  http://xpt.sourceforge.net/techdocs/
  http://xpt.sourceforge.net/tools/