*** empty log message ***

2003-11-15 16:24:49 +00:00
parent 5b3735e34e
commit d749e2d7aa
4 changed files with 563 additions and 160 deletions
--- a/src/GF/Shell/Commands.hs
+++ b/src/GF/Shell/Commands.hs
@@ -432,7 +432,7 @@ displaySStateJavaX isNew env state = unlines $ tagXML "gfedit" $ concat [
  zipper = stateSState state
  linAll = map lin lgrs
  gr     = firstStateGrammar env
-  mark   = if isNew then markOptXML else markOptJava   
+  mark   = markOptXML -- markOptJava   

 langAbstract = language "Abstract"
 langXML      = language "XML"