model: Generalize access to `model` form `MEntitiy`.

[nit.git] / src / model / mproject.nit

diff --git a/src/model/mproject.nit b/src/model/mproject.nit
index 7bd502e..0b8010e 100644 (file)
--- a/src/model/mproject.nit
+++ b/src/model/mproject.nit
@@ -27,7 +27,7 @@ class MProject
        redef var name: String
 
        # The model of the project
-       var model: Model
+       redef var model: Model
 
        # The root of the group tree
        var root: nullable MGroup writable = null
@@ -95,6 +95,8 @@ class MGroup
                end
        end
 
+       redef fun model do return mproject.model
+
        redef fun parent_concern do
                if not is_root then return parent
                return mproject