callagent: Cosmetic changes to the categories and line length

callagent/MGCPCall.st

@@ -18,7 +18,7 @@
 
 Object subclass: MGCPCall [
     | sourceGW sourceEndPoint destGW destEndPoint |
-    <category: 'mgcp-callagent'>
+    <category: 'MGCP-Callagent'>
     <comment: 'I represent a call between two endpoints'>
 
     MGCPCall class >> initWith: aSource dest: aDest [

callagent/MGCPCallAgent.st

@@ -20,7 +20,7 @@ PackageLoader fileInPackage: 'Sockets'.
 
 Object subclass: MGCPCallAgent [
     | socket queue rx tx parser gateways |
-    <category: 'mgcp-callagent'>
+    <category: 'MGCP-Callagent'>
     <comment: 'I am a MGCP CallAgent and make Gateways talk to each other'>
 
     MGCPCallAgent class >> startOn: anAddress [

callagent/MGCPCommands.st

@@ -18,9 +18,10 @@
 
 Object subclass: MGCPCommand [
     | verb transaction endp params sdp|
-    <comment: 'I am a command send to a MGCP gateway. I know my timeout and such. Each MGCPGateWay can have
-	       a MGCPCommand subclass to specify certain things. E.g. the endpoint numbering is different'>
-    <category: 'mgcp-callagent'>
+    <comment: 'I am a command send to a MGCP gateway. I know my timeout
+    and such. Each MGCPGateWay can have a MGCPCommand subclass to specify
+    certain things. E.g. the endpoint numbering is different'>
+    <category: 'MGCP-callagent'>
 
     MGCPCommand class >> createCRCX: anEndpoint callId: aCallId transId: aTransId [
 	<category: 'factory'>

callagent/MGCPEndpoint.st

@@ -18,7 +18,7 @@
 
 Object subclass: MGCPEndpoint [
     | used config remote_ip remote_port ci identifier |
-    <category: 'mgcp-callagent'>
+    <category: 'MGCP-Callagent'>
     <comment: 'I am one endpoint. I have a state...'>
 
     initialize [

callagent/MGCPGateway.st

@@ -19,7 +19,7 @@
 Object subclass: MGCPGateway [
     | endpoints address gateway lastUsed |
 
-    <category: 'mgcp-callagent'>
+    <category: 'MGCP-Callagent'>
     <comment: 'One gateway...'>
 
     MGCPGateway class >> initWith: anAddress number: aNumber [