From mboxrd@z Thu Jan  1 00:00:00 1970
Path: main.gmane.org!not-for-mail
From: Heinz Rommerskirchen <Heinrich.Rommerskirchen@siemens.com>
Newsgroups: gmane.emacs.help
Subject: Re: How to make a command ask "You *really* want to do this?"
Date: 29 Apr 2003 09:47:05 +0100
Organization: Siemens Business Services
Sender: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org
Message-ID: <ud6j51yie.fsf@siemens.com>
References: <b8klqf$s2e$1@panix1.panix.com>
NNTP-Posting-Host: main.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1051606222 7006 80.91.224.249 (29 Apr 2003 08:50:22 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Tue, 29 Apr 2003 08:50:22 +0000 (UTC)
Original-X-From: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org Tue Apr 29 10:50:14 2003
Return-path: <help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org>
Original-Received: from monty-python.gnu.org ([199.232.76.173])
	by main.gmane.org with esmtp (Exim 3.35 #1 (Debian))
	id 19AQoX-0001oW-00
	for <gnu-help-gnu-emacs@m.gmane.org>; Tue, 29 Apr 2003 10:50:14 +0200
Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org)
	by monty-python.gnu.org with esmtp (Exim 4.10.13)
	id 19AQow-0002Zo-01
	for gnu-help-gnu-emacs@m.gmane.org; Tue, 29 Apr 2003 04:50:38 -0400
Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!cyclone.bc.net!skynet.be!skynet.be!news-FFM2.ecrc.net!newsfeed.siemens.de!news.mch.sbs.de!not-for-mail
Original-Newsgroups: gnu.emacs.help
Original-Lines: 18
Original-NNTP-Posting-Host: mhhb0zkc.ww200.siemens.net
Original-X-Trace: news.mch.sbs.de 1051606025 11390 139.21.12.80 (29 Apr 2003 08:47:05
	GMT)
Original-X-Complaints-To: abuse@siemens.de
Original-NNTP-Posting-Date: Tue, 29 Apr 2003 08:47:05 +0000 (UTC)
User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.3
Original-Xref: shelby.stanford.edu gnu.emacs.help:112490
Original-To: help-gnu-emacs@gnu.org
X-BeenThere: help-gnu-emacs@gnu.org
X-Mailman-Version: 2.1b5
Precedence: list
List-Id: Users list for the GNU Emacs text editor <help-gnu-emacs.gnu.org>
List-Help: <mailto:help-gnu-emacs-request@gnu.org?subject=help>
List-Post: <mailto:help-gnu-emacs@gnu.org>
List-Subscribe: <http://mail.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=subscribe>
List-Archive: <http://mail.gnu.org/pipermail/help-gnu-emacs>
List-Unsubscribe: <http://mail.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=unsubscribe>
Errors-To: help-gnu-emacs-bounces+gnu-help-gnu-emacs=m.gmane.org@gnu.org
Xref: main.gmane.org gmane.emacs.help:8987
X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:8987

dkcombs@panix.com (David Combs) writes:

 
> What methods do *you* use for installing such
> protections-from-oneself?

Years ago I copied the following from the usenet into my .emacs

(setq kill-emacs-query-functions
      (cons (lambda () (yes-or-no-p "Really kill Emacs? "))
	    kill-emacs-query-functions))

But since 21.1 (?) there is the variable confirm-kill-emacs

-- 
Regards

Heinz