r6262 - in trunk: gnue-appserver/samples gnue-packages/base

[reinhard]

Author: reinhard
Date: 2004-09-07 06:45:09 -0500 (Tue, 07 Sep 2004)
New Revision: 6262

Modified:
   trunk/gnue-appserver/samples/sample-C.gld
   trunk/gnue-appserver/samples/sample-de.gld
   trunk/gnue-appserver/samples/sample.gcd
   trunk/gnue-packages/base/base-C.gld
   trunk/gnue-packages/base/base-de.gld
Log:
Added sample for <message>, fixed gld syntax.


Modified: trunk/gnue-appserver/samples/sample-C.gld
===================================================================
--- trunk/gnue-appserver/samples/sample-C.gld   2004-09-07 00:22:24 UTC (rev 
6261)
+++ trunk/gnue-appserver/samples/sample-C.gld   2004-09-07 11:45:09 UTC (rev 
6262)
@@ -22,4 +22,5 @@
     <property name="human" pos="1200" label="Human"/>
   </class>
 
-</labels>
+  <message name="nameis">The name of this person is %s.</message>
+</module>

Modified: trunk/gnue-appserver/samples/sample-de.gld
===================================================================
--- trunk/gnue-appserver/samples/sample-de.gld  2004-09-07 00:22:24 UTC (rev 
6261)
+++ trunk/gnue-appserver/samples/sample-de.gld  2004-09-07 11:45:09 UTC (rev 
6262)
@@ -22,4 +22,5 @@
     <property name="human" pos="1200" label="Menschlich"/>
   </class>
 
-</labels>
+  <message name="nameis">Der Name dieser Person ist %s.</message>
+</module>

Modified: trunk/gnue-appserver/samples/sample.gcd
===================================================================
--- trunk/gnue-appserver/samples/sample.gcd     2004-09-07 00:22:24 UTC (rev 
6261)
+++ trunk/gnue-appserver/samples/sample.gcd     2004-09-07 11:45:09 UTC (rev 
6262)
@@ -46,7 +46,7 @@
     </property>
 
     <procedure name="show" comment="Simple procedure to test Appserver">
-      print self.address_name
+      abort (message ('nameis') % self.address_name)
     </procedure>
 
     <procedure name="test" comment="Simple procedure to test Appserver">

Modified: trunk/gnue-packages/base/base-C.gld
===================================================================
--- trunk/gnue-packages/base/base-C.gld 2004-09-07 00:22:24 UTC (rev 6261)
+++ trunk/gnue-packages/base/base-C.gld 2004-09-07 11:45:09 UTC (rev 6262)
@@ -32,4 +32,4 @@
     <property name="convbase"  pos="600" label="Conversion amount in base 
currency" />
     <property name="convthis"  pos="601" label="Conversion amount in this 
currency" />
   </class>
-</labels>
+</module>

Modified: trunk/gnue-packages/base/base-de.gld
===================================================================
--- trunk/gnue-packages/base/base-de.gld        2004-09-07 00:22:24 UTC (rev 
6261)
+++ trunk/gnue-packages/base/base-de.gld        2004-09-07 11:45:09 UTC (rev 
6262)
@@ -32,4 +32,4 @@
     <property name="convbase"  pos="600" label="Konvertierungsbetrag 
Basisw�hrung" />
     <property name="convthis"  pos="601" label="Konvertierungsbetrag diese 
W�hrung" />
   </class>
-</labels>
+</module>