change haulid def in sa #9 #21

rBatt · Dec 14, 2015 · 3fef1d5 · 3fef1d5
1 parent 51c216c
commit 3fef1d5
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/clean.names.R b/R/clean.names.R
@@ -317,11 +317,11 @@ clean.names.ngulf <- function(X){
 clean.names.sa <- function(X){
 
 	sa.cols <- c(
-		"COLLECTIONNUMBER" = "haulid", 
+		# "COLLECTIONNUMBER" = "haulid",
 		# "PROJECTNAME",
 		# "PROJECTAGENCY",
 		"DATE" = "date", 
-		# "EVENTNAME",
+		"EVENTNAME" = "haulid",
 		"VESSELNAME" = "vessel", 
 		# "GEARNAME",
 # 		"GEARCODE",