The previous patch caused a small build issue on some configurations
which probably does not affect debian. A corrected patch is attached now.

Regards,
Benjamin
diff --git a/perllib/Polymake/Configure.pm b/perllib/Polymake/Configure.pm
index 8f87e49..f890ac8 100644
--- a/perllib/Polymake/Configure.pm
+++ b/perllib/Polymake/Configure.pm
@@ -288,13 +288,15 @@ sub write_config_command_line {
    my ($conf, $options, $allowed_with, $vars, $ext_failed)=@_;
 
    if (defined $vars) {
-      while (my ($item, $value)=each %$vars) {
+      foreach my $item (sort keys %$vars) {
+         my $value = $vars->{$item};
          $value="'$value'" if $value =~ /[\s(){}\[\]\$]/;
          print $conf " $item=$value";
       }
    }
 
-   while (my ($item, $value)=each %$options) {
+   foreach my $item (sort keys %$options) {
+      my $value = $options->{$item};
       if ($value eq ".none.") {
          unless ($ext_failed && $ext_failed->{$item}) {
             print $conf " --without-$item";
diff --git a/support/configure.pl b/support/configure.pl
index 25006f8..73cee9e 100644
--- a/support/configure.pl
+++ b/support/configure.pl
@@ -856,7 +856,7 @@ my @ext_ordered;
 my %ext_unordered=map { ($_ => 1) } grep { $options{$_} ne ".none." } @ext;
 while (keys %ext_unordered) {
    my $progress=@ext_ordered;
-   while ((my $ext, undef)=each %ext_unordered) {
+   foreach my $ext (sort keys %ext_unordered) {
       unless ($ext_requires{$ext} && grep { $ext_unordered{$_} } @{$ext_requires{$ext}}
                 or
               $ext_conflicts{$ext} && grep { $ext_unordered{$_} } @{$ext_conflicts{$ext}}) {

Reply via email to