--- a/Smalltalk.st	Fri Sep 19 13:54:09 2014 +0200
+++ b/Smalltalk.st	Fri Sep 19 14:45:07 2014 +0200
@@ -3598,6 +3598,15 @@
     ^ false
 !
 
+isVisualSmallalkEnterprise
+    "is this a VSE Smalltalk system ?
+     Return false here - this may be useful to write portable
+     applications - add #isVisualSmallalkEnterprise to your VSE,
+     returning true there."
+
+    ^ false
+!
+
 isVisualWorks
     "is this a VisualWorks Smalltalk system ?
      Return false here - this may be useful to write portable
@@ -8257,11 +8266,11 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.1089 2014-09-11 12:27:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.1090 2014-09-19 12:45:07 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.1089 2014-09-11 12:27:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.1090 2014-09-19 12:45:07 cg Exp $'
 !
 
 version_SVN