@@ -1,5 +1,7 @@
+;; -*- mode: Scheme; tab-width: 2; -*- ;;
+
 (define-foreign-type ihandle (c-pointer "Ihandle")
 	(ihandle->pointer #f)
 	(pointer->ihandle #f))
 
 (define-foreign-type ihandle-list nonnull-pointer-vector