From ffda086c04303e1ed0ec10538c69696878674510 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ian@liberator.relativity.greenend.org.uk>
Date: Thu, 1 Jul 2010 00:13:48 +0100
Subject: [PATCH] Junks.  Pants icon.

---
 yarrg/icons/jk.xbm  | 5 +++++
 yarrg/where-vessels | 3 +++
 2 files changed, 8 insertions(+)
 create mode 100644 yarrg/icons/jk.xbm

diff --git a/yarrg/icons/jk.xbm b/yarrg/icons/jk.xbm
new file mode 100644
index 0000000..c27ff5b
--- /dev/null
+++ b/yarrg/icons/jk.xbm
@@ -0,0 +1,5 @@
+#define jk_width 12
+#define jk_height 10
+static unsigned char jk_bits[] = {
+   0x00, 0x00, 0x00, 0x00, 0x80, 0x01, 0x80, 0x01, 0x80, 0x01, 0x80, 0x01,
+   0x8c, 0x01, 0x8c, 0x01, 0xf8, 0x00, 0x00, 0x00};
diff --git a/yarrg/where-vessels b/yarrg/where-vessels
index b93db19..af77cba 100755
--- a/yarrg/where-vessels
+++ b/yarrg/where-vessels
@@ -254,6 +254,7 @@ proc vesselclasses-init {} {
 	dhow		cm	dh	Dhow
 	longship	dm	ls	Longship
 	baghlah		em	bg	Baghlah
+	junk		eo	jk	Junk
 	merchbrig	fm	mb	{Merchant Brig}
 	warbrig		gm	wb	{War Brig}
 	xebec		hm	xe	Xebec
@@ -383,6 +384,7 @@ proc show-report-decode {code} {
 	F { report-set subclass {Frost class} }
 	R { report-set subclass {Rogue class} }
 	V { report-set subclass {Verdant class} }
+	I { report-set subclass {Inferno class} }
 	default { report-set subclass "Subclass \"$subclass\"" }
     }
 
@@ -589,6 +591,7 @@ proc vessel {vin} {
 	icy		{ lappend codel F }
 	rogue           { lappend codel R }
 	verdant         { lappend codel V }
+	inferno         { lappend codel I }
 	default		{ lappend codel ($subclass) }
     }
 
-- 
2.30.2