--- a/classic-bugs/vol1/seeds/test4.R
+++ b/classic-bugs/vol1/seeds/test4.R
@@ -1,5 +1,5 @@
 source("../../R/Rcheck.R")
-load.modules("glm")
+load.module("glm")
 d <- read.jagsdata("seeds-data.R")
 inits <- read.jagsdata("seeds-init.R")
 m <- jags.model("seedsuni.bug", d, inits, n.chains=2, n.adapt=2500)