Commit 1069e013 authored by Uwe Schulzweida's avatar Uwe Schulzweida
Browse files

setpartabn: skip attribute name (bug fix).

parent 9eb79a94
...@@ -18,7 +18,7 @@ ...@@ -18,7 +18,7 @@
/* /*
This module contains the following operators: This module contains the following operators:
Setpartab setpartab Set parameter table CMORlite cmorlite CMOR lite
*/ */
#if defined(HAVE_CONFIG_H) #if defined(HAVE_CONFIG_H)
......
...@@ -191,7 +191,10 @@ void apply_parameterlist(pt_mode_t ptmode, list_t *pmlist, int nvars, int vlistI ...@@ -191,7 +191,10 @@ void apply_parameterlist(pt_mode_t ptmode, list_t *pmlist, int nvars, int vlistI
if ( lv1 && STR_IS_EQ(key, "standard_name") ) vlistDefVarStdname(vlistID2, varID, value); if ( lv1 && STR_IS_EQ(key, "standard_name") ) vlistDefVarStdname(vlistID2, varID, value);
else if ( lv1 && STR_IS_EQ(key, "long_name") ) vlistDefVarLongname(vlistID2, varID, value); else if ( lv1 && STR_IS_EQ(key, "long_name") ) vlistDefVarLongname(vlistID2, varID, value);
else if ( lv1 && STR_IS_EQ(key, "units") ) cdo_define_var_units(var, vlistID2, varID, value); else if ( lv1 && STR_IS_EQ(key, "units") ) cdo_define_var_units(var, vlistID2, varID, value);
else if ( lv1 && STR_IS_EQ(key, "name") && ptmode != VARIABLE_NAME ) vlistDefVarName(vlistID2, varID, parameter2word(value)); else if ( lv1 && STR_IS_EQ(key, "name") )
{
if ( ptmode != VARIABLE_NAME ) vlistDefVarName(vlistID2, varID, parameter2word(value));
}
else if ( lv1 && STR_IS_EQ(key, "out_name") ) else if ( lv1 && STR_IS_EQ(key, "out_name") )
{ {
const char *outname = parameter2word(value); const char *outname = parameter2word(value);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment