--- a/SmallSense__PO.st	Sat Jul 19 22:40:45 2014 +0100
+++ b/SmallSense__PO.st	Thu Jul 24 19:58:54 2014 +0100
@@ -90,6 +90,12 @@
     "Created: / 20-05-2014 / 10:43:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
+forGlobalNamed: name
+    ^ VariablePO globalVariable: name
+
+    "Created: / 24-07-2014 / 16:50:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 subject: anObject
     <resource: #obsolete>