[isidorus-cvs] r925 - in branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets: . isidorus

[lgiessmann at common-lisp.net]

Author: lgiessmann
Date: Mon Sep 19 07:46:18 2011
New Revision: 925

Log:
gdl-frontend: Widgets: added a new entry point => currently one compiled application is enough, since the ciorrect page will be generated depending on the requested url

Added:
   branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/isidorus/IsidorusEntryPoint.java
Modified:
   branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/GDL_Widgets.gwt.xml

Modified: branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/GDL_Widgets.gwt.xml
==============================================================================
--- branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/GDL_Widgets.gwt.xml	Mon Sep 19 03:20:11 2011	(r924)
+++ branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/GDL_Widgets.gwt.xml	Mon Sep 19 07:46:18 2011	(r925)
@@ -19,8 +19,10 @@
   
   <!-- Specify the app entry point class.                         -->
   <!-- <entry-point class='us.isidor.gdl.anaToMia.Widgets.base.TestClass'/> -->
-  <entry-point class="us.isidor.gdl.anaToMia.Widgets.isidorus.HashObjectUi"/>
+  <!-- <entry-point class="us.isidor.gdl.anaToMia.Widgets.isidorus.HashObjectUi"/> -->
   <!-- <ntry-point class="us.isidor.gdl.anaToMia.Widgets.isidorus.EnvironmentUi"/> -->
+  <entry-point class='us.isidor.gdl.anaToMia.Widgets.isidorus.IsidorusEntryPoint'/>
+  
 
   <!-- Specify the paths for translatable code                    -->
   <source path="base"/>

Added: branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/isidorus/IsidorusEntryPoint.java
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/isidorus/IsidorusEntryPoint.java	Mon Sep 19 07:46:18 2011	(r925)
@@ -0,0 +1,21 @@
+package us.isidor.gdl.anaToMia.Widgets.isidorus;
+
+import com.google.gwt.core.client.EntryPoint;
+import com.google.gwt.user.client.Window;
+
+public class IsidorusEntryPoint implements EntryPoint {
+
+	@Override
+	public void onModuleLoad() {
+		try{
+			String requestedTopicType = IsidorusConstants.HASH_OBJECT_PSI;
+			if(Window.Location.getHref().contains("environment")) requestedTopicType = IsidorusConstants.ENVIRONMENT_PSI;
+			
+			GdlWebPage page = new GdlWebPage(requestedTopicType);
+			page.createWebPage();
+		}catch(Exception e){
+			Window.alert("could not create a web page, because: (" + e.getClass() + ") " + e.getMessage());
+		}
+	}
+
+}