msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

Fixes for minibar offline

Browse Source 
Tested it in Firefox 18 (which has the new Ionmonkey JavaScript engine).
Still get stack overflows.
This commit is contained in:
hallgren
2013-01-09 16:44:18 +00:00
parent 1497fd863a
commit f2751ff9e1
2 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
src/server/PGFService.hs
View File

@@ -48,15 +48,15 @@ cgiMain cache = handleErrors . handleCGIErrors $
cgiMain' :: Cache PGF -> FilePath -> CGI CGIResult
cgiMain' cache path =
do pgf <- liftIO $ readCache cache path
command <- liftM (maybe "grammar" (urlDecodeUnicode . UTF8.decodeString))
do command <- liftM (maybe "grammar" (urlDecodeUnicode . UTF8.decodeString))
(getInput "command")
pgfMain path pgf command
case command of
"download" -> outputBinary =<< liftIO (BS.readFile path)
_ -> pgfMain command =<< liftIO (readCache cache path)
pgfMain :: FilePath -> PGF -> String -> CGI CGIResult
pgfMain path pgf command =
pgfMain :: String -> PGF -> CGI CGIResult
pgfMain command pgf =
case command of
"download" -> outputBinary =<< liftIO (BS.readFile path)
"parse" -> outputJSONP =<< doParse pgf `fmap` getText `ap` getCat `ap` getFrom `ap` getLimit
"complete" -> outputJSONP =<< doComplete pgf `fmap` getText `ap` getCat `ap` getFrom `ap` getLimit
"linearize" -> outputJSONP =<< doLinearize pgf `fmap` getTree `ap` getTo

2
src/www/minibar/pgf_offline.js
View File

@@ -29,7 +29,7 @@ function pgf_offline(options) {
self.current_grammar_url=new_grammar_url;
if(cont) cont();
}
ajax_http_get_binary(new_grammar_url,update_pgf);
ajax_http_get_binary(new_grammar_url+"?command=download",update_pgf);
},
get_grammarlist: function(cont,err) {
if(this.grammar_list) cont(this.grammar_list)