simplify some shell code
[invirt/packages/invirt-xen-config.git] / debian / transform_xend-config.sxp.invirt.mako
1 #!/usr/bin/perl -0n
2 print <<'EOF';
3 <%
4 from invirt.config import structs as cfg
5 import os
6 hostname = os.uname()[1]
7 %>
8 EOF
9
10 s/^\#?\(xend-relocation-address ''\)/(xend-relocation-address '\${hostname}-internal')/m or die;
11 s/^\(xend-relocation-hosts-allow '[^']*'\)/(xend-relocation-hosts-allow '')/m or die;
12 s/^\(dom0-min-mem [0-9]*\)/(dom0-min-mem 1536)/m or die;
13 print;