From 59f3d7ac47c39eef88fa186531d706e844e19bb5 Mon Sep 17 00:00:00 2001
From: Holger Hans Peter Freyther <zecke@selfish.org>
Date: Tue, 27 Sep 2011 16:54:38 +0200
Subject: [PATCH] misc: Make all classes carry a proper category

---
 BERTLVStream.st | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/BERTLVStream.st b/BERTLVStream.st
index 737de87..5c57a9e 100644
--- a/BERTLVStream.st
+++ b/BERTLVStream.st
@@ -18,7 +18,7 @@
 
 Object subclass: BERTag [
     | classType tagValue constructed |
-    <category: 'osmo-asn1'>
+    <category: 'OsmoASN1'>
     <comment: 'I am a TAG as of X.690'>
 
     BERTag class >> classUniversal [
@@ -192,7 +192,7 @@ Object subclass: BERTag [
 ]
 
 Object subclass: BERLength [
-    <category: 'osmo-asn1'>
+    <category: 'OsmoASN1'>
     <comment: 'I can handle the length for definite and indefinite length. I wonder
 of myself if I should be class or instance based or even be a SmallInteger or an
 extension to a SmallInteger. Should I have a method called isIndefinite. Time will tell.'>
@@ -233,7 +233,7 @@ extension to a SmallInteger. Should I have a method called isIndefinite. Time wi
 
 Object subclass: BERTLVStream [
     | base |
-    <category: 'osmo-asn1'>
+    <category: 'OsmoASN1'>
     <comment: 'I am a Tag Value Length (TLV) Stream for Basic Encoding Rules (BER)
 of X.690 and provide very basic reading of a stream.'>
 
@@ -292,6 +292,7 @@ of X.690 and provide very basic reading of a stream.'>
 ]
 
 BERTLVStream subclass: DERTLVStream [
+    <category: 'OsmoASN1'>
     <comment: 'I am DER Stream. I can produce valid DER streams
 from a tupled input.'>