X-Git-Url: http://xvm.mit.edu/gitweb/invirt/packages/hvirt-config.git/blobdiff_plain/a2c125f2a1c7b8990c6350d2ea812b980512284c..64ff428d0ee4c14f4e154962a1b8ed4443390be3:/debian/hvirt-devconfig.postinst

diff --git a/debian/hvirt-devconfig.postinst b/debian/hvirt-devconfig.postinst
index b52fc9d..3deaf89 100644
--- a/debian/hvirt-devconfig.postinst
+++ b/debian/hvirt-devconfig.postinst
@@ -20,7 +20,7 @@ set -e
 case "$1" in
     configure)
 	# Need to do it like this to avoid shell injection
-	/usr/bin/perl -i -e '$r = `invirt-getconf kerberos.realm`; $r.chomp;
+	/usr/bin/perl -i -e '$r = `invirt-getconf kerberos.realm`; chomp($r);
 	while(<>) { s/^([ \t]*default_realm *=).*$/\1 $r/m; print; }' /etc/krb5.conf.invirt
     ;;