diff --git a/format-f.lsp b/format-f.lsp
index a744d8e12a95221e9ba6e71c8cd5f68ccc27a7e9..735cde5377d3e9cbac525b3436b42740f5b05bef 100644
--- a/format-f.lsp
+++ b/format-f.lsp
@@ -25,7 +25,7 @@
      collect (list x type s1 s2 s3)))
   nil)
 
-(deftest xoxoformat.f.2
+(deftest format.f.2
   (let ((*print-readably* nil)
         (fn (formatter "~f")))
     (loop