Revision: 105606 https://trac.macports.org/changeset/105606 Author: devans@macports.org Date: 2013-04-27 10:45:56 -0700 (Sat, 27 Apr 2013) Log Message: ----------- glibmm: fix gmmproc perl compatibility issue (https://bugzilla.gnome.org/show_bug.cgi?id=698989) Modified Paths: -------------- trunk/dports/devel/glibmm/Portfile Added Paths: ----------- trunk/dports/devel/glibmm/files/ trunk/dports/devel/glibmm/files/patch-tools-pm-Output.pm.diff Modified: trunk/dports/devel/glibmm/Portfile =================================================================== --- trunk/dports/devel/glibmm/Portfile 2013-04-27 12:59:30 UTC (rev 105605) +++ trunk/dports/devel/glibmm/Portfile 2013-04-27 17:45:56 UTC (rev 105606) @@ -5,6 +5,7 @@ name glibmm version 2.36.0 +revision 1 set branch [join [lrange [split ${version} .] 0 1] .] description C++ interface to glib long_description \ @@ -21,9 +22,17 @@ sha256 59c54996cccc527f3a257964e7226151175c423f6fb22166e81d65a652f483f3 depends_build port:pkgconfig + depends_lib path:lib/pkgconfig/glib-2.0.pc:glib2 \ port:libsigcxx2 +# +# patch to fix gmmproc perl compatibility issue +# see https://bugzilla.gnome.org/show_bug.cgi?id=698989 +# + +patchfiles patch-tools-pm-Output.pm.diff + post-destroot { set mmdoctooldir ${prefix}/share/glibmm-2.4/doctool xinstall -d ${destroot}${mmdoctooldir} Added: trunk/dports/devel/glibmm/files/patch-tools-pm-Output.pm.diff =================================================================== --- trunk/dports/devel/glibmm/files/patch-tools-pm-Output.pm.diff (rev 0) +++ trunk/dports/devel/glibmm/files/patch-tools-pm-Output.pm.diff 2013-04-27 17:45:56 UTC (rev 105606) @@ -0,0 +1,23 @@ +--- tools/pm/Output.pm.orig 2013-04-26 15:53:11.000000000 -0700 ++++ tools/pm/Output.pm 2013-04-26 15:53:18.000000000 -0700 +@@ -1163,13 +1163,18 @@ + my $cpp_param_types = $$objCppfunc{param_types}; + my $c_param_types = $$objCDefsFunc{param_types}; + my $c_param_names = $$objCDefsFunc{param_names}; ++ my %c_param_mappings = $$objCppfunc{param_mappings}; + + # This variable stores the C++ parameter mappings from the C++ + # index to the C param name if the mappings exist. + my %cpp_index_param_mappings; + +- @cpp_index_param_mappings{values $$objCppfunc{param_mappings}} +- = keys $$objCppfunc{param_mappings}; ++ # Fill the index to param names mappings from the c param names to index ++ # mappings variable above. ++ while (my ($key, $val) = each %c_param_mappings) ++ { ++ $cpp_index_param_mappings{$val} = $key; ++ } + + my @result; +