diff options
author | Oliver Tappe | 2008-03-17 23:25:57 +0100 |
---|---|---|
committer | Oliver Tappe | 2008-03-17 23:25:57 +0100 |
commit | 2e57a7d346764109f49f2f6ad5e28c42c4597e76 (patch) | |
tree | d938e6abc60de154084d8f247d7db5a69c274a4b /config-db | |
parent | * fixed several bugs in the config-demuxer caused by recent changes in plugin (diff) | |
download | core-2e57a7d346764109f49f2f6ad5e28c42c4597e76.tar.gz core-2e57a7d346764109f49f2f6ad5e28c42c4597e76.tar.xz core-2e57a7d346764109f49f2f6ad5e28c42c4597e76.zip |
* removed debug output
* fixed problem with respect to writing system attributes: do not filter unset
attributes for the default-system, as we want that to show all existing
attributes
git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@1649 95ad53e4-c205-0410-b2fa-d234c58c8868
Diffstat (limited to 'config-db')
-rw-r--r-- | config-db/OpenSLX/MetaDB/DBI.pm | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/config-db/OpenSLX/MetaDB/DBI.pm b/config-db/OpenSLX/MetaDB/DBI.pm index 50c1465d..1d706d8c 100644 --- a/config-db/OpenSLX/MetaDB/DBI.pm +++ b/config-db/OpenSLX/MetaDB/DBI.pm @@ -750,7 +750,6 @@ sub addInstalledPlugin = defined $pluginAttrs->{$pluginAttrName} ? $pluginAttrs->{$pluginAttrName} : '-'; -print "$pluginAttrName: $currVal <=> $givenVal\n"; next if $currVal eq $givenVal; return if ! $self->_doUpdate( 'installed_plugin_attr', [ $attrInfo->{id} ], [ { @@ -883,7 +882,13 @@ sub setSystemAttrs value => $attrs->{$_}, } } - grep { defined $attrs->{$_} } + grep { + # Write undefined attributes for the default system, such that + # it shows all existing attributes. All other systems never + # write undefined attributes (if they have not defined a + # specific attribute, it is inherited from "above"). + $systemID == 0 || defined $attrs->{$_} + } keys %$attrs; $self->_doInsert('system_attr', \@attrData); return 1; |