1 (let* ((heimdal-version (getenv "HV"))
2 (version-string (concat "Release " heimdal-version
)))
3 (find-file "configure.in")
4 (re-search-forward "AM_INIT_AUTOMAKE(heimdal,\\(.*\\))")
5 (replace-match heimdal-version nil nil nil
1)
7 ;;(vc-checkin "configure.in" nil version-string)
8 (find-file "ChangeLog")
9 (add-change-log-entry nil nil nil nil
)
10 (insert version-string
)
12 ;;(vc-checkin "ChangeLog" nil version-string)