Indentation

I am wondering if there is an easy way to get proper indentation for
'with-open-file'.

Example:

This is what I get in my GNU Emacs 21.1 with ilisp 5.11.1:

(let ((value 300))
  (with-open-file (stream "testfile"
			  :element-type '(unsigned-byte 8)
			  :direction :output)
		  (write-byte (ldb (byte 8 8) value) stream)
		  (write-byte (ldb (byte 8 0) value) stream)))

Shouldn't it be:

(let ((value 300))
  (with-open-file (stream "testfile"
                   :element-type '(unsigned-byte 8)
                   :direction :output)
    (write-byte (ldb (byte 8 8) value) stream)
    (write-byte (ldb (byte 8 0) value) stream)))

?

-Robert