diff options
| author | bringert <bringert@cs.chalmers.se> | 2007-01-03 18:17:52 +0000 |
|---|---|---|
| committer | bringert <bringert@cs.chalmers.se> | 2007-01-03 18:17:52 +0000 |
| commit | 8aa283aebdddfa662798f594211321dd18c9046b (patch) | |
| tree | 0c2ab1d14c773ac56230cbf9d57e31a690184d6a /src | |
| parent | b1cde222bfb7a02aa72a3fa4ea7247cca4cef5bf (diff) | |
VoiceXML: when checking the callbacks, use typeof to avoid errors with Opera 9.10.
Diffstat (limited to 'src')
| -rw-r--r-- | src/GF/Speech/GrammarToVoiceXML.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/GF/Speech/GrammarToVoiceXML.hs b/src/GF/Speech/GrammarToVoiceXML.hs index 5fbef29b6..7b27e9f34 100644 --- a/src/GF/Speech/GrammarToVoiceXML.hs +++ b/src/GF/Speech/GrammarToVoiceXML.hs @@ -171,7 +171,7 @@ fun2sub gr cat fun args = doCallback :: String -> VIdent -> [XML] -> [XML] -> XML doCallback f cat i e = - if_else ("callbacks && " ++ cf ++ " && !" ++ cf ++ "("++string (prIdent cat)++","++ catFieldId cat ++ ")") + if_else ("typeof callbacks != 'undefined' && typeof " ++ cf ++ " != 'undefined' && !" ++ cf ++ "("++string (prIdent cat)++","++ catFieldId cat ++ ")") i e where cf = "callbacks." ++ f |