| 3 | //  $Id$ | //  $Id$ | 
| 4 | // --------------------------------------------------------------------------- | // --------------------------------------------------------------------------- | 
| 5 | //  $Log$ | //  $Log$ | 
| 6 |  | //  Revision 1.4  2003/02/22 16:34:16  joko | 
| 7 |  | //  + minor fix: can seperate namespace identifier with slashes ('/') now | 
| 8 |  | // | 
| 9 |  | //  Revision 1.3  2003/02/09 17:16:06  joko | 
| 10 |  | //  + handling arguments perl style ;-) | 
| 11 |  | // | 
| 12 | //  Revision 1.2  2003/02/03 05:01:48  joko | //  Revision 1.2  2003/02/03 05:01:48  joko | 
| 13 | //  + now attributes can get passed in to the constructors | //  + now attributes can get passed in to the constructors | 
| 14 | // | // | 
| 18 | // --------------------------------------------------------------------------- | // --------------------------------------------------------------------------- | 
| 19 |  |  | 
| 20 |  |  | 
|  |  |  | 
| 21 | /* | /* | 
| 22 | class DesignPattern_Object { | class DesignPattern_Object { | 
| 23 | function DesignPattern_Object() { | function DesignPattern_Object() { | 
| 33 | } | } | 
| 34 | } | } | 
| 35 |  |  | 
| 36 | function mkObject($namespacedClassname, $attributes = null) { | function mkObject() { | 
| 37 |  | $arg_list = func_get_args(); | 
| 38 |  | //print Dumper($arg_list); | 
| 39 |  | $namespacedClassname = array_shift($arg_list); | 
| 40 |  | if (strstr($namespacedClassname, '_')) { | 
| 41 |  | print "mkObject: unallowed character in namespaced classname: '_' ($namespacedClassname)<br/>"; | 
| 42 |  | return; | 
| 43 |  | } | 
| 44 |  | //print "class: $classname<br>"; | 
| 45 |  | $attributes = $arg_list; | 
| 46 | $classname = $namespacedClassname; | $classname = $namespacedClassname; | 
| 47 | if (loadModule($namespacedClassname)) { | if (loadModule($namespacedClassname)) { | 
| 48 | $classname = str_replace('::', '_', $namespacedClassname); | $classname = str_replace('::', '_', $namespacedClassname); | 
| 49 |  | $classname = str_replace('/', '_', $classname); | 
| 50 | } | } | 
| 51 | $obj = new DesignPattern_Bridge($classname, $attributes); | $obj = new DesignPattern_Bridge($classname, $attributes); | 
| 52 | return $obj; | return $obj; |