One more 'simple' Perl module, more rewriting of standard paths,

but there are yet some to correct.

slapos/recipe/mioga/instantiate.py

@@ -60,6 +60,8 @@ class Recipe(GenericBaseRecipe):
     fm.modify('maildir', os.path.join(vardir, 'spool', 'mioga', 'maildir'))
     fm.modify('maildirerror', os.path.join(vardir, 'spool', 'mioga', 'error'))
     fm.modify('mailfifo', os.path.join(vardir, 'spool', 'mioga', 'fifo'))
+    fm.modify('notifierfifo', os.path.join(vardir, 'spool', 'mioga', 'notifier'))
+    fm.modify('searchenginefifo', os.path.join(vardir, 'spool', 'mioga', 'searchengine'))
     fm.modify('dbi_passwd', self.options['db_password'])
     fm.modify('db_host', self.options['db_host'])
     fm.modify('db_port', self.options['db_port'])

software/mioga/mioga-hooks.py

 
-# import fnmatch
+import fnmatch
 import grp
 import os
 import pprint
@@ -48,6 +48,19 @@ def pre_configure_hook(options, bo, env):
 
   # TODO: mail settings are certainly wrong, what is the domain name?
 
+  # Correct shebangs to the right Perl
+  for root, dirnames, filenames in os.walk('.'):
+    for filename in fnmatch.filter(filenames, '*.pl'):
+      with open(os.path.join(root, filename), "r+") as f:
+        lines = f.readlines()
+        (lines[0], count) = re.subn(r'^#!/usr/bin/perl',
+                                    '#!' + options['perl-binary'],
+                                    lines[0], 1)
+        if count > 0:
+          f.seek(0)
+          f.writelines(lines)
+          print "Corrected interpreter for script "+filename
+
 
 
 # def post_make_hook(options, buildout):

software/mioga/software.cfg

@@ -58,6 +58,7 @@ modules =
   P/PA/PARDUS/File-MimeInfo/File-MimeInfo-0.16.tar.gz
   O/OV/OVID/HTML-TokeParser-Simple-3.15.tar.gz
   D/DS/DSKOLL/MIME-tools-5.503.tar.gz
+  D/DS/DSKOLL/IO-stringy-2.110.tar.gz
   C/CO/COSIMO/HTTP-DAV-0.47.tar.gz
   M/MA/MARSCHAP/perl-ldap-0.48.tar.gz
   F/FD/FDESAR/Parse-Yapp-1.05.tar.gz
@@ -102,6 +103,7 @@ pre-configure-hook = ${mioga-hooks:location}/${mioga-hooks:filename}:pre_configu
 configure-command =
   ${perl:location}/bin/perl Makefile.PL
 keep-compile-dir = true
+perl-binary = ${perl:location}/bin/perl
 
 [mioga-patch]
 recipe = hexagonit.recipe.download