svn: r7783
This commit is contained in:
Robby Findler 2007-11-20 13:40:10 +00:00
parent 06d4ce9a53
commit 978ce31303

View File

@ -1,6 +1,6 @@
#lang scheme/base
(require "private/search.ss")
(require "search.ss")
(define argv (current-command-line-arguments))
(when (equal? argv #())
(error 'help-desk "expected a search term on the command line"))