public static function displayProperties($object)
    {
        $class = get_class($object);

        echo sprintf(self::_('Properties for class %s:'), $class);
        echo '<ul>';

        foreach (get_class_vars($class) as $property_name => $value) {
            $instance_value = $object->$property_name;
            echo '<li>', $property_name, ' = ', $instance_value, '</li>';
        }

        echo '</ul>';
    }