[elpa] externals/elisa f2bf34b201 39/98: Improve sqlite escape function

[ELPA Syncer]

branch: externals/elisa
commit f2bf34b201fffcc49b3f2ed8d126bbe96d166c94
Author: Sergey Kostyaev <kostyaev.sergey2@wb.ru>
Commit: Sergey Kostyaev <kostyaev.sergey2@wb.ru>

    Improve sqlite escape function
---
 elisa.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/elisa.el b/elisa.el
index 6b94ca5f31..aaaa527153 100644
--- a/elisa.el
+++ b/elisa.el
@@ -207,7 +207,10 @@ concise. Act like user. Prompt:
 
 (defun elisa-sqlite-escape (s)
   "Escape single quotes in S for sqlite."
-  (string-replace "'" "''" s))
+  (thread-last
+    s
+    (string-replace "'" "''")
+    (string-replace "\\" "\\\\")))
 
 (defun elisa-parse-info-manual (name)
   "Parse info manual with NAME and save index to database."