From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Juanma Barranquero Newsgroups: gmane.emacs.devel Subject: Re: define-derived-mode Date: Sun, 8 May 2005 19:00:05 +0200 Message-ID: References: <200505080101.j48117N24298@raven.dms.auburn.edu> <200505080315.j483F2l24405@raven.dms.auburn.edu> Reply-To: Juanma Barranquero NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable X-Trace: sea.gmane.org 1115577901 5701 80.91.229.2 (8 May 2005 18:45:01 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sun, 8 May 2005 18:45:01 +0000 (UTC) Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Sun May 08 20:44:59 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1DUqlL-0006dZ-5B for ged-emacs-devel@m.gmane.org; Sun, 08 May 2005 20:44:23 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1DUqtW-0001pk-43 for ged-emacs-devel@m.gmane.org; Sun, 08 May 2005 14:52:50 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1DUqqJ-000101-Sb for emacs-devel@gnu.org; Sun, 08 May 2005 14:49:32 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1DUqqE-0000uc-4q for emacs-devel@gnu.org; Sun, 08 May 2005 14:49:27 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1DUqqB-0000q9-OG for emacs-devel@gnu.org; Sun, 08 May 2005 14:49:23 -0400 Original-Received: from [64.233.184.207] (helo=wproxy.gmail.com) by monty-python.gnu.org with esmtp (Exim 4.34) id 1DUqtQ-0003Tq-QZ for emacs-devel@gnu.org; Sun, 08 May 2005 14:52:44 -0400 Original-Received: by wproxy.gmail.com with SMTP id 50so1514519wri for ; Sun, 08 May 2005 11:46:45 -0700 (PDT) DomainKey-Signature: a=rsa-sha1; q=dns; c=nofws; s=beta; d=gmail.com; h=received:message-id:date:from:reply-to:to:subject:in-reply-to:mime-version:content-type:content-transfer-encoding:content-disposition:references; b=Um51eOauvFR7h8PHP1RZY5D4ba2xBlRNXjcbfYNtIqkjyPb+SzG/cIoeMI9UssIIAaCD1+gc1LRjI+P9lKd2bRBKUve/sqTMuYLgc1zq4bTQRPjkkx0mbMFJHC2fjriWIYft85xi251faX6JfiruLR6YjaxZOtV1uZj/y8IEzrI= Original-Received: by 10.54.84.2 with SMTP id h2mr2078576wrb; Sun, 08 May 2005 10:00:05 -0700 (PDT) Original-Received: by 10.54.82.6 with HTTP; Sun, 8 May 2005 10:00:05 -0700 (PDT) Original-To: emacs-devel@gnu.org In-Reply-To: Content-Disposition: inline X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:36874 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:36874 > However, I am not sure we want defcustoms for *any* mode hooks. How > often would a user want to customize one with defcustom? C:\...\lisp> grep -E "defcustom.*-mode-hook" *.el add-log.el:(defcustom change-log-mode-hook nil autorevert.el:(defcustom auto-revert-mode-hook nil autorevert.el:(defcustom global-auto-revert-mode-hook nil calculator.el:(defcustom calculator-mode-hook nil cmuscheme.el:(defcustom inferior-scheme-mode-hook nil comint.el:(defcustom comint-mode-hook '(turn-on-font-lock) cus-edit.el:(defcustom custom-mode-hook nil descr-text.el:(defcustom describe-text-mode-hook nil diff-mode.el:(defcustom diff-mode-hook nil dired.el:(defcustom dired-mode-hook nil ediff-init.el:(defcustom ediff-mode-hook nil ehelp.el:(defcustom electric-help-mode-hook nil follow.el:(defcustom follow-mode-hook nil forms.el:(defcustom forms-mode-hook nil help-mode.el:(defcustom help-mode-hook nil hexl.el:(defcustom hexl-mode-hook '(hexl-follow-line hexl-activate-ruler) ibuffer.el:(defcustom ibuffer-mode-hook nil ielm.el:(defcustom ielm-mode-hook nil info.el:(defcustom Info-mode-hook log-edit.el:(defcustom log-edit-mode-hook (if (boundp 'vc-log-mode-hook) vc-log-mode-hook) replace.el:(defcustom occur-mode-hook '(turn-on-font-lock) ses.el:(defcustom ses-mode-hook nil shell.el:(defcustom shell-mode-hook '() speedbar.el:(defcustom speedbar-mode-hook nil term.el:(defcustom term-mode-hook '() view.el:(defcustom view-mode-hook nil wid-browse.el:(defcustom widget-browse-mode-hook nil winner.el:(defcustom winner-mode-hook nil --=20 /L/e/k/t/u