From mboxrd@z Thu Jan  1 00:00:00 1970
Path: main.gmane.org!not-for-mail
From: John Paul Wallington <jpw@gnu.org>
Newsgroups: gmane.emacs.help
Subject: Re: inferior-lisp mode indenting problem
Date: Fri, 15 Aug 2003 01:21:20 +0100
Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org
Message-ID: <87he4jydmn.fsf@indigo.shootybangbang.com>
References: <bhh2g7$hvv$1@mughi.cs.ubc.ca> <m3ekznkeap.fsf@defun.localdomain>
NNTP-Posting-Host: deer.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: sea.gmane.org 1060907557 12706 80.91.224.253 (15 Aug 2003 00:32:37 GMT)
X-Complaints-To: usenet@sea.gmane.org
NNTP-Posting-Date: Fri, 15 Aug 2003 00:32:37 +0000 (UTC)
Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Fri Aug 15 02:32:36 2003
Return-path: <help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org>
Original-Received: from monty-python.gnu.org ([199.232.76.173])
	by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian))
	id 19nSWB-00026u-00
	for <geh-help-gnu-emacs@m.gmane.org>; Fri, 15 Aug 2003 02:32:36 +0200
Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org)
	by monty-python.gnu.org with esmtp (Exim 4.20)
	id 19nSV3-0001pK-04
	for geh-help-gnu-emacs@m.gmane.org; Thu, 14 Aug 2003 20:31:25 -0400
Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!nntp.cs.ubc.ca!fu-berlin.de!uni-berlin.de!host217-44-221-169.range217-44.btcentralplus.COM!not-for-mail
Original-Newsgroups: gnu.emacs.help
Original-Lines: 25
Original-NNTP-Posting-Host: host217-44-221-169.range217-44.btcentralplus.com
	(217.44.221.169)
Original-X-Trace: news.uni-berlin.de 1060906905 832214 217.44.221.169 (16 [170119])
X-Orig-Path: indigo.shootybangbang.com!news
X-Attribution: jpw
X-Face: R(_z-<e!Z,qjN8xeu/^:Szs}15R'D_9}g7Qlm0x+2sF<`w9o]-oT>rF:grdKO.*u`n);
	p.i$Eiz=h^CO5eDYv"4:K@#\HN09*Ykx}}B{kF/KH}%f_o^Wp<kb`,1KLtZp"^C{-{e~S=IP0_"8B6K+CkbKw='FSzftzu
User-Agent: Gnus/5.1003 (Gnus v5.10.3) Emacs/21.3.50 (gnu/linux)
Cancel-Lock: sha1:uoMVSHDlTIo4w192u7S+75UuCBA=
Original-Xref: shelby.stanford.edu gnu.emacs.help:115904
Original-To: help-gnu-emacs@gnu.org
X-BeenThere: help-gnu-emacs@gnu.org
X-Mailman-Version: 2.1.2
Precedence: list
List-Id: Users list for the GNU Emacs text editor  <help-gnu-emacs.gnu.org>
List-Unsubscribe: <http://mail.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=unsubscribe>
List-Archive: <http://mail.gnu.org/pipermail/help-gnu-emacs>
List-Post: <mailto:help-gnu-emacs@gnu.org>
List-Help: <mailto:help-gnu-emacs-request@gnu.org?subject=help>
List-Subscribe: <http://mail.gnu.org/mailman/listinfo/help-gnu-emacs>,
	<mailto:help-gnu-emacs-request@gnu.org?subject=subscribe>
Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org
Xref: main.gmane.org gmane.emacs.help:11822
X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:11822

Jesper Harder <harder@myrealbox.com> wrote:

> Lowell <lkirsh@cs.ubc.ca> writes:
>
>> The auto-indenting of 'if' clauses in inferior-lisp mode is not
>> working properly.
[...]
>> How can I change it?
>
> (put 'if 'lisp-indent-function 0) will get you:
>
> (if test
>     then
>     else)
>
> But beware that most other people reading your code will find this
> style annoying.

To get proper indentation of Common Lisp code without clobbering
conventional Emacs Lisp indentation you could do something like so:

(add-hook 'lisp-mode-hook
   (lambda ()
     (set (make-local-variable lisp-indent-function)
          'common-lisp-indent-function)))