From 57264c72f102477ea3e4127216d30f806e888d68 Mon Sep 17 00:00:00 2001
From: Steve Mynott <steve.mynott@gmail.com>
Date: Fri, 11 Aug 2017 16:04:00 +0100
Subject: patch perl6 -v to display "Rakudo Star" star issue #7

---
 patches/star-ver.patch | 16 ++++++++++++++++
 tools/star/Makefile    |  1 +
 2 files changed, 17 insertions(+)
 create mode 100644 patches/star-ver.patch

diff --git a/patches/star-ver.patch b/patches/star-ver.patch
new file mode 100644
index 0000000..c104ee6
--- /dev/null
+++ b/patches/star-ver.patch
@@ -0,0 +1,16 @@
+--- ../nqp/src/HLL/Compiler.nqp
++++ ../nqp/src/HLL/Compiler.nqp
+@@ -557,11 +557,11 @@ class HLL::Compiler does HLL::Backend::Default {
+         my $implementation := self.implementation();
+         my $language_name  := self.language_name();
+         if nqp::can(self, 'language_version') {
+-            nqp::say("This is $implementation version $version built on $backver\n" ~
++            nqp::say("This is $implementation Star version $version built on $backver\n" ~
+                 "implementing $language_name " ~ self.language_version() ~ ".");
+         }
+         else {
+-            nqp::say("This is $implementation version $version built on $backver");
++            nqp::say("This is $implementation Star version $version built on $backver");
+         }
+         nqp::exit(0);
+     }
diff --git a/tools/star/Makefile b/tools/star/Makefile
index 3c5c575..2afe9c7 100644
--- a/tools/star/Makefile
+++ b/tools/star/Makefile
@@ -68,6 +68,7 @@ manifest: modules/DBIish/lib
 	rm MANIFEST.1
 
 patch:
+	patch -p1 < patches/star-ver.patch
 	patch -p1 < patches/perl6-pod-to-bigpage.patch
 	patch -p1 < patches/panda.patch
 
-- 
cgit v1.1