From a9532180c1dea3225bbff0c02278525a9d9c461f Mon Sep 17 00:00:00 2001
From: Nathaniel Wesley Filardo <nwf@cs.jhu.edu>
Date: Sat, 24 Sep 2016 22:56:42 -0400
Subject: [PATCH] Skeleton: comment out comment delimeters

---
 lib/Grade/Skeleton.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Grade/Skeleton.hs b/lib/Grade/Skeleton.hs
index 59f13d4..4a2691f 100644
--- a/lib/Grade/Skeleton.hs
+++ b/lib/Grade/Skeleton.hs
@@ -29,7 +29,7 @@ makeSkel (Defs _ sl) =
      then maybe empty id scl'
      else maybe id above scl' $
                   "#@" <> pretty (unSN sn) <> maybe empty ((empty <+>) . pretty) (fst msh)
-          `above` prettyDings ic sds (vcat [empty, commentStart, empty, commentEnd])
+          `above` prettyDings ic sds (vcat [empty, "#" <> commentStart, empty, "#" <> commentEnd])
 
  where
   prettyDings _ [] = id
-- 
2.50.1