make-release.el

   1 ; $Id$
   2
   3 (let* ((heimdal-version (getenv "HV"))
   4        (version-string (concat "Release " heimdal-version)))
   5   (find-file "configure.in")
   6   (if (re-search-forward "AM_INIT_AUTOMAKE(heimdal,\\(.*\\))" (point-max) t)
   7       (replace-match heimdal-version nil nil nil 1))
   8   (goto-char 1)
   9   (if (re-search-forward "AC_INIT(heimdal, *\\(.*\\)," (point-max) t)
  10       (replace-match heimdal-version nil nil nil 1))
  11   (save-buffer)
  12   ;;(vc-checkin "configure.in" nil version-string)
  13   (find-file "ChangeLog")
  14   (add-change-log-entry nil nil nil nil)
  15   (insert version-string)
  16   (save-buffer)
  17   ;;(vc-checkin "ChangeLog" nil version-string)
  18   (kill-emacs))