Bug 37291
| Summary: | gimp-perl should depend on perl-Gtk-Perl | ||
|---|---|---|---|
| Product: | [Retired] Red Hat Linux | Reporter: | Need Real Name <robertk> |
| Component: | gimp | Assignee: | Matt Wilson <msw> |
| Status: | CLOSED CURRENTRELEASE | QA Contact: | David Lawrence <dkl> |
| Severity: | low | Docs Contact: | |
| Priority: | medium | ||
| Version: | 7.1 | ||
| Target Milestone: | --- | ||
| Target Release: | --- | ||
| Hardware: | i386 | ||
| OS: | Linux | ||
| Whiteboard: | |||
| Fixed In Version: | Doc Type: | Bug Fix | |
| Doc Text: | Story Points: | --- | |
| Clone Of: | Environment: | ||
| Last Closed: | 2003-10-16 16:36:20 UTC | Type: | --- |
| Regression: | --- | Mount Type: | --- |
| Documentation: | --- | CRM: | |
| Verified Versions: | Category: | --- | |
| oVirt Team: | --- | RHEL 7.3 requirements from Atomic Host: | |
| Cloudforms Team: | --- | Target Upstream Version: | |
| Embargoed: | |||
I did my little investigation and here's the code responsible
for not installing menu entries for perl plug-ins.
gimp-1.2.1/plug-ins/perl/Gimp/Fu.pm lines 358-362:
# Gtk not installed -> do not install menu entry
if (@$params > $defargs) {
require Gimp::Feature;
undef $menupath unless Gimp::Feature::present('gtk');
}
gimp-perl requires: perl(Gtk) perl(Gtk::Atoms) perl(Gtk::Gdk) which is provided by Gtk-Perl |
From Bugzilla Helper: User-Agent: Mozilla/4.77 [en] (X11; U; Linux 2.4.2-3 i686) Most (all?) gimp-perl scripts open dialogs which requires the CPAN module Gtk-Perl to be installed. Since Gtk-Perl is now shipped on the DMA cd, perhaps gimp-perl can depend on the perl-Gtk-Perl rpm. Reproducible: Always Steps to Reproduce: 1.rpm -i gimp.rpm 2.rpm -i gimp-perl.rpm 3.run gimp 4. Add the following script to ~/gimp-1.2/plug-ins --- begin perl-test.pl --- #!/usr/bin/perl use Gimp qw(:auto __ N_); use Gimp::Fu; use Gimp::Util; use strict; Gimp::set_trace(TRACE_ALL); register "foo_bar", "Foo Bar", "Does nothing", "Me", "Copyright 2001 Mr Foo", "Apr 24 2001", __"<Toolbox>/Xtns/FooBar...", "RGB*", [ [ PF_TEXT, "text", "Text:", "Home" ], [ PF_FONT, "font", "Font:", "-*-Eras-*-r-*-*-24-*-*-*-p-*-*-*" ], [ PF_INT, "fontsize", "Font size:", "25"], [ PF_COLOR, "bgcolor", "Background Colour:", [222, 234, 234]] ], sub { # Code goes here. return(); }; exit main(); --- end perl-test.pl --- 5. Restart gimp and notice that "FooBar..." is not in the Xtns menu. 6. rpm -i perl-Gtk-Perl 7. Restart gimp and notice that "FooBar..." _is_ in the Xtns menu.