# -*- mode: snippet -*- #name : mail #key : mail #author : Hugh Wang # -- ${1:尊敬的 XXX} 您好。 $0 ` (let ((month (nth 4 (decode-time (current-time))))) (let ((season-index (/ (% (+ month 10) 12) 4))) (nth season-index (quote ("春安" "夏安" "秋安" "冬安"))) ) ) ` Hugh Wang `(format-time-string "%Y-%m-%d")`