From c774f81e8031dafcbc6d5a92f52e4a15723c027b Mon Sep 17 00:00:00 2001
From: Axel Beckert <abe@deuxchevaux.org>
Date: Thu, 7 Feb 2019 16:16:54 +0100
Subject: [PATCH] More unconfusing of Emacs' syntax highlighting

---
 bin/xen-delete-image   | 4 ++--
 bin/xen-update-image   | 4 ++--
 bin/xt-customize-image | 4 ++--
 bin/xt-install-image   | 4 ++--
 4 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/bin/xen-delete-image b/bin/xen-delete-image
index ef30b62..7ed6bd4 100755
--- a/bin/xen-delete-image
+++ b/bin/xen-delete-image
@@ -208,12 +208,12 @@ checkArguments();
 #
 if ( ( !$CONFIG{ 'test' } ) && ( $EFFECTIVE_USER_ID != 0 ) )
 {
-    print <<E_O_ROOT;
+    print <<EOROOT;
 
   This script is not running with root privileges, so the configuration
  file(s) beneath /etc/xen will not be removed.
 
-E_O_ROOT
+EOROOT
 
     exit 127;
 }
diff --git a/bin/xen-update-image b/bin/xen-update-image
index 8cd9b9a..50d9b66 100755
--- a/bin/xen-update-image
+++ b/bin/xen-update-image
@@ -149,13 +149,13 @@ checkArguments();
 #
 if ( $EFFECTIVE_USER_ID != 0 )
 {
-    print <<E_O_ROOT;
+    print <<EOROOT;
 
   This script is not running with root privileges.
 
   root privileges are required to successfully mount the disk image(s).
 
-E_O_ROOT
+EOROOT
 
     exit;
 }
diff --git a/bin/xt-customize-image b/bin/xt-customize-image
index a03717d..b3b2de4 100755
--- a/bin/xt-customize-image
+++ b/bin/xt-customize-image
@@ -221,7 +221,7 @@ sub checkArguments
 
     if ( !-d $dir )
     {
-        print <<E_OR;
+        print <<EOR;
 
   We\'re trying to configure an installation of $CONFIG{'dist'} in
  $CONFIG{'location'} - but there is no hook directory for us to use.
@@ -231,7 +231,7 @@ sub checkArguments
   We\'d expect the hook directory to be : $dir
 
   Aborting.
-E_OR
+EOR
         exit 1;
     }
 
diff --git a/bin/xt-install-image b/bin/xt-install-image
index 8c361e8..b466634 100755
--- a/bin/xt-install-image
+++ b/bin/xt-install-image
@@ -414,7 +414,7 @@ sub checkArguments
 
     if ( !-d $dir )
     {
-        print <<E_OR;
+        print <<EOR;
 
   We are trying to configure an installation of $CONFIG{'dist'} in
  $CONFIG{'location'} - but there is no hook directory for us to use.
@@ -424,7 +424,7 @@ sub checkArguments
   We would expect the hook directory to be $dir.
 
   Aborting.
-E_OR
+EOR
         exit 1;
     }