condense require statements

create_database.rkt

@@ -4,6 +4,7 @@
 ;; for information on proposals.
 
 (require db)
+         file "config.rkt") ; load configuration file
 
 ; create the database and create the table
 (define (createdb dbloc)
@@ -25,8 +26,6 @@ resultdate TEXT DEFAULT '')")
   (disconnect conn)
   (write-string (string-append "Database created at " dbloc "\n")))
 
-; load configuration file
-(require (file "config.rkt"))
 
 ; make sure we can use the sqlite3 connection
 (cond (not (sqlite3-available?))
@@ -35,4 +34,4 @@ resultdate TEXT DEFAULT '')")
 ; create the database and add the `proposals` table if it doesn't exist
 (if (not (file-exists? dbloc))
     (createdb dbloc)
-    (write-string "Database exists. Exiting."))
+    (write-string "Database exists. Exiting."))

update_proposals.rkt

@@ -2,14 +2,13 @@
 
 ;; This program updates an entry in a proposals database.
 
-(require racket/cmdline)
-(require racket/date)
-(require db)
+(require racket/cmdline
+         racket/date
+         db)
+        "config.rkt") ; load configuration file
 
 (define progname "update_proposals.rkt")
 
-; load configuration file
-(require (file "config.rkt"))
 
 ; give us the date in YYYY-MM-DD format
 (date-display-format 'iso-8601)