emacs で World Cup の日程をサクッと表示する

4988 ワード
emacs-lisp ical init.el elisp Emacs Emacs テキストリンク

目的

calfw.el、calfw-ical.el を使用して、World Cup の日程をワンコマンドで表示します。
ぶっちゃけ calfw-ical で以下を設定するだけです。

設定

  1. calfw.el のインストール (M-x package-install calfw)
  2. calfw-ical.el のインストール (M-x package-install calfw-ical)
  3. init.el に以下を追加
init.el
(require 'calfw)

(require 'calfw-ical)
(setq worldcup2018-calendar-url
"http://www.skysports.com/calendars/football/fixtures/competitions/world-cup")

(defun worldcup2018-calendar ()
(interactive)
(cfw:open-ical-calendar worldcup2018-calendar-url))

結果

M-x worldcup2018-calendar

M で月表示、W で 1週間表示、T で 2 週間表示、D で日表示、f で次の日、など。

おまけ

J リーグの予定も同時に表示させたければ

init.el
(require 'calfw)

(require 'calfw-ical)
(setq worldcup2018-calendar-url
"http://www.skysports.com/calendars/football/fixtures/competitions/world-cup")
(setq J-calendar-url
"http://web-japp.datastadium.net/J/icals/download3/0/0/0/ical.ics")

(defun football-calendar ()
(interactive)
(cfw:open-calendar-buffer
:view 'month
:contents-sources
(list
(cfw:ical-create-source "J-league" J-calendar-url "#b7193f")
(cfw:ical-create-source "WC2018" worldcup2018-calendar-url "DarkOrange")
)))

M-x football-calendar

org まで落したい人は以下より。

参考

...初めての投稿です。 org にするの面倒くさいのですが、 しました (Thu Jun 14 2018) が、その他、いい方法があったら教えてください。