From 7f4e6bf626b1bb33dc8a3591f803aa42ce4018fc Mon Sep 17 00:00:00 2001
From: neauoire <aliceffekt@gmail.com>
Date: Mon, 4 Sep 2023 09:08:30 -0700
Subject: [PATCH] Rename file on tga-open

---
 src/oekaki.tal | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/oekaki.tal b/src/oekaki.tal
index 905e7d7..bce2ff0 100644
--- a/src/oekaki.tal
+++ b/src/oekaki.tal
@@ -51,7 +51,7 @@
 	( name ) "Oekaki 0a
 	( desc ) "Drawing 20 "Program 0a
 	( auth ) "By 20 "Devine 20 "Lu 20 "Linvega 0a
-	( date ) "22 20 "Sep 20 "3 "2023 $1
+	( date ) "22 20 "Sep 20 "4 "2023 $1
 	( exts ) 00
 
 (
@@ -480,6 +480,10 @@
 	#0012 .File/length DEO2
 	;tga .File/read DEO2
 	( | update name )
+	;src/buf ;dict/chr-ext OVR2 scap/ #0004 SUB2 <scpy>
+	;dict/rename <pstr>
+	<pstr>
+	#0a18 DEO
 	( | flip endianness )
 	;tga/x STH2k LDA2 SWP STH2r STA2
 	;tga/y STH2k LDA2 SWP STH2r STA2
@@ -868,6 +872,7 @@
 @dict &default "pict40x28.chr $1
 	&save "Saved 20 $1
 	&open "Opened 20 $1
+	&rename "Renamed 20 $1
 	&leak "Leaked $1
 	&icn-ext ".icn $1
 	&chr-ext ".chr $1
-- 
2.45.2