From 31eeff4014c967929f3fdd23a3ebf56647a3e135 Mon Sep 17 00:00:00 2001
From: Gabriel Omar Cotelli <g.cotelli@gmail.com>
Date: Tue, 8 Aug 2023 08:55:31 -0300
Subject: [PATCH] Alias SubscriptOutOfBounds with OffsetError in GS

---
 rowan/components/Deployment.ston                   | 1 +
 rowan/components/scripts/defineExceptionAliases.st | 8 ++++++++
 2 files changed, 9 insertions(+)
 create mode 100644 rowan/components/scripts/defineExceptionAliases.st

diff --git a/rowan/components/Deployment.ston b/rowan/components/Deployment.ston
index 33fa0e2..21689e5 100644
--- a/rowan/components/Deployment.ston
+++ b/rowan/components/Deployment.ston
@@ -1,5 +1,6 @@
 RwSimpleProjectLoadComponentV2 {
   #name : 'Deployment',
+  #preloadDoitName : 'scripts/defineExceptionAliases',
   #projectNames : [ ],
   #componentNames : [ ],
   #packageNames : [
diff --git a/rowan/components/scripts/defineExceptionAliases.st b/rowan/components/scripts/defineExceptionAliases.st
new file mode 100644
index 0000000..a592075
--- /dev/null
+++ b/rowan/components/scripts/defineExceptionAliases.st
@@ -0,0 +1,8 @@
+| symbolDictionary |
+symbolDictionary := Rowan image 
+	symbolDictNamed:'Buoy'
+	ifAbsent: [
+			Rowan image symbolList createDictionaryNamed: 'Buoy' at: 1.
+			Rowan image symbolDictNamed:'Buoy'
+	].
+symbolDictionary at: #SubscriptOutOfBounds put: OffsetError