Index: /branches/ide-1.0/ccl/hemlock/src/font.lisp
===================================================================
--- /branches/ide-1.0/ccl/hemlock/src/font.lisp	(revision 6598)
+++ /branches/ide-1.0/ccl/hemlock/src/font.lisp	(revision 6599)
@@ -47,5 +47,5 @@
     (push font-end (line-marks end-line))
     (add-buffer-font-region buffer region)
-    (buffer-note-font-change buffer region)
+    (buffer-note-font-change buffer region font)
     region))