crappyrules/notehub
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

HTMl generation delayed to the last key press

Browse Source
This commit is contained in:
Christian Mueller
2013-09-22 22:05:23 +02:00
parent 3c082c7b6b
commit 6ba9ecac4d
1 changed files with 14 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src-cljs/main.cljs
+11 -1
View File
@@ -25,14 +25,24 @@
; try to detect iOS ; try to detect iOS
(def ios-detected (.match (.-userAgent js/navigator) "(iPad|iPod|iPhone)")) (def ios-detected (.match (.-userAgent js/navigator) "(iPad|iPod|iPhone)"))
(def timer nil)
(def timerDelay
; TODO: also test for Android
(if ios-detected 800 400))
(defn update-preview (defn update-preview
"Updates the preview" "Updates the preview"
[] []
(do (do
(js/clearTimeout timer)
(def timer
(js/setTimeout
#(do
(show $dashed-line) (show $dashed-line)
(show $input-elems) (show $input-elems)
(inner $preview (inner $preview
(.makeHtml md-converter (val $draft))))) (.makeHtml md-converter (val $draft)))) timerDelay))))
; set focus to the draft textarea (if there is one) ; set focus to the draft textarea (if there is one)
(when $action (when $action