diff --git a/ipasserelle-gp.spec b/ipasserelle-gp.spec
index 06a10ee..68459e7 100644
--- a/ipasserelle-gp.spec
+++ b/ipasserelle-gp.spec
@@ -1,5 +1,5 @@
 %define version 0.0.1
-%define release 1.beta16
+%define release 1.beta17
 %define name ipasserelle-gp
 
 
diff --git a/root/etc/e-smith/templates/home/e-smith/files/shares/wpkg/files/settings/tightvnc/tightvnc_x64.reg/10All b/root/etc/e-smith/templates/home/e-smith/files/shares/wpkg/files/settings/tightvnc/tightvnc_x64.reg/10All
index b019a6d..515e00b 100644
--- a/root/etc/e-smith/templates/home/e-smith/files/shares/wpkg/files/settings/tightvnc/tightvnc_x64.reg/10All
+++ b/root/etc/e-smith/templates/home/e-smith/files/shares/wpkg/files/settings/tightvnc/tightvnc_x64.reg/10All
@@ -3,11 +3,12 @@ Windows Registry Editor Version 5.00
 {
 
 use Crypt::DES;
-my $clear = $wpkg{'VNCPassword'} || 'secret';
+my $clear = $wpkg{'VNCPassword'} || 'secretpassword';
+$clear = substr $clear, 0, 8;
 my $key = pack ('H16', "E84AD660C4721AE0");
 my $des = Crypt::DES->new($key);
 my $crypt = $des->encrypt($clear);
-my $pass = join(',', map {unpack('H2', $_)} split //, $cryptpass);
+my $pass = join(',', map {unpack('H2', $_)} split //, $crypt);
 
 my $out =<<"EOF";
 
diff --git a/root/etc/e-smith/templates/home/e-smith/files/shares/wpkg/files/settings/tightvnc/tightvnc_x86.reg/10All b/root/etc/e-smith/templates/home/e-smith/files/shares/wpkg/files/settings/tightvnc/tightvnc_x86.reg/10All
index f600259..cab7333 100644
--- a/root/etc/e-smith/templates/home/e-smith/files/shares/wpkg/files/settings/tightvnc/tightvnc_x86.reg/10All
+++ b/root/etc/e-smith/templates/home/e-smith/files/shares/wpkg/files/settings/tightvnc/tightvnc_x86.reg/10All
@@ -3,11 +3,12 @@ Windows Registry Editor Version 5.00
 {
 
 use Crypt::DES;
-my $clear = $wpkg{'VNCPassword'} || 'secret';
+my $clear = $wpkg{'VNCPassword'} || 'secretpassword';
+$clear = substr $clear, 0, 8;
 my $key = pack ('H16', "E84AD660C4721AE0");
 my $des = Crypt::DES->new($key);
 my $crypt = $des->encrypt($clear);
-my $pass = join(',', map {unpack('H2', $_)} split //, $cryptpass);
+my $pass = join(',', map {unpack('H2', $_)} split //, $crypt);
 
 my $out =<<"EOF";