mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-26 22:38:07 -05:00
c4133c43c7
Conflicts: gnu/packages/algebra.scm gnu/packages/games.scm gnu/packages/golang.scm gnu/packages/kerberos.scm gnu/packages/mail.scm gnu/packages/python.scm gnu/packages/ruby.scm gnu/packages/scheme.scm gnu/packages/tex.scm gnu/packages/tls.scm gnu/packages/version-control.scm
823 lines
32 KiB
Scheme
823 lines
32 KiB
Scheme
;;; GNU Guix --- Functional package management for GNU
|
|
;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020, 2021 Ricardo Wurmus <rekado@elephly.net>
|
|
;;; Copyright © 2015 Andreas Enge <andreas@enge.fr>
|
|
;;; Copyright © 2016 Chris Marusich <cmmarusich@gmail.com>
|
|
;;; Copyright © 2017, 2018 Efraim Flashner <efraim@flashner.co.il>
|
|
;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
|
|
;;; Copyright © 2018, 2019, 2020, 2021 Peng Mei Yu <pengmeiyu@riseup.net>
|
|
;;; Copyright © 2020 kanichos <kanichos@yandex.ru>
|
|
;;; Copyright © 2020 Vincent Legoll <vincent.legoll@gmail.com>
|
|
;;;
|
|
;;; This file is part of GNU Guix.
|
|
;;;
|
|
;;; GNU Guix is free software; you can redistribute it and/or modify it
|
|
;;; under the terms of the GNU General Public License as published by
|
|
;;; the Free Software Foundation; either version 3 of the License, or (at
|
|
;;; your option) any later version.
|
|
;;;
|
|
;;; GNU Guix is distributed in the hope that it will be useful, but
|
|
;;; WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
;;; GNU General Public License for more details.
|
|
;;;
|
|
;;; You should have received a copy of the GNU General Public License
|
|
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
(define-module (gnu packages ibus)
|
|
#:use-module (guix licenses)
|
|
#: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 glib-or-gtk)
|
|
#:use-module (guix utils)
|
|
#:use-module (gnu packages)
|
|
#:use-module (gnu packages anthy)
|
|
#:use-module (gnu packages autotools)
|
|
#:use-module (gnu packages base)
|
|
#:use-module (gnu packages boost)
|
|
#:use-module (gnu packages check)
|
|
#:use-module (gnu packages cmake)
|
|
#:use-module (gnu packages databases)
|
|
#:use-module (gnu packages datastructures)
|
|
#:use-module (gnu packages dbm)
|
|
#:use-module (gnu packages docbook)
|
|
#:use-module (gnu packages freedesktop)
|
|
#:use-module (gnu packages gettext)
|
|
#:use-module (gnu packages glib)
|
|
#:use-module (gnu packages gnome)
|
|
#:use-module (gnu packages gtk)
|
|
#:use-module (gnu packages iso-codes)
|
|
#:use-module (gnu packages logging)
|
|
#:use-module (gnu packages perl)
|
|
#:use-module (gnu packages pkg-config)
|
|
#:use-module (gnu packages python)
|
|
#:use-module (gnu packages python-xyz)
|
|
#:use-module (gnu packages serialization)
|
|
#:use-module (gnu packages sqlite)
|
|
#:use-module (gnu packages textutils)
|
|
#:use-module (gnu packages unicode)
|
|
#:use-module (gnu packages xorg)
|
|
#:use-module (gnu packages xdisorg))
|
|
|
|
(define-public ibus
|
|
(package
|
|
(name "ibus")
|
|
(version "1.5.24")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://github.com/ibus/ibus/"
|
|
"releases/download/"
|
|
version "/ibus-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"07s2ly75xv50bqg37mn37i9akqvcfd45k2mbplxrsqk3a2b3mwxb"))))
|
|
(build-system glib-or-gtk-build-system)
|
|
(outputs '("out" "doc"))
|
|
(arguments
|
|
`(#:parallel-build? #f ; race condition discovered with emoji support
|
|
#:configure-flags (list "--enable-python-library"
|
|
"--enable-gtk-doc"
|
|
"--enable-memconf"
|
|
(string-append
|
|
"--with-unicode-emoji-dir="
|
|
(assoc-ref %build-inputs "unicode-emoji")
|
|
"/share/unicode/emoji")
|
|
(string-append
|
|
"--with-emoji-annotation-dir="
|
|
(assoc-ref %build-inputs "unicode-cldr-common")
|
|
"/share/unicode/cldr/common/annotations")
|
|
(string-append "--with-ucd-dir="
|
|
(assoc-ref %build-inputs "ucd")
|
|
"/share/ucd")
|
|
"--enable-wayland")
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'unpack 'disable-failing-tests
|
|
(lambda _
|
|
;; These tests require /etc/machine-id.
|
|
(with-directory-excursion "src/tests"
|
|
(substitute* '("ibus-share.c" "ibus-compose.c"
|
|
"ibus-keypress.c")
|
|
(("[ \t]*return g_test_run \\(\\);") "")))))
|
|
(add-after 'unpack 'patch-docbook-xml
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
(with-directory-excursion "docs/reference/ibus"
|
|
(substitute* "ibus-docs.sgml.in"
|
|
(("http://www.oasis-open.org/docbook/xml/4.1.2/")
|
|
(string-append (assoc-ref inputs "docbook-xml")
|
|
"/xml/dtd/docbook/"))))))
|
|
(add-after 'unpack 'patch-python-target-directories
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(let ((root (string-append (assoc-ref outputs "out")
|
|
"/lib/python"
|
|
,(version-major+minor (package-version python))
|
|
"/site-packages")))
|
|
(substitute* "configure"
|
|
(("(py2?overridesdir)=.*" _ var)
|
|
(string-append var "=" root "/gi/overrides/"))
|
|
(("(pkgpython2dir=).*" _ var)
|
|
(string-append var root "/ibus"))))))
|
|
(add-before 'configure 'disable-dconf-update
|
|
(lambda _
|
|
(substitute* "data/dconf/Makefile.in"
|
|
(("dconf update") "echo dconf update"))))
|
|
(add-after 'unpack 'delete-generated-files
|
|
(lambda _
|
|
(for-each (lambda (file)
|
|
(let ((c (string-append (string-drop-right file 4) "c")))
|
|
(when (file-exists? c)
|
|
(format #t "deleting ~a\n" c)
|
|
(delete-file c))))
|
|
(find-files "." "\\.vala"))))
|
|
(add-after 'unpack 'fix-paths
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
(substitute* "src/ibusenginesimple.c"
|
|
(("/usr/share/X11/locale")
|
|
(search-input-directory inputs
|
|
"share/X11/locale")))
|
|
(substitute* "ui/gtk3/xkblayout.vala"
|
|
(("\"(setxkbmap|xmodmap)\"" _ prog)
|
|
(string-append "\""
|
|
(search-input-file inputs
|
|
(string-append "bin/" prog))
|
|
"\"")))))
|
|
(add-before 'check 'pre-check
|
|
(lambda _
|
|
;; Tests write to $HOME.
|
|
(setenv "HOME" (getcwd))
|
|
;; Tests look for $XDG_RUNTIME_DIR.
|
|
(setenv "XDG_RUNTIME_DIR" (getcwd))
|
|
;; For missing '/etc/machine-id'.
|
|
(setenv "DBUS_FATAL_WARNINGS" "0")
|
|
;; Tests require a running X server.
|
|
(system "Xvfb :1 +extension GLX &")
|
|
(setenv "DISPLAY" ":1")
|
|
;; Tests require running iBus daemon.
|
|
(system "./bus/ibus-daemon --daemonize")))
|
|
(add-after 'install 'move-doc
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(let* ((out (assoc-ref outputs "out"))
|
|
(doc (assoc-ref outputs "doc")))
|
|
(mkdir-p (string-append doc "/share"))
|
|
(rename-file
|
|
(string-append out "/share/gtk-doc")
|
|
(string-append doc "/share/gtk-doc")))))
|
|
(add-after 'wrap-program 'wrap-with-additional-paths
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
;; Make sure 'ibus-setup' runs with the correct PYTHONPATH and
|
|
;; GI_TYPELIB_PATH.
|
|
(let ((out (assoc-ref outputs "out")))
|
|
(wrap-program (string-append out "/bin/ibus-setup")
|
|
`("GUIX_PYTHONPATH" ":" prefix (,(getenv "GUIX_PYTHONPATH")))
|
|
`("GI_TYPELIB_PATH" ":" prefix
|
|
(,(getenv "GI_TYPELIB_PATH")
|
|
,(string-append out "/lib/girepository-1.0"))))))))))
|
|
(inputs
|
|
`(("dbus" ,dbus)
|
|
("dconf" ,dconf)
|
|
("glib" ,glib)
|
|
("gtk2" ,gtk+-2)
|
|
("gtk+" ,gtk+)
|
|
("iso-codes" ,iso-codes)
|
|
("json-glib" ,json-glib)
|
|
("libnotify" ,libnotify)
|
|
("libx11" ,libx11)
|
|
("libxkbcommon" ,libxkbcommon)
|
|
("libxtst" ,libxtst)
|
|
("pygobject" ,python-pygobject)
|
|
("python" ,python)
|
|
("python-dbus" ,python-dbus)
|
|
("setxkbmap" ,setxkbmap)
|
|
("ucd" ,ucd)
|
|
("unicode-cldr-common" ,unicode-cldr-common)
|
|
("unicode-emoji" ,unicode-emoji)
|
|
("wayland" ,wayland)
|
|
("xmodmap" ,xmodmap)))
|
|
(native-inputs
|
|
`(("docbook-xml" ,docbook-xml-4.1.2)
|
|
("glib" ,glib "bin") ; for glib-genmarshal
|
|
("gettext" ,gettext-minimal)
|
|
("gnome-common" ,gnome-common)
|
|
("gobject-introspection" ,gobject-introspection) ; for g-ir-compiler
|
|
("gtk+:bin" ,gtk+ "bin")
|
|
("gtk-doc" ,gtk-doc)
|
|
("perl" ,perl)
|
|
("pkg-config" ,pkg-config)
|
|
("python-wrapper" ,python-wrapper)
|
|
("vala" ,vala)
|
|
("which" ,which)
|
|
("xorg-server" ,xorg-server-for-tests)))
|
|
(native-search-paths
|
|
(list (search-path-specification
|
|
(variable "IBUS_COMPONENT_PATH")
|
|
(files '("share/ibus/component")))))
|
|
(synopsis "Input method framework")
|
|
(description
|
|
"IBus is an input framework providing a full-featured and user-friendly
|
|
input method user interface. It comes with multilingual input support. It
|
|
may also simplify input method development.")
|
|
(home-page "https://github.com/ibus/ibus/wiki")
|
|
(license lgpl2.1+)))
|
|
|
|
(define-public ibus-libpinyin
|
|
(package
|
|
(name "ibus-libpinyin")
|
|
(version "1.12.0")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://github.com/libpinyin/ibus-libpinyin/"
|
|
"releases/download/" version
|
|
"/ibus-libpinyin-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0xl2lmffy42f6h6za05z4vpazpza1a9gsrva65giwyv3kpf652dd"))))
|
|
(build-system glib-or-gtk-build-system)
|
|
(arguments
|
|
`(#:configure-flags
|
|
'("--enable-opencc")
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'wrap-program 'wrap-with-additional-paths
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
;; Make sure 'ibus-setup-libpinyin' runs with the correct
|
|
;; PYTHONPATH and GI_TYPELIB_PATH.
|
|
(let ((out (assoc-ref outputs "out")))
|
|
(wrap-program (string-append out "/libexec/ibus-setup-libpinyin")
|
|
`("GUIX_PYTHONPATH" ":" prefix
|
|
(,(getenv "GUIX_PYTHONPATH")
|
|
,(string-append (assoc-ref inputs "ibus")
|
|
"/lib/girepository-1.0")
|
|
,(string-append (assoc-ref outputs "out")
|
|
"/share/ibus-libpinyin/setup/")))
|
|
`("GI_TYPELIB_PATH" ":" prefix
|
|
(,(string-append (assoc-ref inputs "ibus")
|
|
"/lib/girepository-1.0")
|
|
,(string-append (assoc-ref outputs "out")
|
|
"/share/ibus-libpinyin/setup/"))))
|
|
#t))))))
|
|
(inputs
|
|
`(("ibus" ,ibus)
|
|
("libpinyin" ,libpinyin)
|
|
("bdb" ,bdb)
|
|
("sqlite" ,sqlite)
|
|
("opencc" ,opencc)
|
|
("python" ,python)
|
|
("pygobject2" ,python-pygobject)
|
|
("gtk+" ,gtk+)))
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)
|
|
("intltool" ,intltool)
|
|
("glib" ,glib "bin")))
|
|
(synopsis "Chinese pinyin and ZhuYin input methods for IBus")
|
|
(description
|
|
"This package includes a Chinese pinyin input method and a Chinese
|
|
ZhuYin (Bopomofo) input method based on libpinyin for IBus.")
|
|
(home-page "https://github.com/libpinyin/ibus-libpinyin")
|
|
(license gpl3+)))
|
|
|
|
(define-public libpinyin
|
|
(package
|
|
(name "libpinyin")
|
|
(version "2.6.0")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://github.com/libpinyin/libpinyin/"
|
|
"releases/download/" version
|
|
"/libpinyin-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"10h5mjgv4ibhispvr3s1k36a4aclx4dcvcc2knd4sg1xibw0dp4w"))))
|
|
(build-system gnu-build-system)
|
|
(inputs
|
|
`(("glib" ,glib)
|
|
("bdb" ,bdb)))
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)))
|
|
(synopsis "Library to handle Chinese pinyin")
|
|
(description
|
|
"The libpinyin C++ library provides algorithms needed for sentence-based
|
|
Chinese pinyin input methods.")
|
|
(home-page "https://github.com/libpinyin/libpinyin")
|
|
(license gpl2+)))
|
|
|
|
(define-public ibus-anthy
|
|
(package
|
|
(name "ibus-anthy")
|
|
(version "1.5.9")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append
|
|
"https://github.com/ibus/ibus-anthy/releases/download/"
|
|
version "/ibus-anthy-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"1y8sf837rmp662bv6zakny0xcm7c9c5qda7f9kq9riv9ywpcbw6x"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
'(#:configure-flags
|
|
;; Use absolute exec path in the anthy.xml.
|
|
(list (string-append "--libexecdir=" %output "/libexec"))
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'install 'wrap-programs
|
|
(lambda* (#:key outputs #:allow-other-keys)
|
|
(let ((out (assoc-ref outputs "out")))
|
|
(for-each
|
|
(lambda (prog)
|
|
(wrap-program (string-append out "/libexec/" prog)
|
|
`("GUIX_PYTHONPATH" ":" prefix
|
|
(,(getenv "GUIX_PYTHONPATH")))
|
|
`("GI_TYPELIB_PATH" ":" prefix
|
|
(,(getenv "GI_TYPELIB_PATH")
|
|
,(string-append out "/lib/girepository-1.0")))))
|
|
'("ibus-engine-anthy" "ibus-setup-anthy"))
|
|
#t))))))
|
|
(native-inputs
|
|
`(("gettext" ,gettext-minimal)
|
|
("intltool" ,intltool)
|
|
("pkg-config" ,pkg-config)
|
|
("python" ,python)))
|
|
(inputs
|
|
`(("anthy" ,anthy)
|
|
("gtk+" ,gtk+)
|
|
("ibus" ,ibus)
|
|
("gobject-introspection" ,gobject-introspection)
|
|
("python-pygobject" ,python-pygobject)))
|
|
(synopsis "Anthy Japanese language input method for IBus")
|
|
(description "IBus-Anthy is an engine for the input bus \"IBus\"). It
|
|
adds the Anthy Japanese language input method to IBus. Because most graphical
|
|
applications allow text input via IBus, installing this package will enable
|
|
Japanese language input in most graphical applications.")
|
|
(home-page "https://github.com/fujiwarat/ibus-anthy")
|
|
(license gpl2+)))
|
|
|
|
(define-public librime
|
|
(package
|
|
(name "librime")
|
|
(version "1.7.3")
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/librime")
|
|
(commit version)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32
|
|
"0pqk0i3zcii3fx5laj9qzbgd58jvq6wn31j76w4zix2i4b1lqcqv"))
|
|
(modules '((guix build utils)))
|
|
(snippet
|
|
'(begin
|
|
(delete-file-recursively "thirdparty/src")
|
|
(delete-file-recursively "thirdparty/bin")
|
|
(delete-file-recursively "thirdparty/include/X11")
|
|
#t))))
|
|
(build-system cmake-build-system)
|
|
(arguments
|
|
'(#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'unpack 'patch-source
|
|
(lambda _
|
|
(substitute* "CMakeLists.txt"
|
|
(("include_directories\\($\\{PROJECT_SOURCE_DIR\\}/thirdparty/include\\)") "")
|
|
(("link_directories\\($\\{PROJECT_SOURCE_DIR\\}/thirdparty/lib\\)") ""))
|
|
#t)))))
|
|
(inputs
|
|
`(("boost" ,boost)
|
|
("capnproto" ,capnproto)
|
|
("glog" ,glog)
|
|
("leveldb" ,leveldb)
|
|
("marisa" ,marisa)
|
|
("opencc" ,opencc)
|
|
("yaml-cpp" ,yaml-cpp)))
|
|
(native-inputs
|
|
`(("googletest" ,googletest)
|
|
("pkg-config" ,pkg-config)
|
|
("xorgproto" ,xorgproto))) ; keysym.h
|
|
(home-page "https://rime.im/")
|
|
(synopsis "The core library of Rime Input Method Engine")
|
|
(description "@dfn{librime} is the core library of Rime Input Method
|
|
Engine, which is a lightweight, extensible input method engine supporting
|
|
various input schemas including glyph-based input methods, romanization-based
|
|
input methods as well as those for Chinese dialects. It has the ability to
|
|
compose phrases and sentences intelligently and provide very accurate
|
|
traditional Chinese output.")
|
|
(license bsd-3)))
|
|
|
|
(define-public rime-data
|
|
(package
|
|
(name "rime-data")
|
|
(version "0.38.20210802")
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/plum")
|
|
(commit "0b835e347cad9c2d7038cfe82df5b5d1fe1c0327")))
|
|
(file-name "plum-checkout")
|
|
(sha256
|
|
(base32 "0mja4wyazxdc6fr7pzij5ah4rzwxv4s12s64vfn5ikx1ias1f8ib"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
`(#:modules ((ice-9 match)
|
|
,@%gnu-build-system-modules)
|
|
#:tests? #f ; no tests
|
|
#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")))
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'unpack 'patch-source
|
|
(lambda _
|
|
;; Disable git operations.
|
|
(substitute* "scripts/install-packages.sh"
|
|
(("^\\s*fetch_or_update_package\\s$") ""))
|
|
#t))
|
|
;; Copy Rime schemas into the "package/rime" directory.
|
|
(add-after 'unpack 'copy-rime-schemas
|
|
(lambda* (#:key inputs #:allow-other-keys)
|
|
(let ((dest-dir "package/rime"))
|
|
(mkdir-p dest-dir)
|
|
(for-each
|
|
(match-lambda
|
|
((name . path)
|
|
(if (string-prefix? "rime-" name)
|
|
(let ((schema (substring name (string-length "rime-"))))
|
|
(symlink path (string-append dest-dir "/" schema))))))
|
|
inputs))
|
|
#t))
|
|
(replace 'build
|
|
;; NOTE: Don't build binary Rime schema. Binary Rime schema files
|
|
;; are platform dependent and contain timestamp information.
|
|
;; Therefore they are not reproducible.
|
|
(lambda* (#:key make-flags #:allow-other-keys)
|
|
(apply invoke "make" "all" make-flags)))
|
|
(delete 'configure))))
|
|
(inputs
|
|
`(("rime-array"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-array")
|
|
(commit "7a7bfafae966e5f949a23a82ee8594cacf492593")))
|
|
(file-name "rime-array-checkout")
|
|
(sha256
|
|
(base32
|
|
"0kw0wyc5f77bv06fixkfvqnibmm80pyifvrhz8f1h411926ny37r"))))
|
|
("rime-bopomofo"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-bopomofo")
|
|
(commit "c7618f4f5728e1634417e9d02ea50d82b71956ab")))
|
|
(file-name "rime-bopomofo-checkout")
|
|
(sha256
|
|
(base32
|
|
"0g77nv0jrwqnbqqna0ib0kqcy6l5zl62kh49ny67d6bjwnwz9186"))))
|
|
("rime-cangjie"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-cangjie")
|
|
(commit "8dfad9e537f18821b71ba28773315d9c670ae245")))
|
|
(file-name "rime-cangjie-checkout")
|
|
(sha256
|
|
(base32
|
|
"029kw9nx6x0acg4f0m8wj1ziqffffhy9yyj51nlx17cnia0qcrby"))))
|
|
("rime-cantonese"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-cantonese")
|
|
(commit "fa7c8ad19d51143c1a470295d56feeb63e92113f")))
|
|
(file-name "rime-cantonese-checkout")
|
|
(sha256
|
|
(base32
|
|
"0vy5vv6h4r4b2msdvdrsj0zr6wmrv0fxm5zyyvxq8f1ix7ignm4c"))))
|
|
("rime-combo-pinyin"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-combo-pinyin")
|
|
(commit "a84065a86b272c76215215bd6f03c506b6e7097c")))
|
|
(file-name "rime-combo-pinyin-checkout")
|
|
(sha256
|
|
(base32
|
|
"1f0b4kakw0x26gmx7xi4f94nbjlb8lvi9bks4f92jswa045vnd87"))))
|
|
("rime-double-pinyin"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-double-pinyin")
|
|
(commit "69bf85d4dfe8bac139c36abbd68d530b8b6622ea")))
|
|
(file-name "rime-double-pinyin-checkout")
|
|
(sha256
|
|
(base32
|
|
"093wif5avvvw45fqbwj5wkbxrychy4pagl4mwsmbrayc8jkp69ak"))))
|
|
("rime-emoji"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-emoji")
|
|
(commit "4c8c51f4a3bc7298c99376eda9bbd86070fc4fa1")))
|
|
(file-name "rime-emoji-checkout")
|
|
(sha256
|
|
(base32
|
|
"0175jqh210fncafqckr9zzaw55qpswmqjrykwms1apmc68l43122"))))
|
|
("rime-essay"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-essay")
|
|
(commit "9db2e77305e75798baf3ec8dcf1f82785b5e1be9")))
|
|
(file-name "rime-essay-checkout")
|
|
(sha256
|
|
(base32
|
|
"03ypkkaadd5qmyg26n24a66cll90xvcimgbmiyv4d33jradiqg22"))))
|
|
("rime-ipa"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-ipa")
|
|
(commit "22b71710e029bcb412e9197192a638ab11bc2abf")))
|
|
(file-name "rime-ipa-checkout")
|
|
(sha256
|
|
(base32
|
|
"0zdk4f9qkfj3q5hmjnairj1lv6f6y27mic12k886n6sxywwbwr2k"))))
|
|
("rime-jyutping"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-jyutping")
|
|
(commit "1e24baa6998815c716c581effe8ec65ee87c4e8c")))
|
|
(file-name "rime-jyutping-checkout")
|
|
(sha256
|
|
(base32
|
|
"0s2rckpwlrm3n7w1csnqyi5p9mkpp3z87s7mrm2vc9sv06rpv7zl"))))
|
|
("rime-luna-pinyin"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-luna-pinyin")
|
|
(commit "623adb022b094d540218b287c2e601509eee3347")))
|
|
(file-name "rime-luna-pinyin-checkout")
|
|
(sha256
|
|
(base32
|
|
"06pcwp09l5wkqv7792gbsl31xnlb3gr9q6bgbp94vvq6m2ycahqz"))))
|
|
("rime-middle-chinese"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-middle-chinese")
|
|
(commit "9fad7a7c0c26167d5e6e85db8df48a15c7f7d4f0")))
|
|
(file-name "rime-middle-chinese-checkout")
|
|
(sha256
|
|
(base32
|
|
"0a0bqrlzg0k692xblqnh1rh1fwwqqb205xwxlihgji85n8ibcgph"))))
|
|
("rime-pinyin-simp"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-pinyin-simp")
|
|
(commit "b0e84cda02c613ebdedc127a26131b3800f45a8e")))
|
|
(file-name "rime-pinyin-simp-checkout")
|
|
(sha256
|
|
(base32
|
|
"05v804qr3a9xvjzp9yid7231fi2l2yrl47ybbvql61z9k36ab094"))))
|
|
("rime-prelude"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-prelude")
|
|
(commit "3de303ffaa731dba07b0462ce59f4767e1219ad2")))
|
|
(file-name "rime-prelude-checkout")
|
|
(sha256
|
|
(base32
|
|
"0g7a0bla58rh1v3md59k6adk185pilb4z8i2i0pqdl4nwqp40n2p"))))
|
|
("rime-quick"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-quick")
|
|
(commit "3fe5911ba608cb2df1b6301b76ad1573bd482a76")))
|
|
(file-name "rime-quick-checkout")
|
|
(sha256
|
|
(base32
|
|
"08bh87ym5qvw55lyw20l3m7jd4c2z5rvil8h5q8790r7z6j6ijy9"))))
|
|
("rime-scj"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-scj")
|
|
(commit "cab5a0858765eff0553dd685a2d61d5536e9149c")))
|
|
(file-name "rime-scj-checkout")
|
|
(sha256
|
|
(base32
|
|
"0ard2bjp4896a8dimmcwyjwgmp9kl4rz92yc92jnd3y4rgwl6fvk"))))
|
|
("rime-soutzoe"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-soutzoe")
|
|
(commit "beeaeca72d8e17dfd1e9af58680439e9012987dc")))
|
|
(file-name "rime-soutzoe-checkout")
|
|
(sha256
|
|
(base32
|
|
"0jyqx0q9s0qxn168l5n8zav8jcl2g5ppr7pa8jm1vwrllf20slcc"))))
|
|
("rime-stenotype"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-stenotype")
|
|
(commit "f3e9189d5ce33c55d3936cc58e39d0c88b3f0c88")))
|
|
(file-name "rime-stenotype-checkout")
|
|
(sha256
|
|
(base32
|
|
"0dl6px7lrh3xa87knjzwzdcwjj1k1dg4l72q7lb48an4s9f1cy5d"))))
|
|
("rime-stroke"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-stroke")
|
|
(commit "ea8576d1accd6fda339e96b415caadb56e2a07d1")))
|
|
(file-name "rime-stroke-checkout")
|
|
(sha256
|
|
(base32
|
|
"07h6nq9867hjrd2v3h1pnr940sdrw4mqrzj43siz1rzjxz3s904r"))))
|
|
("rime-terra-pinyin"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-terra-pinyin")
|
|
(commit "ce7b9249612f575d2f43d51fcacd31d1b4e0ef1b")))
|
|
(file-name "rime-terra-pinyin-checkout")
|
|
(sha256
|
|
(base32
|
|
"0vm303f4lrdmdmif5klrp6w29vn9z2vzw33cw0y83pcnz39wiads"))))
|
|
("rime-wubi"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-wubi")
|
|
(commit "f1876f08f1d4a9696395be0070c0e8e4353c44cb")))
|
|
(file-name "rime-wubi-checkout")
|
|
(sha256
|
|
(base32
|
|
"1d9y9rqssacria9d0hla96czsqv2wkfm6z926m1x269ryv96zxvk"))))
|
|
("rime-wugniu"
|
|
,(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/rime-wugniu")
|
|
(commit "abd1ee98efbf170258fcf43875c21a4259e00b61")))
|
|
(file-name "rime-wugniu-checkout")
|
|
(sha256
|
|
(base32
|
|
"0qn54d3cclny106ixdw08r5n6wn52ffs1hgrma3k0j4pv0kr9nlq"))))))
|
|
(home-page "https://rime.im/")
|
|
(synopsis "Schema data of Rime Input Method Engine")
|
|
(description "@dfn{rime-data} provides the schema data of Rime Input
|
|
Method Engine.")
|
|
(license (list
|
|
;; rime-array
|
|
;; rime-combo-pinyin
|
|
;; rime-double-pinyin
|
|
;; rime-middle-chinese
|
|
;; rime-scj
|
|
;; rime-soutzoe
|
|
;; rime-stenotype
|
|
;; rime-wugniu
|
|
gpl3
|
|
|
|
;; plum
|
|
;; rime-bopomofo
|
|
;; rime-cangjie
|
|
;; rime-emoji
|
|
;; rime-essay
|
|
;; rime-ipa
|
|
;; rime-jyutping
|
|
;; rime-luna-pinyin
|
|
;; rime-prelude
|
|
;; rime-quick
|
|
;; rime-stroke
|
|
;; rime-terra-pinyin
|
|
;; rime-wubi
|
|
lgpl3
|
|
|
|
;; rime-pinyin-simp
|
|
asl2.0
|
|
|
|
;; rime-cantonese
|
|
cc-by4.0))))
|
|
|
|
(define-public ibus-rime
|
|
(package
|
|
(name "ibus-rime")
|
|
(version "1.5.0")
|
|
(source
|
|
(origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/rime/ibus-rime")
|
|
(commit version)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32 "1vl3m6ydf7mvmalpdqqmrnnmqdi6l8yyac3bv19pp8a5q3qhkwlg"))))
|
|
(build-system cmake-build-system)
|
|
(arguments
|
|
`(#:tests? #f ; no tests
|
|
#:configure-flags
|
|
(list (string-append "-DRIME_DATA_DIR="
|
|
(assoc-ref %build-inputs "rime-data")
|
|
"/share/rime-data"))
|
|
#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'unpack 'patch-source
|
|
(lambda _
|
|
(substitute* "CMakeLists.txt"
|
|
(("DESTINATION....RIME_DATA_DIR..")
|
|
"DESTINATION \"${CMAKE_INSTALL_DATADIR}/rime-data\""))
|
|
#t)))))
|
|
(inputs
|
|
`(("gdk-pixbuf" ,gdk-pixbuf)
|
|
("glib" ,glib)
|
|
("ibus" ,ibus)
|
|
("libnotify" ,libnotify)
|
|
("librime" ,librime)
|
|
("rime-data" ,rime-data)))
|
|
(native-inputs
|
|
`(("cmake" ,cmake-minimal)
|
|
("pkg-config" ,pkg-config)))
|
|
(home-page "https://rime.im/")
|
|
(synopsis "Rime Input Method Engine for IBus")
|
|
(description "@dfn{ibus-rime} provides the Rime input method engine for
|
|
IBus. Rime is a lightweight, extensible input method engine supporting
|
|
various input schemas including glyph-based input methods, romanization-based
|
|
input methods as well as those for Chinese dialects. It has the ability to
|
|
compose phrases and sentences intelligently and provide very accurate
|
|
traditional Chinese output.")
|
|
(license gpl3)))
|
|
|
|
(define-public libhangul
|
|
(package
|
|
(name "libhangul")
|
|
(version "0.1.0")
|
|
(source
|
|
(origin
|
|
(method url-fetch)
|
|
(uri (string-append "http://kldp.net/hangul/release/"
|
|
"3442-libhangul-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"0ni9b0v70wkm0116na7ghv03pgxsfpfszhgyj3hld3bxamfal1ar"))))
|
|
(build-system gnu-build-system)
|
|
(home-page "https://github.com/libhangul/libhangul")
|
|
(synopsis "Library to support hangul input method logic")
|
|
(description
|
|
"This package provides a library to support hangul input method logic,
|
|
hanja dictionary and small hangul character classification.")
|
|
(license lgpl2.1+)))
|
|
|
|
(define-public ibus-libhangul
|
|
(package
|
|
(name "ibus-libhangul")
|
|
(version "1.5.3")
|
|
(source
|
|
(origin
|
|
(method url-fetch)
|
|
(uri (string-append "https://github.com/libhangul/ibus-hangul/"
|
|
"releases/download/" version
|
|
"/ibus-hangul-" version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"1400ba2p34vr9q285lqvjm73f6m677cgfdymmjpiwyrjgbbiqrjy"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
`(#:phases
|
|
(modify-phases %standard-phases
|
|
(add-after 'install 'wrap
|
|
(lambda* (#:key inputs outputs #:allow-other-keys)
|
|
(wrap-program (string-append (assoc-ref outputs "out")
|
|
"/libexec/ibus-setup-hangul")
|
|
`("GUIX_PYTHONPATH" ":" prefix (,(getenv "GUIX_PYTHONPATH")))
|
|
`("LD_LIBRARY_PATH" ":" prefix
|
|
(,(string-append (assoc-ref inputs "libhangul") "/lib")))
|
|
`("GI_TYPELIB_PATH" ":" prefix
|
|
(,(getenv "GI_TYPELIB_PATH"))))
|
|
#t)))))
|
|
(native-inputs
|
|
`(("pkg-config" ,pkg-config)
|
|
("gettext" ,gettext-minimal)
|
|
("glib:bin" ,glib "bin")))
|
|
(inputs
|
|
`(("ibus" ,ibus)
|
|
("glib" ,glib)
|
|
("python-pygobject" ,python-pygobject)
|
|
("gtk+" ,gtk+)
|
|
("libhangul" ,libhangul)
|
|
("python" ,python)))
|
|
(home-page "https://github.com/libhangul/ibus-hangul")
|
|
(synopsis "Hangul engine for IBus")
|
|
(description
|
|
"ibus-hangul is a Korean input method engine for IBus.")
|
|
(license gpl2+)))
|