Skip to content

Commit b107535

Browse files
committed
fix(pdf): add extern hints for pdfjs apis
1 parent 98fad29 commit b107535

3 files changed

Lines changed: 6 additions & 14 deletions

File tree

externs.js

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -116,6 +116,8 @@ dummy.bounding = function() {};
116116
dummy.getPageView = function() {};
117117
dummy.convertToPdfPoint = function() {};
118118
dummy.scrollPageIntoView = function() {};
119+
dummy.textLayer = function() {};
120+
dummy.viewport = function() {};
119121
dummy.convertToViewportRectangle = function() {};
120122
dummy.init = function() {};
121123
dummy.commit = function() {};

src/main/frontend/extensions/pdf/core.cljs

Lines changed: 0 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -125,11 +125,6 @@
125125
#(.removeEventListener doc "click" cb)))
126126
[])
127127

128-
;; TODO: precise position
129-
;;(when-let [
130-
;;page-bounding (and highlight (pdf-utils/get-page-bounding viewer (:page highlight)))
131-
;;])
132-
133128
(let [*el (rum/use-ref nil)
134129
^js cnt (.-container viewer)
135130
^js body (some-> (.-ownerDocument cnt) (.-body))

src/main/frontend/extensions/pdf/utils.cljs

Lines changed: 4 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -32,27 +32,22 @@
3232

3333
(defn vw-to-scaled-pos
3434
[^js viewer {:keys [page bounding rects]}]
35-
(when-let [^js viewport (some-> viewer (.getPageView (dec page)) (.-viewport))]
35+
(when-let [^js viewport (some-> viewer ^js (.getPageView (dec page)) (.-viewport))]
3636
{:bounding (viewport-to-scaled bounding viewport)
3737
:rects (for [rect rects] (viewport-to-scaled rect viewport))
3838
:page page}))
3939

4040
(defn scaled-to-vw-pos
4141
[^js viewer {:keys [page bounding rects]}]
42-
(when-let [^js viewport (some-> viewer (.getPageView (dec page)) (.-viewport))]
42+
(when-let [^js viewport (some-> viewer ^js (.getPageView (dec page)) (.-viewport))]
4343
{:bounding (scaled-to-viewport bounding viewport)
4444
:rects (for [rect rects] (scaled-to-viewport rect viewport))
4545
:page page}))
4646

47-
(defn get-page-bounding
48-
[^js viewer page-number]
49-
(when-let [^js el (and page-number (.. viewer (getPageView (dec page-number)) -div))]
50-
(bean/->clj (.toJSON (.getBoundingClientRect el)))))
51-
5247
(defn resolve-hls-layer!
5348
[^js viewer page]
54-
(when-let [^js text-layer (some-> viewer (.getPageView (dec page)) (.-textLayer))]
55-
(let [cnt (.-div text-layer)
49+
(when-let [^js text-layer (some-> viewer ^js (.getPageView (dec page)) (.-textLayer))]
50+
(let [^js cnt (.-div text-layer)
5651
cls "extensions__pdf-hls-layer"
5752
doc js/document
5853
layer (.querySelector cnt (str "." cls))]

0 commit comments

Comments
 (0)