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

\n when inserting citation

Browse source
This commit is contained in:
Swrup 2022-01-27 11:08:12 +01:00
parent f021a94fbc
commit 46bd98db36
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/js_thread.ml
View file

@ -10,7 +10,7 @@ let insert_quote post_id =
let content = Jv.get comment_textarea "value" in let content = Jv.get comment_textarea "value" in
let new_content = let new_content =
Jv.call content "concat" Jv.call content "concat"
[| Jv.of_string " >>"; post_id; Jv.of_string " " |] [| Jv.of_string "\n>>"; post_id; Jv.of_string " " |]
in in
ignore @@ Jv.set comment_textarea "value" new_content; ignore @@ Jv.set comment_textarea "value" new_content;
Jv.undefined Jv.undefined