Initial version, copied from czech-holidays

This commit is contained in:
Gergely Polonkai 2016-10-20 13:38:49 +02:00
commit 6531087692
2 changed files with 100 additions and 0 deletions

26
README.md Normal file
View File

@ -0,0 +1,26 @@
[![MELPA](https://melpa.org/packages/hungarian-holidays-badge.svg)](https://melpa.org/#/hungarian-holidays)
# hungarian-holidays
This package adds [Hungarian](https://en.wikipedia.org/wiki/Hungary)
public holidays to the Emacs calendar.
If you have `org-agenda-include-diary` set to `t`, these will be also
listed in the `org-agenda` view.
## Installation
This package is available on MELPA, just `M-x` `package-install`
`hungarian-holidays`. If you want to install it manually, clone this
repository somewhere, add it to `load-path`, and add `(require
hungarian-holidays)` to `.emacs`.
## Configuration
Add a call to `(hungarian-holidays-add)` somewhere in your
`.emacs`. Note that this must be called *before* Emacs calendar is
loaded.
## Attribution
This package is based on David Chkhikvadzes czech-holidays package.

74
hungarian-holidays.el Normal file
View File

@ -0,0 +1,74 @@
;;; hungarian-holidays.el --- Adds a list of Hungarian public holidays to Emacs calendar
;; Copyright (C) 2016 Gergely Polonkai <gergely@polonkai.eu>
;; Author: Gergely Polonkai <gergely@polonkai.eu>
;; Maintainer: Gergely Polonkai <gergely@polonkai.eu>
;; Version: 0.0.1
;; Created: 20th October 2016
;; Keywords: calendar
;; This program 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.
;; This program 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 this program. If not, see <http://www.gnu.org/licenses/>.
;;; Commentary:
;;; This package adds Hungarian (https://en.wikipedia.org/wiki/Hungary)
;;; public holidays to the Emacs calendar.
;;;
;;; If you have `org-agenda-include-diary` set to `t`, these will be
;;; also listed in the `org-agenda` view.
;;; Installation
;;; This package is available on MELPA, just `M-x` `package-install`
;;; `hungarian-holidays`. If you want to install it manually, clone
;;; this repository somewhere, add it to `load-path`, and add
;;; `(require 'hungarian-holidays)` to `.emacs`.
;;; Configuration
;;; Add a call to `(hungarian-holidays-add)` somewhere in your
;;; `.emacs`. Note that this must be called *before* Emacs calendar
;;; is loaded.
;;; Attribution
;;; This package is based on David Chkhikvadzes `czech-holidays'
;;; package.
;;; Code:
(defvar hungarian-holidays-list
'((holiday-fixed 1 1 "Újév")
(holiday-fixed 3 15 "Az 1848-as forradalom ünnepe")
(holiday-easter-etc 0 "Húsvét Vasárnap")
(holiday-easter-etc 1 "Húsvét Hétfő")
(holiday-fixed 5 1 "A munka ünnepe")
(holiday-easter-etc 49 "Pünkösd vasárnap")
(holiday-easter-etc 50 "Pünkösd hétfő")
(holiday-fixed 8 20 "Az Államalapítás ünnepe")
(holiday-fixed 10 23 "Az 1956-os forradalom ünnepe")
(holiday-fixed 11 1 "Mindenszentek")
(holiday-fixed 12 25 "Karácsony napja")
(holiday-fixed 12 26 "Karácsony másnapja"))
"List of Hungarian public holidays.")
;;;###autoload
(defun hungarian-holidays-add ()
"Add Hungarian public holidays to Emacs calendar."
(mapc (lambda (d) (add-to-list 'holiday-other-holidays d t))
hungarian-holidays-list))
(provide 'hungarian-holidays)
;;; hungarian-holidays.el ends here