manatee-pdfviewer 0.0.1 → 0.0.2
raw patch · 2 files changed
+14/−10 lines, 2 filesdep ~manatee-core
Dependency ranges changed: manatee-core
Files
Manatee/Extension/PdfViewer/PdfView.hs view
@@ -110,7 +110,7 @@ widgetSetSizeRequest area (truncate winWidth) - (truncate (scaleValue * pageHeight * integralToDouble (pdfBufferNPages buffer)))+ (truncate (scaleValue * pageHeight * i2d (pdfBufferNPages buffer))) -- Get render index range and scale value. (indexRange, currentIndex) <- pdfViewGetIndexRange view@@ -129,7 +129,7 @@ drawWindow <- widgetGetDrawWindow area renderWithDrawable drawWindow $ do setSourceRGB 1.0 1.0 1.0- translate 0 (scaleValue * pageHeight * integralToDouble index)+ translate 0 (scaleValue * pageHeight * i2d index) scale scaleValue scaleValue pageRender page @@ -182,7 +182,7 @@ bottonIndex = truncate $ vAdjBottom / height startIndex = (\x -> if x < 0 then 0 else x) topIndex endIndex = (\x -> if x >= nPages then nPages - 1 else x) - $ if vAdjBottom - integralToDouble bottonIndex * height == 0.0+ $ if vAdjBottom - i2d bottonIndex * height == 0.0 then bottonIndex - 1 else bottonIndex -- Use point at half of visible area avoid bound value problem.@@ -205,7 +205,7 @@ | otherwise = currentIndex + 1 vAdj <- scrolledWindowGetVAdjustment scrolledWindow- adjustmentSetValue vAdj (integralToDouble nextIndex * height * scaleValue)+ adjustmentSetValue vAdj (i2d nextIndex * height * scaleValue) -- | View prev page. pdfViewPrevPage :: PdfView -> IO ()@@ -222,7 +222,7 @@ | otherwise = currentIndex - 1 vAdj <- scrolledWindowGetVAdjustment scrolledWindow- adjustmentSetValue vAdj (integralToDouble prevIndex * height * scaleValue)+ adjustmentSetValue vAdj (i2d prevIndex * height * scaleValue) -- | First page. pdfViewFirstPage :: PdfView -> IO ()@@ -237,5 +237,5 @@ maxIndex = pdfBufferNPages buffer - 1 scaleValue <- readTVarIO viewScale vAdj <- scrolledWindowGetVAdjustment scrolledWindow- adjustmentSetValue vAdj (integralToDouble maxIndex * height * scaleValue)+ adjustmentSetValue vAdj (i2d maxIndex * height * scaleValue)
manatee-pdfviewer.cabal view
@@ -1,5 +1,5 @@ name: manatee-pdfviewer-version: 0.0.1+version: 0.0.2 Cabal-Version: >= 1.6 license: GPL-3 license-file: LICENSE@@ -8,8 +8,12 @@ description: manatee-pdfviewer is PDF viewer extension for Manatee (Haskell/Gtk+ Integrated Live Environment) . If you see Chinese garbled in pdf viewer, make sure install package `poppler-data` - first, example, use command "sudo aptitude install poppler-data -y" to install it in Debian System.- And replace Chinese font in file `/etc/fonts/conf.d/49-sansserif.conf'+ .+ First use below command install `poppler-data' in Debain:+ .+ > sudo aptitude install poppler-data -y+ .+ And replace Chinese font string in file `/etc/fonts/conf.d/49-sansserif.conf' author: Andy Stewart maintainer: Andy Stewart <lazycat.manatee@gmail.com> stability: provisional@@ -23,7 +27,7 @@ location: http://patch-tag.com/r/AndyStewart/manatee-pdfviewer Library- build-depends: base >= 4 && < 5, manatee-core >= 0.0.1, dbus-client >= 0.3 && < 0.4, stm >= 2.1.2.0,+ build-depends: base >= 4 && < 5, manatee-core >= 0.0.2, dbus-client >= 0.3 && < 0.4, stm >= 2.1.2.0, containers >= 0.3.0.0, gtk-serialized-event >= 0.12.0, poppler >= 0.12.1, gtk >= 0.12.0, cairo >= 0.12.0, text >= 0.7.1.0, mtl >= 1.1.0.2, utf8-string exposed-modules: