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

fix comments and props

Browse Source
This commit is contained in:
Sam Tobin-Hochstadt 2010-04-16 17:52:58 -04:00
parent 6d1d3da1fe
commit 29b7ae4f9f
2 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
collects/meta/contrib/completion/racket-completion.bash
View File

@ -9,6 +9,8 @@
# #
# Change $PLTHOME to whatever references your Racket installation # Change $PLTHOME to whatever references your Racket installation
# this completes only *.{rkt,ss,scm,scrbl} files unless there are
# none, in which case it completes other things
_smart_filedir() _smart_filedir()
{ {
COMPREPLY=() COMPREPLY=()
@ -25,7 +27,6 @@ _racket()
COMPREPLY=() COMPREPLY=()
cur=`_get_cword` cur=`_get_cword`
prev="${COMP_WORDS[COMP_CWORD-1]}" prev="${COMP_WORDS[COMP_CWORD-1]}"
#prev2="${COMP_WORDS[COMP_CWORD-2]}"
doubleopts="--help --version --eval --load --require --lib --script --require-script\ doubleopts="--help --version --eval --load --require --lib --script --require-script\
--main --repl --no-lib --version --warn --syslog --collects --search --addon --no-compiled --no-init-file" --main --repl --no-lib --version --warn --syslog --collects --search --addon --no-compiled --no-init-file"
singleopts="-h -e -f -t -l -p -r -u -k -m -i -n -v -W -L -X -S -A -I -U -N -j -d -b -c -q" singleopts="-h -e -f -t -l -p -r -u -k -m -i -n -v -W -L -X -S -A -I -U -N -j -d -b -c -q"
@ -56,16 +57,18 @@ _racket()
;; ;;
*) *)
case "${prev}" in case "${prev}" in
# these do not take paths as options # these do not take anything completable as arguments
--help|-h|-e|--eval|-p|-k) --help|-h|-e|--eval|-p|-k)
;; ;;
# these take dirs (not files) as options # these take dirs (not files) as arguments
-X|-S|-A|--collects|--search|--addon) -X|-S|-A|--collects|--search|--addon)
_filedir '-d' _filedir '-d'
;; ;;
# these take warnlevels as arguments
-W|--warn|-L|--syslog) -W|--warn|-L|--syslog)
COMPREPLY=( $(compgen -W "${warnlevels}" -- ${cur}) ) COMPREPLY=( $(compgen -W "${warnlevels}" -- ${cur}) )
;; ;;
# otherwise, just a file
*) *)
_smart_filedir _smart_filedir
;; ;;

1
collects/meta/props
View File

@ -898,6 +898,7 @@ path/s is either such a string or a list of them.
"collects/meta" responsible (eli) "collects/meta" responsible (eli)
"collects/meta/check-dists.ss" drdr:command-line "" "collects/meta/check-dists.ss" drdr:command-line ""
"collects/meta/drdr" responsible (jay) drdr:command-line "" "collects/meta/drdr" responsible (jay) drdr:command-line ""
"collects/meta/contrib/completion/racket-completion.bash" responsible (samth sstrickl) drdr:command-line ""
"collects/mred/edit-main.ss" drdr:command-line "mzc ~s" "collects/mred/edit-main.ss" drdr:command-line "mzc ~s"
"collects/mred/edit.ss" drdr:command-line "mred-text -t ~s" "collects/mred/edit.ss" drdr:command-line "mred-text -t ~s"
"collects/mred/lang/main.ss" drdr:command-line "mred-text -t ~s" "collects/mred/lang/main.ss" drdr:command-line "mred-text -t ~s"