# What steps will reproduce the problem? #

Passing a list of ctd objects to make.section() causes a problem.  For
example...

 ctdlist <- list(ctd1, ctd2, ctd3)
 section <- make.section(ctdlist)

This produces an error stating that more than one ctd is required.

The following snippet from make.section() code checks for the "item"
argument class which can be a list of ctd references.

make.section <- function(item, ...)
{
if (class(item) == "ctd") {
	extra.args <- list(...)
	#other code here
} else if (class(item) == "list") {
	args <- list(...)  #<----- this seems to miss the "item" argument
	#other code here
}

I find that I can't pass the function a list of ctd references because the
new variable "args" is creating a new list of all of the other arguments
and not from the "item" argument.

I can get it to work if I change the line to...

make.section <- function(item, ...)
{
if (class(item) == "ctd") {
	extra.args <- list(...)
	#other code here
} else if (class(item) == "list") {
	args <- item  #<----- this works
	#other code here
}


# What version of oce are you using? On what operating system? #
oce version = 0.1.69 
R version = 2.6.2 on G4 PPC OSX 10.4.11


Thanks for the great software, Dan!