| 1 | |
| 2 | |
| 3 | |
| 4 | |
| 5 | |
| 6 | |
| 7 | |
| 8 | |
| 9 | |
| 10 | |
| 11 | |
| 12 | |
| 13 | |
| 14 | |
| 15 | |
| 16 | |
| 17 | |
| 18 | |
| 19 | |
| 20 | |
| 21 | |
| 22 | |
| 23 | |
| 24 | |
| 25 | |
| 26 | |
| 27 | |
| 28 | |
| 29 | |
| 30 | |
| 31 | |
| 32 | |
| 33 | |
| 34 | |
| 35 | |
| 36 |
|
| 37 | (define-module (gnu packages calendar)
|
| 38 | #:use-module (gnu packages)
|
| 39 | #:use-module (guix gexp)
|
| 40 | #:use-module ((guix licenses) #:prefix license:)
|
| 41 | #:use-module (guix git-download)
|
| 42 | #:use-module (guix packages)
|
| 43 | #:use-module (guix download)
|
| 44 | #:use-module (guix build-system gnu)
|
| 45 | #:use-module (guix build-system go)
|
| 46 | #:use-module (guix build-system cmake)
|
| 47 | #:use-module (guix build-system pyproject)
|
| 48 | #:use-module (gnu packages admin)
|
| 49 | #:use-module (gnu packages autotools)
|
| 50 | #:use-module (gnu packages base)
|
| 51 | #:use-module (gnu packages bash)
|
| 52 | #:use-module (gnu packages check)
|
| 53 | #:use-module (gnu packages dav)
|
| 54 | #:use-module (gnu packages docbook)
|
| 55 | #:use-module (gnu packages freedesktop)
|
| 56 | #:use-module (gnu packages glib)
|
| 57 | #:use-module (gnu packages gnome)
|
| 58 | #:use-module (gnu packages golang-xyz)
|
| 59 | #:use-module (gnu packages gtk)
|
| 60 | #:use-module (gnu packages icu4c)
|
| 61 | #:use-module (gnu packages perl)
|
| 62 | #:use-module (gnu packages pkg-config)
|
| 63 | #:use-module (gnu packages python)
|
| 64 | #:use-module (gnu packages python-build)
|
| 65 | #:use-module (gnu packages python-web)
|
| 66 | #:use-module (gnu packages python-xyz)
|
| 67 | #:use-module (gnu packages qt)
|
| 68 | #:use-module (gnu packages sphinx)
|
| 69 | #:use-module (gnu packages sqlite)
|
| 70 | #:use-module (gnu packages tcl)
|
| 71 | #:use-module (gnu packages time)
|
| 72 | #:use-module (gnu packages xml)
|
| 73 | #:use-module (srfi srfi-26))
|
| 74 |
|
| 75 | (define-public adl-submit
|
| 76 | (let ((commit "f38c7ad161fbe6ec72ecc725edbd624f5c627ea9")
|
| 77 | (revision "0"))
|
| 78 | (package
|
| 79 | (name "adl-submit")
|
| 80 | (version (git-version "1.0" revision commit))
|
| 81 | (source
|
| 82 | (origin
|
| 83 | (method git-fetch)
|
| 84 | (uri (git-reference
|
| 85 | (url "https://framagit.org/agenda-libre/adl-submit.git")
|
| 86 | (commit commit)))
|
| 87 | (file-name (git-file-name name version))
|
| 88 | (sha256
|
| 89 | (base32 "1zi5s8xpbm253mjdlcc1j13qqz5q7s9zavk3h0m2gfgb52xy2avp"))))
|
| 90 | (build-system pyproject-build-system)
|
| 91 | (arguments
|
| 92 | (list #:tests? #f)) |
| 93 | (native-inputs
|
| 94 | (list python-setuptools
|
| 95 | python-wheel))
|
| 96 | (inputs
|
| 97 | (list python python-pycurl))
|
| 98 | (home-page "https://www.agendadulibre.org")
|
| 99 | (synopsis "Submit events to the Agenda Du Libre")
|
| 100 | (description
|
| 101 | "adl-submit is a tool that can be used to submit events to any instance
|
| 102 | of the Agenda Du Libre (a web calendar originally meant for free software
|
| 103 | events). Users can set fields through the command line or create an XML that
|
| 104 | can be submitted with the adl-submit tool. While the Agenda Du Libre web
|
| 105 | application is available in multiple languages, most of the events on
|
| 106 | https://www.agendadulibre.org are in French and the adl-submit tool is only
|
| 107 | available in French.")
|
| 108 | (license license:gpl2))))
|
| 109 |
|
| 110 | (define-public date2name
|
| 111 | (let ((commit "50cc8d3957fc0bdc26c65042ab8f0d9f05610283")
|
| 112 | (revision "2"))
|
| 113 | (package
|
| 114 | (name "date2name")
|
| 115 | (version (git-version "0.0" revision commit))
|
| 116 | (source
|
| 117 | (origin
|
| 118 | (method git-fetch)
|
| 119 | (uri (git-reference
|
| 120 | (url "https://github.com/novoid/date2name")
|
| 121 | (commit commit)))
|
| 122 | (file-name (git-file-name name version))
|
| 123 | (sha256
|
| 124 | (base32 "16m24dvyg93rpa94401cladjvj5pk3ds5y6sbz54xygdpg9qf8qm"))))
|
| 125 | (build-system pyproject-build-system)
|
| 126 | (native-inputs
|
| 127 | (list python-poetry-core
|
| 128 | python-pytest))
|
| 129 | (home-page "https://github.com/novoid/date2name")
|
| 130 | (synopsis "Handling time-stamps and date-stamps in file names")
|
| 131 | (description
|
| 132 | "By default, date2name gets the modification time of matching files and
|
| 133 | directories and adds a datestamp in standard ISO 8601+ format YYYY-MM-DD at
|
| 134 | the beginning of the file or directory name.")
|
| 135 | (license license:gpl3+))))
|
| 136 |
|
| 137 | (define-public date
|
| 138 | (package
|
| 139 | (name "date")
|
| 140 | (version "3.0.1")
|
| 141 | (source
|
| 142 | (origin
|
| 143 | (method git-fetch)
|
| 144 | (uri (git-reference
|
| 145 | (url "https://github.com/HowardHinnant/date")
|
| 146 | (commit (string-append "v" version))))
|
| 147 | (file-name (git-file-name name version))
|
| 148 | (sha256
|
| 149 | (base32 "1qk7pgnk0bpinja28104qha6f7r1xwh5dy3gra7vjkqwl0jdwa35"))
|
| 150 | (patches
|
| 151 | |
| 152 | |
| 153 | (search-patches "date-ignore-zonenow.patch"
|
| 154 | "date-output-pkg-config-files.patch"))))
|
| 155 | (inputs (list tzdata))
|
| 156 | (build-system cmake-build-system)
|
| 157 | (arguments
|
| 158 | (list
|
| 159 | #:configure-flags
|
| 160 | #~(list "-DUSE_SYSTEM_TZ_DB=ON" "-DBUILD_SHARED_LIBS=ON"
|
| 161 | "-DBUILD_TZ_LIB=ON" "-DENABLE_DATE_TESTING=ON")
|
| 162 | #:modules '((guix build cmake-build-system)
|
| 163 | ((guix build gnu-build-system) #:prefix gnu:)
|
| 164 | (guix build utils))
|
| 165 | #:phases
|
| 166 | #~(modify-phases %standard-phases
|
| 167 | (add-after 'unpack 'patch-bin-bash
|
| 168 | (lambda* (#:key inputs #:allow-other-keys)
|
| 169 | (substitute* "compile_fail.sh"
|
| 170 | (("/bin/bash")
|
| 171 | (search-input-file inputs "bin/bash")))))
|
| 172 | (add-after 'unpack 'patch-zoneinfo-path
|
| 173 | (lambda* (#:key inputs #:allow-other-keys)
|
| 174 | (substitute* "src/tz.cpp"
|
| 175 | (("/usr/share/zoneinfo")
|
| 176 | (search-input-directory inputs "share/zoneinfo")))))
|
| 177 | (add-after 'unpack 'skip-failing-tests
|
| 178 | |
| 179 | |
| 180 | (lambda _
|
| 181 | (for-each delete-file
|
| 182 | '("test/solar_hijri_test/parse.pass.cpp"
|
| 183 | "test/tz_test/zoned_time_deduction.pass.cpp"))))
|
| 184 | (replace 'check
|
| 185 | (lambda* (#:rest args)
|
| 186 | (apply (assoc-ref gnu:%standard-phases 'check)
|
| 187 | #:test-target "testit" args))))))
|
| 188 | (synopsis "Date and time library for C++11 and C++14")
|
| 189 | (description
|
| 190 | "Date is a header only C++ library that extends the chrono date
|
| 191 | algorithms library for calendar dates and durations. It also provides the
|
| 192 | <tz.h> library for handling time zones and leap seconds.")
|
| 193 | (home-page "https://howardhinnant.github.io/date/date.html")
|
| 194 | (license license:expat)))
|
| 195 |
|
| 196 | (define-public ddate
|
| 197 | (package
|
| 198 | (name "ddate")
|
| 199 | (version "0.2.2")
|
| 200 | (source (origin
|
| 201 | (method git-fetch)
|
| 202 | (uri (git-reference
|
| 203 | (url "https://github.com/bo0ts/ddate")
|
| 204 | (commit (string-append "v" version))))
|
| 205 | (file-name (git-file-name name version))
|
| 206 | (sha256
|
| 207 | (base32 "1qchxnxvghbma6gp1g78wnjxsri0b72ha9axyk31cplssl7yn73f"))))
|
| 208 | (build-system cmake-build-system)
|
| 209 | (arguments '(#:tests? #f)) |
| 210 | (home-page "https://github.com/bo0ts/ddate")
|
| 211 | (synopsis "Convert Gregorian dates to Discordian dates")
|
| 212 | (description
|
| 213 | "ddate displays the Discordian date and holidays of a given date.
|
| 214 | The Discordian calendar was made popular by the \"Illuminatus!\" trilogy
|
| 215 | by Robert Shea and Robert Anton Wilson.")
|
| 216 | (license license:public-domain)))
|
| 217 |
|
| 218 | (define-public libical
|
| 219 | (package
|
| 220 | (name "libical")
|
| 221 | (version "3.0.17")
|
| 222 | (source (origin
|
| 223 | (method url-fetch)
|
| 224 | (uri (string-append
|
| 225 | "https://github.com/libical/libical/releases/download/v"
|
| 226 | version "/libical-" version ".tar.gz"))
|
| 227 | (sha256
|
| 228 | (base32
|
| 229 | "06vqbxg4f3i03087grjncfy9pbvmlhg4v1ajhwr400l7nrnrmnmw"))))
|
| 230 | (build-system cmake-build-system)
|
| 231 | (arguments
|
| 232 | (list
|
| 233 | #:parallel-tests? #f
|
| 234 | #:configure-flags #~(list "-DSHARED_ONLY=true"
|
| 235 | |
| 236 | "-DGOBJECT_INTROSPECTION=true"
|
| 237 | "-DICAL_GLIB_VAPI=true")
|
| 238 | #:phases
|
| 239 | #~(modify-phases %standard-phases
|
| 240 | (add-before 'configure 'patch-paths
|
| 241 | (lambda* (#:key inputs #:allow-other-keys)
|
| 242 | (define zoneinfo (search-input-directory inputs "share/zoneinfo"))
|
| 243 | |
| 244 | |
| 245 | |
| 246 | (setenv "TZDIR" zoneinfo) |
| 247 | (substitute* "src/libical/icaltz-util.c"
|
| 248 | (("\\\"/usr/share/zoneinfo\\\",")
|
| 249 | (format #f "~s" zoneinfo))
|
| 250 | (("\\\"/usr/lib/zoneinfo\\\",") "")
|
| 251 | (("\\\"/etc/zoneinfo\\\",") "")
|
| 252 | (("\\\"/usr/share/lib/zoneinfo\\\"") "")))))))
|
| 253 | (native-inputs
|
| 254 | (list docbook-xml-4.3
|
| 255 | gobject-introspection
|
| 256 | gtk-doc/stable
|
| 257 | perl
|
| 258 | pkg-config
|
| 259 | vala))
|
| 260 | (inputs
|
| 261 | (list glib libxml2 tzdata))
|
| 262 | (propagated-inputs
|
| 263 | |
| 264 | (list icu4c))
|
| 265 | (home-page "https://libical.github.io/libical/")
|
| 266 | (synopsis "iCalendar protocols and data formats implementation")
|
| 267 | (description
|
| 268 | "Libical is an implementation of the iCalendar protocols and protocol
|
| 269 | data units.")
|
| 270 | |
| 271 | (license (list license:lgpl2.1 license:mpl2.0))))
|
| 272 |
|
| 273 | (define-public khal
|
| 274 | (package
|
| 275 | (name "khal")
|
| 276 | (version "0.14.0")
|
| 277 | (source
|
| 278 | (origin
|
| 279 | (method url-fetch)
|
| 280 | (uri (pypi-uri "khal" version))
|
| 281 | (sha256
|
| 282 | (base32 "0v7135sssw24gk3sldsd3gx76jk0zpcpwqc9zzh9ia5p0hr29pqh"))))
|
| 283 | (build-system pyproject-build-system)
|
| 284 | (arguments
|
| 285 | (list
|
| 286 | #:phases
|
| 287 | #~(modify-phases %standard-phases
|
| 288 | |
| 289 | (add-after 'install 'manpage
|
| 290 | (lambda* (#:key inputs outputs #:allow-other-keys)
|
| 291 | (add-installed-pythonpath inputs outputs)
|
| 292 | (invoke "make" "--directory=doc/" "man")
|
| 293 | (install-file "doc/build/man/khal.1"
|
| 294 | (string-append #$output "/share/man/man1")))))))
|
| 295 | (native-inputs (list python-aiohttp |
| 296 | python-freezegun
|
| 297 | python-hypothesis
|
| 298 | python-packaging
|
| 299 | python-pytest
|
| 300 | python-setuptools
|
| 301 | python-setuptools-scm
|
| 302 | python-sphinxfeed
|
| 303 | vdirsyncer))
|
| 304 | (inputs (list python-click
|
| 305 | python-click-log
|
| 306 | python-configobj
|
| 307 | python-dateutil
|
| 308 | python-icalendar
|
| 309 | python-pytz
|
| 310 | python-pyxdg
|
| 311 | python-setproctitle
|
| 312 | python-tzlocal
|
| 313 | python-urwid))
|
| 314 | (home-page "https://lostpackets.de/khal/")
|
| 315 | (synopsis "Console calendar program")
|
| 316 | (description
|
| 317 | "Khal is a standards based console calendar program, able to synchronize
|
| 318 | with CalDAV servers through vdirsyncer. It includes both a @acronym{CLI,
|
| 319 | command-line interface} and a @acronym{TUI, textual user interface} named
|
| 320 | @code{ikhal}.")
|
| 321 | (license license:expat)))
|
| 322 |
|
| 323 | (define-public remind
|
| 324 | (package
|
| 325 | (name "remind")
|
| 326 | (version "6.02.01")
|
| 327 | (source
|
| 328 | (origin
|
| 329 | (method url-fetch)
|
| 330 | (uri (string-append "https://dianne.skoll.ca/projects/remind/download/"
|
| 331 | "remind-"
|
| 332 | (string-join (map (cut string-pad <> 2 #\0)
|
| 333 | (string-split version #\.))
|
| 334 | ".")
|
| 335 | ".tar.gz"))
|
| 336 | (sha256
|
| 337 | (base32 "1hp24d48nhlv6f7p6sj4qnqc9pyfgyhjah8w9426bzkqkqb31j9c"))
|
| 338 | (patches (search-patches "tkremind-fix-fontchooser.patch"))))
|
| 339 | (properties
|
| 340 | `((output-synopsis "tcl" "graphical front-end to Remind calendar program")))
|
| 341 | (build-system gnu-build-system)
|
| 342 | (outputs (list "out"
|
| 343 | "tcl")) |
| 344 | (arguments
|
| 345 | '(#:test-target "test"
|
| 346 | #:phases
|
| 347 | (modify-phases %standard-phases
|
| 348 | (add-after 'install 'split-:tcl
|
| 349 | (lambda* (#:key inputs outputs #:allow-other-keys)
|
| 350 | (let ((out (assoc-ref outputs "out"))
|
| 351 | (tcl (assoc-ref outputs "tcl")))
|
| 352 | (for-each
|
| 353 | (lambda (file)
|
| 354 | (let ((from (string-append out "/" file))
|
| 355 | (to (string-append tcl "/" file)))
|
| 356 | (mkdir-p (dirname to))
|
| 357 | (rename-file from to)))
|
| 358 | (list "bin/tkremind"
|
| 359 | "share/man/man1/tkremind.1"
|
| 360 | "share/pixmaps/tkremind.png"
|
| 361 | "share/applications/tkremind.desktop"))
|
| 362 | (wrap-program (string-append tcl "/bin/tkremind")
|
| 363 | `("PATH" ":" prefix
|
| 364 | ,(map (lambda (dir)
|
| 365 | (string-append dir "/bin"))
|
| 366 | (append (list out tcl)
|
| 367 | (map (lambda (input)
|
| 368 | (assoc-ref inputs input))
|
| 369 | (list "tcl" "tk" "inetutils")))))
|
| 370 | `("TCLLIBPATH" " " =
|
| 371 | (,(getenv "TCLLIBPATH"))))))))))
|
| 372 | (inputs
|
| 373 | (list bash-minimal inetutils tcl tcllib tk))
|
| 374 | (native-inputs (list tzdata-for-tests)) |
| 375 | (home-page "https://dianne.skoll.ca/projects/remind/")
|
| 376 | (synopsis "Sophisticated calendar and alarm program")
|
| 377 | (description
|
| 378 | "Remind allows you to remind yourself of upcoming events and appointments.
|
| 379 | Each reminder or alarm can consist of a message sent to standard output, or a
|
| 380 | program to be executed. It also features: sophisticated date calculation,
|
| 381 | moon phases, sunrise/sunset, Hebrew calendar, alarms, PostScript output and
|
| 382 | proper handling of holidays.")
|
| 383 | (license license:gpl2)))
|
| 384 |
|
| 385 | (define-public libhdate
|
| 386 | (package
|
| 387 | (name "libhdate")
|
| 388 | (version "1.6.02")
|
| 389 | (source
|
| 390 | (origin
|
| 391 | (method url-fetch)
|
| 392 | (uri (string-append "mirror://sourceforge/libhdate/libhdate/libhdate-"
|
| 393 | version "/" name "-" version ".tar.bz2"))
|
| 394 | (sha256
|
| 395 | (base32
|
| 396 | "0qkpq412p78znw8gckwcx3l0wcss9s0dgw1pvjb1ih2pxf6hm4rw"))
|
| 397 | (snippet
|
| 398 | #~(begin (use-modules (guix build utils))
|
| 399 | (substitute* "libhdate.pc.in"
|
| 400 | (("prefix=/usr") "prefix=@prefix@"))))))
|
| 401 | (build-system gnu-build-system)
|
| 402 | (home-page "http://libhdate.sourceforge.net/")
|
| 403 | (synopsis "Library to use Hebrew dates")
|
| 404 | (description "LibHdate is a small library for the Hebrew calendar and times
|
| 405 | of day, written in C, and including bindings for C++, pascal, perl, php, python,
|
| 406 | and ruby. It includes two illustrative command-line programs, @code{hcal} and
|
| 407 | @code{hdate}, and some snippets and scripts written in the binding languages.")
|
| 408 | (license license:gpl3+)))
|
| 409 |
|
| 410 | (define-public confclerk
|
| 411 | (package
|
| 412 | (name "confclerk")
|
| 413 | (version "0.6.4")
|
| 414 | (source
|
| 415 | (origin
|
| 416 | (method url-fetch)
|
| 417 | (uri (string-append "https://www.toastfreeware.priv.at/tarballs/"
|
| 418 | "confclerk/confclerk-" version ".tar.gz"))
|
| 419 | (sha256
|
| 420 | (base32
|
| 421 | "10rhg44px4nvbkd3p341cmp2ds43jn8r4rvgladda9v8zmsgr2b3"))))
|
| 422 | (build-system gnu-build-system)
|
| 423 | (arguments
|
| 424 | '(#:phases
|
| 425 | (modify-phases %standard-phases
|
| 426 | (replace 'configure
|
| 427 | (lambda* (#:key outputs #:allow-other-keys)
|
| 428 | (let ((out (assoc-ref outputs "out")))
|
| 429 | |
| 430 | (substitute* "src/app/app.pro"
|
| 431 | (("PREFIX = /usr/bin")
|
| 432 | (string-append "PREFIX =" out "/bin")))
|
| 433 | (invoke "qmake"))))
|
| 434 | (add-after 'install 'install-docs
|
| 435 | (lambda* (#:key outputs #:allow-other-keys)
|
| 436 | (let* ((out (assoc-ref outputs "out"))
|
| 437 | (share (string-append out "/share")))
|
| 438 | (install-file "data/confclerk.1"
|
| 439 | (string-append share "/man/man1"))
|
| 440 | (install-file "data/confclerk.desktop"
|
| 441 | (string-append share "/applications"))
|
| 442 | (install-file "data/confclerk.svg"
|
| 443 | (string-append share "/icons/hicolor/scalable/apps"))
|
| 444 | #t))))
|
| 445 | #:tests? #f)) |
| 446 | (native-inputs
|
| 447 | (list perl)) |
| 448 | (inputs
|
| 449 | (list qtbase-5))
|
| 450 | (home-page "https://www.toastfreeware.priv.at/confclerk")
|
| 451 | (synopsis "Offline conference schedule application")
|
| 452 | (description
|
| 453 | "ConfClerk is an application written in Qt, which makes conference schedules
|
| 454 | available offline. It displays the conference schedule from various views,
|
| 455 | support searches on various items (speaker, speech topic, location, etc.) and
|
| 456 | enables you to select favorite events and create your own schedule.
|
| 457 |
|
| 458 | At the moment ConfClerk is able to import schedules in XML format created by
|
| 459 | the PentaBarf conference management system (or frab) used by e.g. FOSDEM,
|
| 460 | DebConf, FrOSCon, Grazer LinuxTage, and the CCC congresses.
|
| 461 |
|
| 462 | ConfClerk is targeted at mobile devices but works on any system running Qt.")
|
| 463 | (license (list license:gpl2+
|
| 464 | license:lgpl3)))) |
| 465 |
|
| 466 | (define-public ccal
|
| 467 | (package
|
| 468 | (name "ccal")
|
| 469 | (version "2.5.3")
|
| 470 | (source (origin
|
| 471 | (method url-fetch)
|
| 472 | (uri (string-append "http://ccal.chinesebay.com/ccal/ccal-"
|
| 473 | version ".tar.gz"))
|
| 474 | (sha256
|
| 475 | (base32
|
| 476 | "15nza1d1lvk3dp0wcl53wsd32yhbgyzznha092mh5kh5z74vsk1x"))))
|
| 477 | (build-system gnu-build-system)
|
| 478 | (arguments
|
| 479 | '(#:phases
|
| 480 | (modify-phases %standard-phases
|
| 481 | (replace 'configure
|
| 482 | (lambda* (#:key outputs #:allow-other-keys)
|
| 483 | (let ((out (assoc-ref outputs "out")))
|
| 484 | (substitute* "Makefile"
|
| 485 | (("/usr/local/bin")
|
| 486 | (string-append out "/bin"))
|
| 487 | (("/usr/local/man")
|
| 488 | (string-append out "/share/man"))))
|
| 489 | #t))
|
| 490 | (add-after 'install 'install-manuals
|
| 491 | (lambda _
|
| 492 | (invoke "make" "install-man"))))
|
| 493 | |
| 494 | #:tests? #f))
|
| 495 | (home-page "http://ccal.chinesebay.com/ccal/ccal.htm")
|
| 496 | (synopsis "Command line program for Chinese calendar")
|
| 497 | (description "@command{ccal} is a command line program which writes a
|
| 498 | Gregorian calendar together with Chinese calendar to standard output. Its
|
| 499 | usage is similar to the @command{cal} program. In addition to console output,
|
| 500 | it can also generate Encapsulated Postscript and HTML table outputs for use in
|
| 501 | do-it-yourself calendars and web pages. It supports both simplified and
|
| 502 | traditional Chinese characters.")
|
| 503 | |
| 504 | |
| 505 | |
| 506 | (license (list license:gpl2+ license:lgpl2.1+))))
|
| 507 |
|
| 508 | (define-public gcal
|
| 509 | (package
|
| 510 | (name "gcal")
|
| 511 | (version "4.2.0")
|
| 512 | (source
|
| 513 | (origin
|
| 514 | (method url-fetch)
|
| 515 | (uri (string-append "https://www.alteholz.dev/gnu/gcal-"
|
| 516 | version ".tar.xz"))
|
| 517 | (sha256
|
| 518 | (base32
|
| 519 | "1p3q6his31bxs24nsgpfavw3nlhalqf0zak4f3b530p725s2vgfq"))
|
| 520 | (snippet
|
| 521 | #~(begin
|
| 522 | (use-modules (guix build utils))
|
| 523 | |
| 524 | |
| 525 | |
| 526 | (substitute* (find-files "lib" "\\.c$")
|
| 527 | (("#if defined _IO_ftrylockfile")
|
| 528 | "#if defined _IO_EOF_SEEN"))
|
| 529 | (substitute* "lib/stdio-impl.h"
|
| 530 | (("^/\\* BSD stdio derived implementations")
|
| 531 | (string-append
|
| 532 | "#if !defined _IO_IN_BACKUP && defined _IO_EOF_SEEN\n"
|
| 533 | "# define _IO_IN_BACKUP 0x100\n"
|
| 534 | "#endif\n\n"
|
| 535 | "/* BSD stdio derived implementations")))
|
| 536 | #t))))
|
| 537 | (build-system gnu-build-system)
|
| 538 | (arguments
|
| 539 | (list
|
| 540 | #:configure-flags
|
| 541 | #~(list "LDFLAGS=-lm")))
|
| 542 | (native-inputs
|
| 543 | (list check
|
| 544 | pkg-config))
|
| 545 | (home-page "https://www.gnu.org/software/gcal/")
|
| 546 | (synopsis "Calculating and printing a wide variety of calendars")
|
| 547 | (description
|
| 548 | "Gcal is a program to calculate and print calendars on the
|
| 549 | command-line. Calendars can be printed in 1-month, 3-month or whole-year
|
| 550 | views. In addition, eternal holiday lists can be generated for many
|
| 551 | countries, which can be complemented by user-made lists of fixed dates to
|
| 552 | make an agenda. Gcal can also calculate astronomical data, such as the
|
| 553 | phases of the moon, and supports alternative calendar formats: Julian,
|
| 554 | Gregorian, Islamic, Chinese and more.")
|
| 555 | (license license:gpl3+)))
|
| 556 |
|
| 557 | (define-public gsimplecal
|
| 558 | (let ((version "2.4.1"))
|
| 559 | (package
|
| 560 | (name "gsimplecal")
|
| 561 | (version version)
|
| 562 | (source (origin
|
| 563 | (method git-fetch)
|
| 564 | (uri (git-reference
|
| 565 | (url "https://github.com/dmedvinsky/gsimplecal/")
|
| 566 | (commit (string-append "v" version))))
|
| 567 | (file-name (git-file-name name version))
|
| 568 | (sha256
|
| 569 | (base32
|
| 570 | "0ypnq9q6v2l8jg0ah31d8502jig1rk2bz749ljj97wk0rg1rixpi"))
|
| 571 | (modules '((guix build utils)))))
|
| 572 | (build-system gnu-build-system)
|
| 573 | (inputs (list gtk+))
|
| 574 | (native-inputs (list autoconf automake pkg-config))
|
| 575 | (home-page "https://dmedvinsky.github.io/gsimplecal/")
|
| 576 | (synopsis "Lightweight calendar applet")
|
| 577 | (description
|
| 578 | "@command{gsimplecal} is a lightweight calendar application
|
| 579 | written in C++ using GTK. Launched once, it pops up a small calendar applet,
|
| 580 | launched again it closes the running instance. It can additionally be
|
| 581 | configured to show the current time in different timezones.")
|
| 582 | (license license:bsd-3))))
|
| 583 |
|
| 584 | (define-public hebcal
|
| 585 | (package
|
| 586 | (name "hebcal")
|
| 587 | (version "5.12.3")
|
| 588 | (source
|
| 589 | (origin
|
| 590 | (method git-fetch)
|
| 591 | (uri (git-reference
|
| 592 | (url "https://github.com/hebcal/hebcal")
|
| 593 | (commit (string-append "v" version))))
|
| 594 | (file-name (git-file-name name version))
|
| 595 | (sha256
|
| 596 | (base32 "03wql50ls6hsxmsy0aigwv954nvsy83vis46bjzgfi6riil61v92"))))
|
| 597 | (build-system go-build-system)
|
| 598 | (arguments
|
| 599 | (list
|
| 600 | #:install-source? #f
|
| 601 | #:import-path "github.com/hebcal/hebcal"
|
| 602 | #:phases
|
| 603 | #~(modify-phases %standard-phases
|
| 604 | |
| 605 | (add-after 'unpack 'set-defautl-city
|
| 606 | (lambda* (#:key import-path #:allow-other-keys)
|
| 607 | (with-directory-excursion (string-append "src/" import-path)
|
| 608 | (with-output-to-file "dcity.go"
|
| 609 | (lambda ()
|
| 610 | (format #t "package main~%var defaultCity = ~s~%"
|
| 611 | "Paris")))))))))
|
| 612 | (inputs
|
| 613 | (list go-github-com-hebcal-hebcal-go
|
| 614 | go-github-com-pborman-getopt-v2))
|
| 615 | (home-page "https://github.com/hebcal/hebcal")
|
| 616 | (synopsis "Perpetual Jewish Calendar program")
|
| 617 | (description
|
| 618 | "Hebcal is a program for converting between Hebrew and Gregorian dates,
|
| 619 | and generating lists of Jewish holidays for a given year. Shabbat, holiday
|
| 620 | candle lighting, and havdalah times are approximated using your location.
|
| 621 |
|
| 622 | It can also show daily prayer times, the weekly Torah reading, and the daily
|
| 623 | leaf of Talmud. The program can help with counting of the Omer or with
|
| 624 | calculation of Hebrew yahrzeits, birthdays, or anniversaries.")
|
| 625 | (license license:gpl2+)))
|