From 086c658a15f4369a3211faf2b309c0e81cc2a805 Mon Sep 17 00:00:00 2001
From: Hieu Hoang <hieu@hoang.co.uk>
Date: Thu, 26 Sep 2013 12:03:01 +0100
Subject: [PATCH] only run beautify with specific astyle version

---
 scripts/other/beautify.perl | 9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/scripts/other/beautify.perl b/scripts/other/beautify.perl
index 5c53bbcb0..244e55941 100755
--- a/scripts/other/beautify.perl
+++ b/scripts/other/beautify.perl
@@ -7,8 +7,13 @@ use FindBin qw($RealBin);
 sub Beautify($);
 
 print STDERR "RealBin=$RealBin \n\n";
-my $v = `astyle --version`;
-print STDERR "$v \n";
+my $version = `astyle --version`;
+print STDERR "$version \n";
+
+if ($version ne "Artistic Style Version 2.01") {
+    print STDERR "Must be astyle version 2.01. Quitting\n";
+    exit(1);
+}
 
 Beautify("$RealBin/../..");