Roxen.git/ server/ etc/ modules/ Variable.pmod/ module.pmod

2007-01-22

2007-01-22 13:05:48 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• ee8d50b96dda90b0eb0f24e70c579b69affc2cd3 (26 lines) (+22/-4) ^{[ Show | Annotate ]}
  Branch: 5.2

Attempt to avoid infinite recursion in ProviderChoice by overloading low_set().

Rev: server/etc/modules/Variable.pmod/module.pmod:1.101

1: - // $Id: module.pmod,v 1.100 2007/01/12 10:17:31 erikd Exp $ + // $Id: module.pmod,v 1.101 2007/01/22 13:05:48 grubba Exp $      #include <module.h>   #include <roxen.h>
1397:       int low_set(RoxenModule to)    { +  RoxenModule old = changed_values[_id]; +  if (to == old) return 0; +  if (!old) { +  if (local_id != "") { +  old = transform_from_form(local_id); +  } +  if (!old) { +  old = default_value(); +  if (old) local_id = _name(old); +  } +  changed_values[_id] = to; +  if (to == old) return 0; +  } +  changed_values[_id] = to;    local_id = _name(to); -  return ::low_set(to); +  if( get_changed_callback() ) +  get_changed_callback()( this_object() ); +  return 1;    }       // NOTE: Will be called with a string at module init!
1427:       array get_choice_list()    { -  return conf->get_providers(provides); +  array res = conf->get_providers(provides); +  sort(map(res, _title), res); +  return res;    }       static string _name(RoxenModule val)
1452:    } else {    array(RoxenModule) providers = get_choice_list();    if (sizeof(providers)) { -  // FIXME: Add sorting? +     return providers[0];    }    return UNDEFINED;