Index: /trunk/source/cocoa-ide/hemlock/src/lispmode.lisp
===================================================================
--- /trunk/source/cocoa-ide/hemlock/src/lispmode.lisp	(revision 15315)
+++ /trunk/source/cocoa-ide/hemlock/src/lispmode.lisp	(revision 15316)
@@ -1250,4 +1250,11 @@
 (defindent "method" 1)
 
+;;; Common library extensions
+(defindent "if-let" 1)
+(defindent "if-let*" 1)
+(defindent "when-let" 1)
+(defindent "when-let*" 1)
+
+#|
 ;;; Debug-internals forms.
 ;;;
@@ -1290,5 +1297,5 @@
 (defindent "frame-function-mismatch" 1)
 (defindent "di:frame-function-mismatch" 1)
-
+|#
 
 ;;; CLOS forms.