diff gub/specs/guile.py @ 3890:0a85f8006a68

Defer dumping and chmodding of guile-config.
author Jan Nieuwenhuizen <janneke@gnu.org>
date Mon, 24 Sep 2007 20:34:41 +0200
parents caa0b56e5b6c
children 8da563bb9820
line wrap: on
line diff
--- a/gub/specs/guile.py	Mon Sep 24 20:34:12 2007 +0200
+++ b/gub/specs/guile.py	Mon Sep 24 20:34:41 2007 +0200
@@ -120,10 +120,12 @@
                    '%(install_prefix)s/etc/relocate/guile.reloc',
                    env=locals())
         
-        ## can't assume that /usr/bin/guile is the right one.
-        version = self.read_pipe ('''\
+        if 0:
+            version = self.read_pipe ('''\
 GUILE_LOAD_PATH=%(install_prefix)s/share/guile/* guile -e main -s  %(install_prefix)s/bin/guile-config --version 2>&1\
 ''').split ()[-1]
+        print 'FIXME: should defer read_pipe to get version?'
+        version = self.expand ('%(version)s')
 	#FIXME: c&p linux.py
         self.dump ('''\
 #! /bin/sh
@@ -137,10 +139,8 @@
 exit 0
 ''',
              '%(install_prefix)s/cross/bin/%(target_architecture)s-guile-config')
-        os.chmod ('%(install_prefix)s/cross/bin/%(target_architecture)s-guile-config' % self.get_substitution_dict (), 0755)
+        self.chmod ('%(install_prefix)s/cross/bin/%(target_architecture)s-guile-config', 0755)
 
-
-    
 class Guile__mingw (Guile):
     def __init__ (self, settings):
         Guile.__init__ (self, settings)