diff --git a/pom.xml b/pom.xml
index 8e5731f..8d26963 100644
--- a/pom.xml
+++ b/pom.xml
@@ -3,7 +3,7 @@
4.0.0
frege
frege-repl
- 1.0.2-SNAPSHOT
+ 1.0.2
jar
frege-repl
https://github.com/Frege/frege-repl
@@ -11,41 +11,12 @@
UTF-8
src/main/frege
1.0.5
- 1.0.2-SNAPSHOT
+ 1.0.2
2.10
4.2.2
4.11
-
-
-
-
- org.eclipse.m2e
- lifecycle-mapping
- 1.0.0
-
-
-
-
-
- org.apache.maven.plugins
- maven-antrun-plugin
- [1.7,)
-
- run
-
-
-
-
-
-
-
-
-
-
-
-
com.theoryinpractise.frege
@@ -140,7 +111,7 @@
frege
frege-interpreter-core
- ${frege.scripting.version}
+ ${frege.interpreter.version}
diff --git a/src/main/frege/frege/repl/FregeRepl.fr b/src/main/frege/frege/repl/FregeRepl.fr
index 4145b3c..c027f92 100644
--- a/src/main/frege/frege/repl/FregeRepl.fr
+++ b/src/main/frege/frege/repl/FregeRepl.fr
@@ -311,9 +311,9 @@ helpGUI title content = do
data FregeJavaProxy = pure native frege.interpreter.javasupport.FregeJavaProxy where
native with frege.interpreter.javasupport.FregeJavaProxy.with ::
- (Object -> Method -> ObjectArr -> ST s a) -> Class c -> IO c
+ (Object -> Method -> ObjectArray -> ST s a) -> Class c -> IO c
-showDesktop :: Object -> Method -> ObjectArr -> IO ()
+showDesktop :: Object -> Method -> ObjectArray -> IO ()
showDesktop _ _ args = do
event <- return $ asHyperlinkEvent $ args.elemAt 0
d <- Desktop.getDesktop ()
@@ -324,6 +324,9 @@ showDesktop _ _ args = do
when (event.getEventType == HyperlinkEvent_EventType.activated) navigate
+derive ArrayElement Object
+type ObjectArray = JArray Object
+
fixHelpLink s | Just (Just relative : _)
<- s `match` #^\.\.(.*)$# = "http://try.frege-lang.org/doc/frege" ++ relative
fixHelpLink s = s