diff options
| -rw-r--r-- | gnu/packages/ocr.scm | 70 |
1 files changed, 70 insertions, 0 deletions
diff --git a/gnu/packages/ocr.scm b/gnu/packages/ocr.scm index c4e965941a..15e1811d6b 100644 --- a/gnu/packages/ocr.scm +++ b/gnu/packages/ocr.scm @@ -4,6 +4,7 @@ ;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2019 Alex Vong <alexvong1995@gmail.com> ;;; Copyright © 2021 Andy Tai <atai@atai.org> +;;; Copyright © 2021 Nicolas Goaziou <mail@nicolasgoaziou.fr> ;;; ;;; This file is part of GNU Guix. ;;; @@ -25,6 +26,7 @@ #:use-module (guix packages) #:use-module (guix download) #:use-module (guix git-download) + #:use-module (guix build-system cmake) #:use-module (guix build-system gnu) #:use-module (guix build-system python) #:use-module (gnu packages) @@ -33,12 +35,19 @@ #:use-module (gnu packages check) #:use-module (gnu packages compression) #:use-module (gnu packages curl) + #:use-module (gnu packages djvu) #:use-module (gnu packages docbook) #:use-module (gnu packages documentation) + #:use-module (gnu packages enchant) + #:use-module (gnu packages gettext) + #:use-module (gnu packages glib) #:use-module (gnu packages gtk) #:use-module (gnu packages icu4c) + #:use-module (gnu packages pdf) #:use-module (gnu packages pkg-config) #:use-module (gnu packages python) + #:use-module (gnu packages qt) + #:use-module (gnu packages scanner) #:use-module (gnu packages xml) #:use-module (gnu packages image)) @@ -130,6 +139,67 @@ supported through the Leptonica library. It can also detect whether text is monospaced or proportional.") (license license:asl2.0)))) +(define-public gimagereader + (package + (name "gimagereader") + (version "3.3.1") + (source + (origin + (method url-fetch) + (uri (string-append + "https://github.com/manisandro/gImageReader/releases" + "/download/v" version "/" + "gimagereader-" version ".tar.xz")) + (sha256 + (base32 "1pghffb55k3wq33nbn9fi0lmjbldpmvqs2msnvss8bxz1k1ck23n")))) + (build-system cmake-build-system) + (arguments + `(#:tests? #f ;no test + #:configure-flags (list "-DENABLE_VERSIONCHECK=0") + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'fix-build + ;; XXX: Prevent compilation error: "incomplete type ‘QUrl’ used in + ;; nested name specifier". Fixed upstream as + ;; 6209e25dab20b233e399ff36fabe4252db0f9e44. It can be removed in + ;; release 3.3.2+. + (lambda _ + (with-directory-excursion "qt/src/hocr" + (substitute* '("HOCROdtExporter.cc" "HOCRTextExporter.cc") + (("#include <QMessageBox>\n" all) + (string-append all "#include <QUrl>\n")))) + #t))))) + (native-inputs + `(("gettext" ,gettext-minimal) + ("intltool" ,intltool) + ("pkg-config" ,pkg-config))) + (inputs + `(("enchant" ,enchant) + ("djvulibre" ,djvulibre) + ("leptonica" ,leptonica) + ("podofo" ,podofo) + ("poppler-qt5" ,poppler-qt5) + ("sane-backends" ,sane-backends) + ("qtbase" ,qtbase) + ("qtspell" ,qtspell) + ("quazip" ,quazip) + ("tesseract" ,tesseract-ocr))) + (home-page "https://github.com/manisandro/gImageReader") + (synopsis "Qt front-end to tesseract-ocr") + (description + "gImageReader is a Qt front-end to Tesseract optical character +recognition (OCR) software. + +gImageReader supports automatic page layout detection but the user can +also manually define and adjust the recognition regions. It is +possible to import images from disk, scanning devices, clipboard and +screenshots. gImageReader also supports multipage PDF documents. +Recognized text is displayed directly next to the image and basic text +editing including search/replace and removing of line breaks is +possible. Spellchecking for the output text is also supported if the +corresponding dictionaries are installed.") + (license license:gpl3+))) + (define-public zinnia (let* ((commit "581faa8f6f15e4a7b21964be3a5ec36265c80e5b") (revision "1") |