mirror of
git://git.code.sf.net/p/zsh/code
synced 2025-01-01 17:24:50 +01:00
37 lines
794 B
Text
37 lines
794 B
Text
local line calendar
|
|
local -a lockfiles editor
|
|
|
|
integer cal_running
|
|
|
|
if (( $# )); then
|
|
editor=("$@")
|
|
else
|
|
editor=(${VISUAL:-${EDITOR:-vi}})
|
|
fi
|
|
|
|
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 &&
|
|
zsystem flock $calendar 2>/dev/null; then
|
|
# locked OK
|
|
:
|
|
else
|
|
calendar_lockfiles $calendar || exit 1
|
|
fi
|
|
|
|
eval $editor \$calendar
|
|
} always {
|
|
(( ${#lockfiles} )) && rm -f $lockfiles
|
|
}
|
|
)
|
|
|
|
(( cal_running )) && calendar -s
|