--- a/log.pl	Wed Aug 12 17:51:37 2015 +0200
+++ b/log.pl	Wed Aug 12 18:05:19 2015 +0200
@@ -107,6 +107,8 @@
     # override the HGUSER  to the 'remote user' from our SSH connect
     $ENV{HGUSER} = env_user() // $ENV{USER} // $ENV{LOGNAME} // getpwuid($>);
 
+    die identity();
+
     if ($opt_message =~ /^@(.*)/) {
         @ARGV = $1;
         $opt_message = join "", <>;
@@ -313,7 +315,7 @@
 sub identity() {
     my $user = `who am i`;
     chomp $user;
-    $user .= " [" . env_user() // '-' . "]";
+    $user .= " [" . (env_user() // '-') . "]";
     return $user;
 }