* Changed setup-plt to compile collections if they have an "info.ss"

file.  (That is, it does not require the file to have a `name'
  entry.)

* The name shown when setup works is the directory name, followed by
  the `name' field from the info file when specified.

* This means that many `name's are no longer needed, so I'm removing
  them.  To see if you need a `name' entry, consider that the name
  will be shown like this:
    ... foo (<your name here>)
  This means that if the name is the same as the directory name, then
  there is no point in having it.  I also removed cases where the name
  differed only in its capitalization for collections where the case
  is obvious.

* Also, for subcollections, the name should clarify the name of the
  subcollection in context.  For example "Acknowledgments" explains
  what scribbling/acks is, but there's no need to add the context name
  as in "Scribblings: Acknowledgments".

* There may also be a point in keeping names for other uses.  One such
  example was in games, where the name field was used in the PLT Games
  application.  (This was changed to default on the directory name, so
  it is no longer needed in most games.)  Another example is in planet
  packages.

svn: r8629

collects/algol60/info.ss

@@ -1,6 +1,6 @@
 #lang setup/infotab
 
-(define name "Algol 60")
+(define name "Algol 60 Language")
 (define tools '(("tool.ss")))
 (define tool-names '("Algol 60"))
 (define scribblings '(("algol60.scrbl")))

collects/browser/info.ss

@@ -1,6 +1,5 @@
 #lang setup/infotab
 
-(define name "Browser")
 (define tools (list (list "tool.ss")))
 (define tool-names (list "Browser"))
 (define scribblings '(("browser.scrbl")))

collects/browser/private/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Browser private")

collects/combinator-parser/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Combinator parser")

collects/combinator-parser/private-combinator/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Combinator-parser private-combinator")

collects/compiler/info.ss

@@ -1,7 +1,5 @@
 #lang setup/infotab
 
-(define name "mzc")
-
 (define scribblings '(("cffi.scrbl")))
 (define doc-categories '((foreign -1)))
 

collects/compiler/private/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "mzc private")

collects/config/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "Config")
 (define scribblings '(("config.scrbl")))

collects/drscheme/info.ss

@@ -1,6 +1,5 @@
 #lang setup/infotab
 
-(define name "DrScheme")
 (define tools (list "syncheck.ss" (list "time-keystrokes.ss" "private")))
 (define tool-names (list "Check Syntax" "Time Keystrokes"))
 (define mred-launcher-names     (list "DrScheme"))

collects/drscheme/private/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "DrScheme private")

collects/dynext/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "Dynext")
 (define scribblings '(("dynext.scrbl" (multi-page))))

collects/embedded-gui/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Embedded GUI")

collects/eopl/private/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "EoPL private")

collects/errortrace/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Errortrace")

collects/errortrace/scribblings/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "Errortrace documentation")
 (define scribblings '(("errortrace.scrbl" (multi-page))))

collects/ffi/info.ss

@@ -1,3 +1,3 @@
 #lang setup/infotab
 
-(define name "Foreign Function Interfaces")
+(define name "Sample FFIs")

collects/file/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "File")

collects/file/scribblings/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "File documentation")
 (define scribblings '(("file.scrbl" (multi-page))))

collects/framework/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Framework")

collects/framework/private/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "Framework private")
 (define compile-omit-files '("standard-menus.ss"))

collects/frtime/demos/gui/info.ss

@@ -1,3 +1,3 @@
 #lang setup/infotab
 
-(define name "frtime gui wrapper")
+(define name "gui wrapper")

collects/frtime/info.ss

@@ -1,7 +1,5 @@
 #lang setup/infotab
 
-(define name "frtime")
-
 (define scribblings '(("frtime.scrbl" ())))
 (define compile-subcollections '(("frtime" "demos" "gui")))
 (define tools      '("frtime-tool.ss"))

collects/games/aces/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Aces")
 (define game "aces.scm")
 (define game-set "Card Games")

collects/games/blackjack/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Blackjack")
 (define game "blackjack.ss")
 (define game-set "Card Games")

collects/games/cards/info.ss

@@ -1,4 +1,4 @@
 #lang setup/infotab
 
-(define name "Game Cards")
+(define name "Cards game library")
 (define scribblings '(("cards.scrbl")))

collects/games/checkers/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Checkers")
 (define game "checkers.ss")
 (define game-set "Board Games")

collects/games/doors/doc.txt

@@ -2,7 +2,7 @@ _doors.ss_
 
 The "doors.ss" library builds on "gl-board.ss" to support simple
 maze-like games, where the maze is formed by a grid of squares and
-doors of various types can appears between adjacent squares.
+doors of various types appears between adjacent squares.
 
 But it's not ready, yet. Check back later.
 

collects/games/games.ss

@@ -15,7 +15,8 @@
     (and main
          (make-game
           (gamefile main)
-          (info 'name (lambda () (string-titlecase game)))
+          (info 'name (lambda ()
+                        (string-titlecase (regexp-replace* #rx"-" game " "))))
           (info 'game-set  (lambda () "Other Games"))
           (info 'game-icon (lambda () (gamefile (format "~a.png" game))))))))
 

collects/games/gobblet/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Gobblet")
 (define game "gobblet.ss")
 (define game-set "Board Games")

collects/games/info.ss

@@ -1,6 +1,5 @@
 #lang setup/infotab
 
-(define name "Games")
 (define mred-launcher-libraries (list "games.ss"))
 (define mred-launcher-names (list "PLT Games"))
 (define doc-sub-collections

collects/games/jewel/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Jewel")
 (define game "jewel.scm")
 (define game-set "Puzzle Games")

collects/games/lights-out/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Lights Out")
 (define game-set "Puzzle Games")
 (define game "lights-out.ss")

collects/games/memory/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Memory")
 (define game "memory.ss")
 (define game-set "Card Games")

collects/games/paint-by-numbers/info.ss

@@ -1,6 +1,5 @@
 #lang setup/infotab
 
-(define name "Paint by Numbers")
 (define game "paint-by-numbers.ss")
 (define game-set "Puzzle Games")
 (define compile-omit-files

collects/games/parcheesi/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Parcheesi")
 (define game "parcheesi.ss")
 (define game-set "Board Games")

collects/games/pousse/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Pousse")
 (define game "pousse.ss")
 (define game-set "Board Games")

collects/games/same/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Same")
 (define game-set "Puzzle Games")
 (define game "same.ss")

collects/games/slidey/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Slidey")
 (define game-set "Puzzle Games")
 (define game "slidey.ss")

collects/games/spider/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Spider")
 (define game "spider.ss")
 (define game-set "Card Games")

collects/graphics/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "Graphics")
 (define compile-omit-files '("value-turex.ss" "value-turtle-lib.ss"))

collects/graphics/scribblings/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Graphics documentation")
 (define scribblings '(("graphics.scrbl" (multi-page))))
 (define doc-categories '(legacy))

collects/handin-server/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Handin Server")

collects/help/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "Help")
 (define post-install-collection "installer.ss")

collects/honu-module/info.ss

@@ -1,3 +1,3 @@
 #lang setup/infotab
 
-(define name "#honu")
+(define name "#honu Language")

collects/htdch/colors/info.ss

@@ -1,6 +1,5 @@
 #lang setup/infotab
 
-(define name "Colors Teachpack")
 (define assume-virtual-sources #t)
 (define install-collection "installer.ss")
 ;; (define pre-install-collection "pre-installer.ss")

collects/htdch/draw/info.ss

@@ -1,6 +1,5 @@
 #lang setup/infotab
 
-(define name "Draw Teachpack")
 (define assume-virtual-sources #t)
 (define install-collection "installer.ss")
 ;; (define pre-install-collection "pre-installer.ss")

collects/htdch/geometry/info.ss

@@ -1,6 +1,5 @@
 #lang setup/infotab
 
-(define name "Geometry Teachpack")
 (define assume-virtual-sources #t)
 (define install-collection "installer.ss")
 ;; (define pre-install-collection "pre-installer.ss")

collects/htdch/graphics/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Java Graphics Teachpack")
 (define assume-virtual-sources #t)
 (define install-collection "installer.ss")

collects/htdch/idraw/info.ss

@@ -1,6 +1,6 @@
 #lang setup/infotab
 
-(define name "Imperative Draw Teachpack")
+(define name "Imperative Drawing")
 (define assume-virtual-sources #t)
 (define install-collection "installer.ss")
 ;; (define pre-install-collection "pre-installer.ss")

collects/htdch/info.ss

@@ -1,6 +1,6 @@
 #lang setup/infotab
 
-(define name "htdch")
+(define name "Java Teachpacks")
 (define compile-subcollections
   '(("htdch" "draw")
     ("htdch" "geometry")

collects/html/info.ss

@@ -1,6 +1,5 @@
 #lang setup/infotab
 
-(define name "HTML")
 (define scribblings '(("html.scrbl")))
 (define compile-omit-files
   '("dtd.ss" "dtdr.ss" "dtds.ss" "dtd-ast.ss" "case.ss" "html-structs.ss"

collects/lang/private/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "HtDP Languages Private")

collects/launcher/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Launcher")

collects/macro-debugger/info.ss

@@ -1,6 +1,5 @@
 #lang setup/infotab
 
-(define name "Macro Debugger")
 (define tools '(["tool.ss"]))
 (define tool-names '("Macro Stepper"))
 (define scribblings '(("macro-debugger.scrbl")))

collects/macro-debugger/model/info.ss

@@ -1,3 +1,3 @@
 #lang setup/infotab
 
-(define name "Macro Debugger expansion model")
+(define name "Expansion Model")

collects/macro-debugger/syntax-browser/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Macro Debugger - Syntax Browser")

collects/macro-debugger/view/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "Macro Debugger view")
 (define compile-omit-files '("browse-deriv.ss" "show-deriv.ss"))

collects/make/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Make")

collects/mred/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "MrEd")
 (define version '(400))
 (define post-install-collection "script-installer.ss")

collects/mred/lang/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "MrEd #lang")

collects/mred/private/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "MrEd private")

collects/mrlib/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "MrLib")

collects/mrlib/private/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "MrLib private")

collects/mrlib/scribblings/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "MrLib documentation")
 (define scribblings '(("mrlib.scrbl" (multi-page))))

collects/mysterx/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "MysterX")
 (define post-install-collection "installer.ss")

collects/mzcom/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "MzCOM")
 (define post-install-collection "installer.ss")

collects/mzlib/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "MzLib")

collects/mzlib/private/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "MzLib private")
 (define compile-omit-files '("shared-body.ss"))

collects/mzlib/scribblings/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "MzLib documentation")
 (define scribblings '(("mzlib.scrbl" (multi-page))))
 (define doc-categories '(legacy))

collects/mzscheme/info.ss

@@ -1,6 +1,5 @@
 #lang setup/infotab
 
-(define name "MzScheme")
 (define version '(400))
 
 (define scribblings '(("mzscheme.scrbl" (multi-page))))

collects/mzscheme/lang/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "MzScheme #lang")

collects/net/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Net")

collects/net/scribblings/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "Net documentation")
 (define scribblings '(("net.scrbl" (multi-page))))

collects/parser-tools/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Parser-tools")

collects/parser-tools/private-lex/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
 (define compile-omit-files (list "error-tests.ss"))
-(define name "Parser-tools private-lex")

collects/parser-tools/private-yacc/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Parser-tools private-yacc")

collects/plot/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "Plot library")
 (define pre-install-collection "pre-installer.ss")

collects/preprocessor/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Preprocessor")
 (define mzscheme-launcher-names     '("mzpp"        "mztext"))
 (define mzscheme-launcher-libraries '("mzpp-run.ss" "mztext-run.ss"))

collects/profj/comb-parsers/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "ProfessorJ: parser")

collects/profj/libs/java/io/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "ProfessorJ: libs java io")
 ;; (define install-collection "installer.ss")

collects/profj/libs/java/lang/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "ProfessorJ: libs java lang")
 (define assume-virtual-sources #t)
 ;; (define install-collection "installer.ss")

collects/profj/libs/java/tester/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "ProfessorJ: libs java tester")
 ;; (define install-collection "installer.ss")

collects/profj/libs/java/util/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "ProfessorJ: libs java util")
 (define assume-virtual-sources #t)
 ;; (define install-collection "installer.ss")

collects/profj/parsers/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "ProfessorJ: parsers")

collects/r5rs/info.ss

@@ -1,7 +1,5 @@
 #lang setup/infotab
 
-(define name "R5RS")
-
 (define scribblings '(("r5rs.scrbl" (multi-page))))
 (define doc-categories '((legacy 1)))
 

collects/r5rs/lang/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "R5RS Languages")

collects/readline/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "readline")
 (define scribblings '(("readline.scrbl")))

collects/repos-time-stamp/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Repository Time Stamp")
 (define tools (list "time-stamp.ss"))
 (define tool-names (list "Repository Time Stamp"))

collects/s-exp/info.ss

@@ -1,3 +1,3 @@
 #lang setup/infotab
 
-(define name "S-expression Module")
+(define name "S-Expression Module Reader")

collects/s-exp/lang/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "S-expression Module reader")

collects/scheme/info.ss

@@ -1,3 +1 @@
 #lang setup/infotab
-
-(define name "Scheme")

collects/scribble/info.ss

@@ -1,6 +1,5 @@
 #lang setup/infotab
 
-(define name "Scribble")
 (define mzscheme-launcher-names '("scribble"))
 (define mzscheme-launcher-libraries '("scribble.ss"))
 (define compile-omit-files '("test-reader.ss"))

collects/scribblings/acks/info.ss

@@ -1,5 +1,5 @@
 #lang setup/infotab
 
-(define name "Scribblings: Acknowledgments")
+(define name "Acknowledgments")
 (define scribblings '(("acks.scrbl")))
 (define doc-categories '(omit))

collects/scribblings/drscheme/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Scribblings: DrScheme")
 (define scribblings '(("drscheme.scrbl" (multi-page))))
 (define doc-categories '((tool 1)))

collects/scribblings/foreign/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Scribblings: FFI")
 (define scribblings '(("foreign.scrbl" (multi-page))))
 (define doc-categories '((foreign 1)))

collects/scribblings/framework/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "Scribblings: Framework")
 (define scribblings '(("framework.scrbl" (#;multi-page))))

collects/scribblings/gui/info.ss

@@ -1,4 +1,3 @@
 #lang setup/infotab
 
-(define name "Scribblings: GUI")
 (define scribblings '(("gui.scrbl" (multi-page))))

collects/scribblings/guide/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Scribblings: Guide")
 (define scribblings '(("guide.scrbl" (multi-page))))
 (define doc-categories '(getting-started))

collects/scribblings/honu/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Scribblings: Honu")
 (define scribblings '(("honu.scrbl" (multi-page))))
 (define doc-categories '(other))

collects/scribblings/htdp-langs/info.ss

@@ -1,5 +1,4 @@
 #lang setup/infotab
 
-(define name "Scribblings: HtDP Languages")
 (define scribblings '(("htdp-langs.scrbl" (multi-page))))
 (define doc-categories '((language -1)))