Index: cspBasis/Library.mac.rou
===================================================================
diff -u -r18 -r96
--- cspBasis/Library.mac.rou	(.../Library.mac.rou)	(revision 18)
+++ cspBasis/Library.mac.rou	(.../Library.mac.rou)	(revision 96)
@@ -18,6 +18,8 @@
 GetUserMunt(sDomVERW,VERW)
 	Quit $S($G(VERW)="VHEPN":"EUR", sDomVERW="SFS":"CHF", 1:"EUR")
  
+IsInternIPAdres(IPAdres)
+	Quit (IPAdres?1(1"192.168."1.3N1"."1.3N,1"127.0.0.1"))
  
 AppIsEnabled(App,SubApp,IPAddress)
 #define IP4   $P(IPAddress,".",4)