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

2000-11-20

2000-11-20 07:04:01 by Per Hedbor <ph@opera.com>

• 6bed8fd7b570906741f08d3709b9fa0cb1171051 (13 lines) (+12/-1) ^{[ Show | Annotate ]}
  Branch: 2.1

Make occurances of [Bug 745 (#745)] less likely

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

1: - // $Id: module.pmod,v 1.31 2000/11/19 23:34:03 nilsson Exp $ + // $Id: module.pmod,v 1.32 2000/11/20 07:04:01 per Exp $      #include <module.h>   #include <roxen.h>
649:    inherit String;    constant type = "Location";    constant width = 50; +  +  array verify_set( string value ) +  { +  if( !strlen( value ) || !((<'~','/'>)[value[-1]]) ) +  return ({ +  "You most likely want an ending '/' on this variable", +  value +  }); +  return ::verify_set( value );    } -  + }      class URL   //! A URL.