diff options
| author | psg <> | 2004-04-15 01:40:08 +0000 |
|---|---|---|
| committer | psg <> | 2004-04-15 01:40:08 +0000 |
| commit | 72791ac4647056b306a92caabc04156c42595184 (patch) | |
| tree | a199cc31f449b4067a68e24400cc1f6960fd829d /debian-changelog-mode.el | |
| parent | 8aa1c4e82384cd0f94c6ab9171b4935bc10d54a9 (diff) | |
debian-changelog-mode.el: V1.78 14Apr2004
- debian-changelog-setdistribution: Dismiss warning window when setting
distribution to security. Thanks to Martin Schulze (Closes: #234730)
Diffstat (limited to 'debian-changelog-mode.el')
| -rw-r--r-- | debian-changelog-mode.el | 15 |
1 files changed, 10 insertions, 5 deletions
diff --git a/debian-changelog-mode.el b/debian-changelog-mode.el index a76313b..8e1b05d 100644 --- a/debian-changelog-mode.el +++ b/debian-changelog-mode.el @@ -287,6 +287,9 @@ ;; V1.77 19Feb2004 Peter S Galbraith <psg@debian.org> ;; - Add file NEWS.Debian to auto-mode-alist. Thanks to Chris Lawrence ;; for suggesting it. (Closes: #233310) +;; V1.78 14Apr2004 Peter S Galbraith <psg@debian.org> +;; - debian-changelog-setdistribution: Dismiss warning window when setting +;; distribution to security. Thanks to Martin Schulze (Closes: #234730) ;;; Acknowledgements: (These people have contributed) ;; Roland Rosenfeld <roland@debian.org> @@ -510,9 +513,10 @@ mail instead. Upload to " val " anyway?")) (debian-changelog-setheadervalue ") \\(.*\\)\\;" val))) (t - (with-output-to-temp-buffer "*Help*" - (princ (concat - "Warning, although the {oldstable,stable,testing}-security + (let ((window-config (current-window-configuration))) + (with-output-to-temp-buffer "*Help*" + (princ (concat + "Warning, although the {oldstable,stable,testing}-security distribution exists it should not be used unless you are a member of the security team. Please don't upload to it if you are not 150% sure that your package is suitable. In case of @@ -520,8 +524,9 @@ doubt, please send the files to team@security.debian.org via mail instead. Upload to " val " anyway?"))) - (if (y-or-n-p (format "Upload to %s anyway? " val)) - (debian-changelog-setheadervalue ") \\(.*\\)\\;" val)))))) + (if (y-or-n-p (format "Upload to %s anyway? " val)) + (debian-changelog-setheadervalue ") \\(.*\\)\\;" val)) + (set-window-configuration window-config)))))) ;; ;; keymap table definition |