I solved the problem by writing AUTO-FILL-LISP-COMMENTS-IF-APPROPRIATE: zwei: (DEFUN AUTO-FILL-lisp-comments-IF-APPROPRIATE () (IF (SEND *INTERVAL* ':GET ':NOFILL) (TURN-OFF-MODE 'AUTO-FILL-lisp-comments-MODE) (TURN-ON-MODE 'AUTO-FILL-lisp-comments-MODE)))