From cbb8e7217d2ec256fff0b09eed1665c7f7d30c1b Mon Sep 17 00:00:00 2001
From: Sarah Vaupel <>
Date: Sat, 25 Jul 2020 15:15:16 +0200
Subject: [PATCH] fix(course-visibility): show icon to lecturers only

---
 src/Handler/Course/Show.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Handler/Course/Show.hs b/src/Handler/Course/Show.hs
index 68012e885..3165bf4b0 100644
--- a/src/Handler/Course/Show.hs
+++ b/src/Handler/Course/Show.hs
@@ -232,7 +232,7 @@ getCShowR tid ssh csh = do
   let heading = [whamlet|
           $newline never
           ^{courseName course}
-          $if not courseIsVisible
+          $if not courseIsVisible && mayEditCourse
             \ #{iconInvisible}
         |]