diff options
author | Sergei Trofimovich <slyfox@gentoo.org> | 2010-08-29 19:18:34 +0000 |
---|---|---|
committer | Sergei Trofimovich <slyfox@gentoo.org> | 2010-08-29 19:18:34 +0000 |
commit | 3d7d29b957fa0db266ad8e57f479308ede4c077c (patch) | |
tree | 7d123cd4a3c342227fba95fd51337046b35cf133 /dev-lang/helium/files | |
parent | Moved from sunrise overlay. Bug #313643. Thanks to Fabiano Francesconi (elbry... (diff) | |
download | gentoo-2-3d7d29b957fa0db266ad8e57f479308ede4c077c.tar.gz gentoo-2-3d7d29b957fa0db266ad8e57f479308ede4c077c.tar.bz2 gentoo-2-3d7d29b957fa0db266ad8e57f479308ede4c077c.zip |
Removed old version
(Portage version: 2.1.8.3/cvs/Linux x86_64)
Diffstat (limited to 'dev-lang/helium/files')
-rw-r--r-- | dev-lang/helium/files/helium-1.1-readline.patch | 48 |
1 files changed, 0 insertions, 48 deletions
diff --git a/dev-lang/helium/files/helium-1.1-readline.patch b/dev-lang/helium/files/helium-1.1-readline.patch deleted file mode 100644 index 0efe1564bb80..000000000000 --- a/dev-lang/helium/files/helium-1.1-readline.patch +++ /dev/null @@ -1,48 +0,0 @@ -diff -Naur helium-1.1.old/heliumNT/src/Makefile.in helium-1.1/heliumNT/src/Makefile.in ---- helium-1.1.old/heliumNT/src/Makefile.in 2003-03-12 22:35:28.000000000 +0000 -+++ helium-1.1/heliumNT/src/Makefile.in 2003-03-12 22:33:19.000000000 +0000 -@@ -200,7 +200,7 @@ - - texthint: texthint/Main.hs utils/OSSpecific.hs - # GHC HeliumInterpreter -- $(HC) --make -iutils -o $(HELIUMBINDIR)/texthint$(EXE) texthint/Main.hs -+ $(HC) --make -package util -iutils -o $(HELIUMBINDIR)/texthint$(EXE) texthint/Main.hs - $(STRIP) $(HELIUMBINDIR)/texthint$(EXE) - - # AG sources -diff -Naur helium-1.1.old/heliumNT/src/texthint/Main.hs helium-1.1/heliumNT/src/texthint/Main.hs ---- helium-1.1.old/heliumNT/src/texthint/Main.hs 2003-03-06 14:45:13.000000000 +0000 -+++ helium-1.1/heliumNT/src/texthint/Main.hs 2003-03-12 22:38:29.000000000 +0000 -@@ -2,6 +2,7 @@ - - import Char - import List(isPrefixOf, isSuffixOf) -+import Readline - import Monad(when) - import IO(stdout, hFlush) - import System(system, getEnv, getArgs, exitWith, ExitCode(..)) -@@ -64,6 +65,11 @@ - cmdLoadModule (head args) initialState - else - return initialState -+ -+ -- Initialize readline -+ initialize -+ -- Deactivate filename completion -+ setCompletionEntryFunction (Just (const $ return [])) - - -- Enter read-eval-print loop - loop stateAfterLoad -@@ -79,9 +85,9 @@ - - loop :: State -> IO State - loop state = do -- putStr (prompt state) -- hFlush stdout -- command' <- getLine -+ command'' <- readline (prompt state) -+ let command' = maybe ":q" id command'' -+ addHistory command' - let command = trim command' - newState <- case command of - (':':cmd:rest) -> |