suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

remove HtUS and Slideshow web sites in the Help menu

Browse Source 
svn: r10057
This commit is contained in:
Matthew Flatt 2008-05-30 19:10:27 +00:00
parent 566dfa072c
commit 0ef9d76ad3
2 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
collects/drscheme/private/app.ss
View File

@ -366,7 +366,6 @@
(add (string-constant plt-homepage) "http://www.plt-scheme.org/") (add (string-constant plt-homepage) "http://www.plt-scheme.org/")
(add (string-constant teachscheme!-homepage) "http://www.teach-scheme.org/") (add (string-constant teachscheme!-homepage) "http://www.teach-scheme.org/")
(add (string-constant how-to-design-programs) "http://www.htdp.org/") (add (string-constant how-to-design-programs) "http://www.htdp.org/")
(add (string-constant how-to-use-scheme) "http://www.htus.org/")
(for-each (λ (tool) (for-each (λ (tool)
(cond [(drscheme:tools:successful-tool-url tool) (cond [(drscheme:tools:successful-tool-url tool)

1
collects/slideshow/info.ss
View File

@ -3,7 +3,6 @@
(define tools (list '("tool.ss"))) (define tools (list '("tool.ss")))
(define tool-names (list "Slideshow")) (define tool-names (list "Slideshow"))
(define tool-icons (list (list "slideshow.png" "slideshow"))) (define tool-icons (list (list "slideshow.png" "slideshow")))
(define tool-urls (list "http://www.plt-scheme.org/software/slideshow/"))
(define mred-launcher-libraries (list "start.ss")) (define mred-launcher-libraries (list "start.ss"))
(define mred-launcher-names (list "Slideshow")) (define mred-launcher-names (list "Slideshow"))
(define compile-omit-paths '("initial-ones.ss" "pict-snipclass.ss" "examples")) (define compile-omit-paths '("initial-ones.ss" "pict-snipclass.ss" "examples"))