Functions/Calendar/calendar_edit


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

local editor=${VISUAL:-${EDITOR:-vi}}
local line calendar
local -a lockfiles

integer cal_running

sched | while read line; do
  [[ $line = *" calendar -s "<->" "<-> ]] && (( cal_running = 1 ))
done

zstyle -s ':datetime:calendar:' calendar-file calendar || calendar=~/calendar

# start of subshell for OS file locking
(
# start of block for following always to clear up lockfiles.
# Not needed but harmless if OS file locking is used.
{
  if zmodload -F zsh/system b:zsystem && zsystem supports flock; then
    zsystem flock $calendar
  else
    calendar_lockfiles $calendar || exit 1
  fi

  eval $editor \$calendar
} always {
  (( ${#lockfiles} )) && rm -f $lockfiles
}
)

(( cal_running )) && calendar -s