Final fix of Perl bindings

2020-09-24 14:52:05 +02:00 · 2020-09-24 14:52:05 +02:00 · 8f04a76337
commit 8f04a76337
parent 7cdc61b67a
1 changed files with 1 additions and 2 deletions
--- a/xs/xsp/Print.xsp
+++ b/xs/xsp/Print.xsp
@ -142,14 +142,13 @@ _constant()
        %code%{ 
            // Touching every config as the Perl bindings does not correctly export ModelConfig,
            // therefore the configs have often invalid timestamps.
-            model->config.touch();
            for (auto obj : model->objects) {
                obj->config.touch();
                for (auto vol : obj->volumes)
                    vol->config.touch();
            }
            for (auto mat : model->materials)
-                mat->config.touch();
+                mat.second->config.touch();
            RETVAL = THIS->apply(*model, *config);
        %};
    bool has_infinite_skirt();