Sun Jun 21 18:12:57 2009: Request 47209 was acted upon.
Transaction: Correspondence added by [email protected]
       Queue: Module-ScanDeps
     Subject: Re: [rt.cpan.org #47209] Missing dependencies with Tk::Widget ->  
setPalette() (patch)
   Broken in: 0.90
    Severity: (no value)
       Owner: Nobody
  Requestors: [email protected]
      Status: new
 Ticket <URL: http://rt.cpan.org/Ticket/Display.html?id=47209 >


On Sun, Jun 21, 2009 at 1:05 PM, Lamprecht Christoph via RT
<[email protected]> wrote:
> M::SD misses some dependencies in the Tk Library. This is due to Tk's
> dynamically loading of some of the core widgets in this case, which
> hides their constructor from M::SD.
> Patch attached.

Reading the source of setPalette (in Tk/Widget.pm) this patch
misses a few widgets. It should look like:

@@ -813,6 +813,12 @@
                 push @modules, "Tk/$1.pm";
                 push @modules, "Tk/Scrollbar.pm";
             }
+            if (/->\s*setPalette/g) {
+                push @modules, map { "Tk/$_pm" } qw(Button Canvas
Checkbutton Entry
+
    Frame Label Labelframe Listbox
+
    Menubutton Menu Message Radiobutton
+
    Scale Scrollbar Spinbox Text)
+            }
             return \...@modules;
         }
         return;


Cheers, Roderich

Reply via email to