fix(pdf): friendless break line for pdf selection text

pull/6178/head
charlie 2022-07-24 17:55:50 +08:00 committed by Junyi Du
parent 250913e31e
commit 999ae327d4
2 changed files with 14 additions and 3 deletions

View File

@ -122,7 +122,7 @@
"copy"
(do
(util/copy-to-clipboard!
(or (:text content) (.toString selection)))
(or (:text content) (pdf-utils/fix-selection-text-breakline (.toString selection))))
(pdf-utils/clear-all-selection))
"link"
@ -575,7 +575,7 @@
{:id nil
:page page
:position sc-pos
:content {:text (.toString selection)}
:content {:text (pdf-utils/fix-selection-text-breakline (.toString selection))}
:properties {}})))]
;; show ctx menu

View File

@ -4,7 +4,8 @@
[frontend.util :as util]
["/frontend/extensions/pdf/utils" :as js-utils]
[frontend.db :as front-db]
[frontend.loader :refer [load]]))
[frontend.loader :refer [load]]
[clojure.string :as string]))
(defonce MAX-SCALE 5.0)
(defonce MIN-SCALE 0.25)
@ -156,6 +157,16 @@
:height (.-height rect)})]
(optimize-client-reacts rects)))))
(defn fix-selection-text-breakline
[text]
(when-not (string/blank? text)
(let [sp "@#~#@"]
(-> text
(string/replace #"[\r\n]+" sp)
(string/replace (str "-" sp) "")
(string/replace sp " ")))))
;; TODO: which viewer instance?
(defn next-page
[]