swrup/geochan
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

add post_form.eml.html

Browse source
This commit is contained in:
Swrup 2022-04-19 00:06:23 +02:00
parent a6fc9b4346
commit d090934183
7 changed files with 48 additions and 48 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/js/post_form.ml
View file

@ -10,7 +10,7 @@ let insert_quote el _event =
| None -> "no data-emojid on element"
| Some emojid -> Jstr.to_string emojid
in
let textarea = find_by_id "reply-comment" in
let textarea = find_by_id "comment" in
let inner_html = El.Prop.jstr (Jstr.of_string "innerHTML") in
let content = Jstr.to_string @@ El.prop inner_html textarea in
let new_content =