Indentation without slime:

(DEFMACRO DEFTRANSLATION (TABLE TEXT LANGUAGE TRANSLATION &REST LANGS-TRANS) `(PROGN (DEFVAR ,TABLE (MAKE-HASH-TABLE :TEST (FUNCTION EQUAL))) (SETF ,@(DO ((LT (CONS LANGUAGE (CONS TRANSLATION LANGS-TRANS))) (RESULT ,())) ((NULL LT) (NREVERSE RESULT)) (PUSH `(GETHASH (CONS ,TEXT ,(POP LT)) ,TABLE)) (LET ((TRANS (POP LT))) (IF (EQ TRANSLATION :IDEM) `,TEXT `,TRANSLATION))))) );;deftranslation

(DEFUN LOCALIZE (TABLE LANGUAGE TEXT) " RETURN: A version of the text in the given language. " (LET ((SYM (INTERN-SOFT TEXT TABLE))) (IF SYM (LET ((RESULT (GET SYM LANGUAGE))) (IF RESULT RESULT (LOCALIZE TABLE :EN TEXT))) TEXT)));;localize

Indentation with slime:

(DEFMACRO DEFTRANSLATION (TABLE TEXT LANGUAGE TRANSLATION &REST LANGS-TRANS) `(PROGN (DEFVAR ,TABLE (MAKE-HASH-TABLE :TEST (FUNCTION EQUAL))) (SETF ,@(DO ((LT (CONS LANGUAGE (CONS TRANSLATION LANGS-TRANS))) (RESULT ,())) ((NULL LT) (NREVERSE RESULT)) (PUSH `(GETHASH (CONS ,TEXT ,(POP LT)) ,TABLE)) (LET ((TRANS (POP LT))) (IF (EQ TRANSLATION :IDEM) `,TEXT `,TRANSLATION))))) );;DEFTRANSLATION

(DEFUN LOCALIZE (TABLE LANGUAGE TEXT) " RETURN: A version of the text in the given language. " (LET ((SYM (INTERN-SOFT TEXT TABLE))) (IF SYM (LET ((RESULT (GET SYM LANGUAGE))) (IF RESULT RESULT (LOCALIZE TABLE :EN TEXT))) TEXT)));;LOCALIZE

The slime-indentation of &REST is right, but all the rest is wrong. How could I disable it?