From 7afbca3af907b6ab6ee11f2b6826593b6aead068 Mon Sep 17 00:00:00 2001
From: Stephane Wirtel <stw@openerp.com>
Date: Thu, 22 Sep 2011 15:08:27 +0200
Subject: [PATCH] [IMP] fetchmail: Introduce the fetchmail_model keyword in the
 context to specify the default value for the object field of the
 fetchmail.server object

bzr revid: stw@openerp.com-20110922130827-ny2i17lng1x1ua59
---
 addons/fetchmail/fetchmail.py | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/addons/fetchmail/fetchmail.py b/addons/fetchmail/fetchmail.py
index b7460965c3b..f45b5e955a0 100644
--- a/addons/fetchmail/fetchmail.py
+++ b/addons/fetchmail/fetchmail.py
@@ -78,6 +78,22 @@ class fetchmail_server(osv.osv):
         'attach': True,
     }
 
+    def default_get(self, cr, uid, fields, context=None):
+        if context is None:
+            context = {}
+
+        result = super(fetchmail_server, self).default_get(cr, uid, fields, context=context)
+
+        model = context.pop('fetchmail_model', False) or False
+
+        if isinstance(model, basestring):
+            model_id = self.pool.get('ir.model').search(cr, uid, [('model', '=', model)], context=context)
+            result.update(
+                object_id = model_id[0],
+            )
+
+        return result
+
     def onchange_server_type(self, cr, uid, ids, server_type=False, ssl=False):
         port = 0
         if server_type == 'pop':