Fixed same mistake for Acknowledgments.

svn: r7187
2007-08-26 21:54:07 +00:00 · 2007-08-26 21:54:07 +00:00 · 6d2e979416
commit 6d2e979416
parent 31b017289d
1 changed files with 4 additions and 3 deletions
--- a/collects/help/servlets/home.ss
+++ b/collects/help/servlets/home.ss
@ -150,9 +150,10 @@
              [else `()])
          ; DrScheme Acknowledgements
          ,@(case (helpdesk-platform)
-              [(internal-browser) `((b (a ((href ,url-helpdesk-acknowledge))
-                                          (font ([color "forestgreen"])"Acknowledgments"))))]
-              [else                '()]))
+              [(internal-browser internal-browser-simple) 
+                `((b (a ((href ,url-helpdesk-acknowledge))
+                        (font ([color "forestgreen"])"Acknowledgments"))))]
+              [else '()]))
         -- -- -- --))
  
  ; page-tag->title+items : string -> (values string list-of-right-items)