[isidorus-cvs] r915 - in branches/gdl-frontend/src/anaToMia/GDL_Widgets: src/us/isidor/gdl/anaToMia/Widgets src/us/isidor/gdl/anaToMia/Widgets/isidorus war/gdl_widgets
lgiessmann at common-lisp.net
lgiessmann at common-lisp.net
Fri Sep 16 08:00:14 UTC 2011
Author: lgiessmann
Date: Fri Sep 16 01:00:13 2011
New Revision: 915
Log:
gdl-frontend: Widgets: finalised the page for http://textgrid.org/serviceregistry/model/types/Environment
Added:
branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/isidorus/EnvironmentUi.java
branches/gdl-frontend/src/anaToMia/GDL_Widgets/war/gdl_widgets/EnvironmentPsis.json
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/isidorus/GdlWebPage.java
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 Fri Sep 16 00:45:21 2011 (r914)
+++ branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/GDL_Widgets.gwt.xml Fri Sep 16 01:00:13 2011 (r915)
@@ -19,7 +19,8 @@
<!-- 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"/> -->
+ <entry-point class="us.isidor.gdl.anaToMia.Widgets.isidorus.EnvironmentUi"/>
<!-- Specify the paths for translatable code -->
<source path="base"/>
Added: branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/isidorus/EnvironmentUi.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/EnvironmentUi.java Fri Sep 16 01:00:13 2011 (r915)
@@ -0,0 +1,17 @@
+package us.isidor.gdl.anaToMia.Widgets.isidorus;
+
+import com.google.gwt.core.client.EntryPoint;
+import com.google.gwt.user.client.Window;
+
+
+public class EnvironmentUi implements EntryPoint {
+ @Override
+ public void onModuleLoad() {
+ try{
+ GdlWebPage page = new GdlWebPage(IsidorusConstants.ENVIRONMENT_PSI);
+ page.createWebPage();
+ }catch(Exception e){
+ Window.alert("could not create a web page, because: (" + e.getClass() + ") " + e.getMessage());
+ }
+ }
+}
Modified: branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/isidorus/GdlWebPage.java
==============================================================================
--- branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/isidorus/GdlWebPage.java Fri Sep 16 00:45:21 2011 (r914)
+++ branches/gdl-frontend/src/anaToMia/GDL_Widgets/src/us/isidor/gdl/anaToMia/Widgets/isidorus/GdlWebPage.java Fri Sep 16 01:00:13 2011 (r915)
@@ -95,7 +95,7 @@
builder.sendRequest(null, new PsiRequest());
}catch(RequestException e){
e.printStackTrace();
- Window.alert("could not request existing instances of http://textgrid.org/serviceregistry/model/types/Hash-Object, because(" + e.getClass() + "): " + e.getMessage());
+ Window.alert("could not request existing instances of " + GdlWebPage.this.topicTypePsi + ", because(" + e.getClass() + "): " + e.getMessage());
GdlWebPage.this.resetPage();
}
}
@@ -107,7 +107,7 @@
try{
if(GdlWebPage.this.gdlPanel != null) GdlWebPage.this.gdlPanel.removeFromParent();
ArrayList<Pair<String, TopicIdentifierTypes>> topicsToCreate = new ArrayList<Pair<String, TopicIdentifierTypes>>();
- topicsToCreate.add(new Pair<String, TopicIdentifierTypes>(IsidorusConstants.HASH_OBJECT_PSI, TopicIdentifierTypes.SubjectIdentifier));
+ topicsToCreate.add(new Pair<String, TopicIdentifierTypes>(GdlWebPage.this.topicTypePsi, TopicIdentifierTypes.SubjectIdentifier));
GdlWebPage.this.gdlPanel = new GdlPanel(null, topicsToCreate, 362, 160);
GdlWebPage.this.mainPanel.add(gdlPanel);
gdlPanel.setTmEngine(new JtmsTmEngine());
@@ -186,7 +186,7 @@
GdlWebPage.this.psiContainer.insertIn(GdlWebPage.this.navigationPanel);
} else {
- Window.alert("could not request existing instances of http://textgrid.org/serviceregistry/model/types/Hash-Object, because(" + response.getStatusCode() + "): " + response.getStatusText());
+ Window.alert("could not request existing instances of " + GdlWebPage.this.topicTypePsi + ", because(" + response.getStatusCode() + "): " + response.getStatusText());
GdlWebPage.this.resetPage();
}
}
@@ -200,7 +200,7 @@
message = exception.getMessage();
eClass = exception.getClass();
}
- Window.alert("could not request existing instances of http://textgrid.org/serviceregistry/model/types/Hash-Object, because(" + eClass + "): " + message);
+ Window.alert("could not request existing instances of " + GdlWebPage.this.topicTypePsi + ", because(" + eClass + "): " + message);
GdlWebPage.this.resetPage();
}
}
Added: branches/gdl-frontend/src/anaToMia/GDL_Widgets/war/gdl_widgets/EnvironmentPsis.json
==============================================================================
--- /dev/null 00:00:00 1970 (empty, because file is newly added)
+++ branches/gdl-frontend/src/anaToMia/GDL_Widgets/war/gdl_widgets/EnvironmentPsis.json Fri Sep 16 01:00:13 2011 (r915)
@@ -0,0 +1,20 @@
+[
+ "http://textgrid.org/serviceregistry/environment/env-1",
+ "http://textgrid.org/serviceregistry/environment/env-2",
+ "http://textgrid.org/serviceregistry/environment/env-3",
+ "http://textgrid.org/serviceregistry/environment/env-4",
+ "http://textgrid.org/serviceregistry/environment/env-5",
+ "http://textgrid.org/serviceregistry/environment/env-6",
+ "http://textgrid.org/serviceregistry/environment/env-7",
+ "http://textgrid.org/serviceregistry/test-env-1",
+ "http://textgrid.org/serviceregistry/environment/env-8",
+ "http://textgrid.org/serviceregistry/environment/env-9",
+ "http://textgrid.org/serviceregistry/environment/env-10",
+ "http://textgrid.org/serviceregistry/environment/env-11",
+ "http://textgrid.org/serviceregistry/environment/env-12",
+ "http://textgrid.org/serviceregistry/environment/env-13",
+ "http://textgrid.org/serviceregistry/environment/env-14",
+ "http://textgrid.org/serviceregistry/environment/env-15",
+ "http://textgrid.org/serviceregistry/environment/env-16",
+ "http://textgrid.org/serviceregistry/environment/env-17"
+]
\ No newline at end of file
More information about the Isidorus-cvs
mailing list