Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!seismo!mcvax!ukc!its63b!hwcs!aimmi!russell
From: russell@aimmi.UUCP (Russell Ritchie)
Newsgroups: net.emacs
Subject: Indentation Query about lisp-mode.
Message-ID: <806@aimmi.UUCP>
Date: Mon, 6-Oct-86 06:00:45 EDT
Article-I.D.: aimmi.806
Posted: Mon Oct  6 06:00:45 1986
Date-Received: Wed, 8-Oct-86 22:38:35 EDT
Reply-To: russell@aimmi.UUCP (Russell Ritchie)
Organization: Heriot-Watt/Strathclyde Alvey MMI Unit, Scotland
Lines: 19

If I use the GNUemacs function 'indent-sexp' on the following piece of code
I get the result shown below. It appears that the indentation strategy used
does not recognise the special nature of '|' (or '"') in atom names.

(defun abbrev_if_necessary_and_output(x) ; Indentation I would expect it.
  (cond ((longer_than_some_arbitrary_length_p x)
	 (patom '|(|)
	 (abbrev_aux (body_of x))
	 (patom '|)|))
	(t (patom x))))

(defun abbrev_if_necessary_and_output(x) ; What GNUemacs does.
  (cond ((longer_than_some_arbitrary_length_p x)
	 (patom '|(|)
		(abbrev_aux (body_of x))
		(patom '|)|))
	(t (patom x))))

Does anyone have a fix for this bug/feature?