[svn:parrot] r42300 - in branches/convert_OSNAME/config: auto gen

jkeenan at svn.parrot.org jkeenan at svn.parrot.org
Fri Nov 6 04:02:01 UTC 2009


Author: jkeenan
Date: Fri Nov  6 04:01:51 2009
New Revision: 42300
URL: https://trac.parrot.org/parrot/changeset/42300

Log:
Convert two configuration steps from 'get_p5('OSNAME')' to 'get('osname')'.

Modified:
   branches/convert_OSNAME/config/auto/thread.pm
   branches/convert_OSNAME/config/gen/opengl.pm

Modified: branches/convert_OSNAME/config/auto/thread.pm
==============================================================================
--- branches/convert_OSNAME/config/auto/thread.pm	Fri Nov  6 03:41:10 2009	(r42299)
+++ branches/convert_OSNAME/config/auto/thread.pm	Fri Nov  6 04:01:51 2009	(r42300)
@@ -44,7 +44,7 @@
         return 1;
     }
 
-    if ($conf->data->get_p5('OSNAME') eq 'MSWin32'
+    if ($conf->data->get('osname') eq 'MSWin32'
      || $conf->data->get('i_pthread') eq 'define') {
         $conf->data->set( HAS_THREADS => 1 );
         $self->set_result('yes');

Modified: branches/convert_OSNAME/config/gen/opengl.pm
==============================================================================
--- branches/convert_OSNAME/config/gen/opengl.pm	Fri Nov  6 03:41:10 2009	(r42299)
+++ branches/convert_OSNAME/config/gen/opengl.pm	Fri Nov  6 04:01:51 2009	(r42300)
@@ -437,7 +437,7 @@
 
     my @include_paths_win32 = grep /\S/ => split /;/ => ($ENV{INCLUDE} || '');
 
-    my $osname = $conf->data->get_p5('OSNAME');
+    my $osname = $conf->data->get('osname');
     if (scalar @include_paths_win32 == 0 && $osname =~ /mswin32/i) {
         my $cc = $conf->data->get('cc');
         my $path = dirname(dirname(which($cc))) . '\include';


More information about the parrot-commits mailing list