diff --git a/addons/fetchmail/fetchmail.py b/addons/fetchmail/fetchmail.py
index 46f10f69ff5..8aaff197d47 100644
--- a/addons/fetchmail/fetchmail.py
+++ b/addons/fetchmail/fetchmail.py
@@ -29,13 +29,13 @@ from poplib import POP3_SSL
import netsvc
from osv import osv, fields
import tools
+from tools.translate import _
logger = logging.getLogger('fetchmail')
-
-class email_server(osv.osv):
-
- _name = 'email.server'
+class fetchmail_server(osv.osv):
+ """Incoming POP/IMAP mail server account"""
+ _name = 'fetchmail.server'
_description = "POP/IMAP Server"
_order = 'priority'
@@ -69,7 +69,7 @@ class email_server(osv.osv):
"emails to the existing conversations (documents)."),
'priority': fields.integer('Server Priority', readonly=True, states={'draft':[('readonly', False)]}, help="Defines the order of processing, "
"lower values mean higher priority"),
- 'message_ids': fields.one2many('mail.message', 'server_id', 'Messages', readonly=True),
+ 'message_ids': fields.one2many('mail.message', 'fetchmail_server_id', 'Messages', readonly=True),
}
_defaults = {
'state': "draft",
@@ -84,7 +84,6 @@ class email_server(osv.osv):
port = ssl and 995 or 110
elif server_type == 'imap':
port = ssl and 993 or 143
-
return {'value':{'port':port}}
def set_draft(self, cr, uid, ids, context=None):
@@ -147,7 +146,7 @@ class email_server(osv.osv):
action_pool = self.pool.get('ir.actions.server')
for server in self.browse(cr, uid, ids, context=context):
logger.info('start checking for new emails on %s server %s', server.type, server.name)
- context.update({'server_id': server.id, 'server_type': server.type})
+ context.update({'fetchmail_server_id': server.id, 'server_type': server.type})
count = 0
if server.type == 'imap':
try:
@@ -199,28 +198,29 @@ class email_server(osv.osv):
return True
class mail_message(osv.osv):
-
_inherit = "mail.message"
-
_columns = {
- 'server_id': fields.many2one('email.server', "Inbound Mail Server", readonly=True, select=True),
+ 'fetchmail_server_id': fields.many2one('fetchmail.server', "Inbound Mail Server",
+ readonly=True,
+ select=True,
+ oldname='server_id'),
}
def create(self, cr, uid, values, context=None):
if context is None:
context={}
- server_id = context.get('server_id',False)
- if server_id:
- values['server_id'] = server_id
+ fetchmail_server_id = context.get('fetchmail_server_id')
+ if fetchmail_server_id:
+ values['fetchmail_server_id'] = fetchmail_server_id
res = super(mail_message,self).create(cr, uid, values, context=context)
return res
def write(self, cr, uid, ids, values, context=None):
if context is None:
context={}
- server_id = context.get('server_id',False)
- if server_id:
- values['server_id'] = server_id
+ fetchmail_server_id = context.get('fetchmail_server_id')
+ if fetchmail_server_id:
+ values['fetchmail_server_id'] = server_id
res = super(mail_message,self).write(cr, uid, ids, values, context=context)
return res
diff --git a/addons/fetchmail/fetchmail_data.xml b/addons/fetchmail/fetchmail_data.xml
index ef40a76489f..d77aadc12de 100644
--- a/addons/fetchmail/fetchmail_data.xml
+++ b/addons/fetchmail/fetchmail_data.xml
@@ -6,10 +6,10 @@
5
minutes
-1
-
-
-
-
+
+ fetchmail.server
+ _fetch_mails
+ ()
diff --git a/addons/fetchmail/fetchmail_installer_view.xml b/addons/fetchmail/fetchmail_installer_view.xml
index 791ff2180cd..911ad8101da 100644
--- a/addons/fetchmail/fetchmail_installer_view.xml
+++ b/addons/fetchmail/fetchmail_installer_view.xml
@@ -1,9 +1,9 @@
- Setup Inbound Mail Server (fetchmail)
+ Setup Incoming Mail Server (fetchmail)
ir.actions.act_window
- email.server
+ fetchmail.server
form
tree,form
diff --git a/addons/fetchmail/fetchmail_view.xml b/addons/fetchmail/fetchmail_view.xml
index 5f5c094a454..f9c6b9b591a 100644
--- a/addons/fetchmail/fetchmail_view.xml
+++ b/addons/fetchmail/fetchmail_view.xml
@@ -3,8 +3,8 @@
- email.server.tree
- email.server
+ fetchmail.server.list
+ fetchmail.server
tree
@@ -20,11 +20,11 @@
- email.server.form
- email.server
+ fetchmail.server.form
+ fetchmail.server
form
-
- email.server.search
- email.server
+ fetchmail.server.search
+ fetchmail.server
search
-
+
@@ -96,7 +96,7 @@
Incoming Mail Servers
- email.server
+ fetchmail.server
form
tree,form
@@ -112,13 +112,13 @@
/>
- mail.message.tree
+ mail.message.list.fetchmail
mail.message
tree
-
+
@@ -130,15 +130,15 @@
-
+
+ id="act_server_history" name="Messages" domain="[('email_from', '!=', False), ('fetchmail_server_id', '=', active_id)]"
+ res_model="mail.message" src_model="fetchmail.server"/>
diff --git a/addons/fetchmail/security/ir.model.access.csv b/addons/fetchmail/security/ir.model.access.csv
index 7aa6c84d22b..0ef984cd002 100644
--- a/addons/fetchmail/security/ir.model.access.csv
+++ b/addons/fetchmail/security/ir.model.access.csv
@@ -1,2 +1,3 @@
"id","name","model_id:id","group_id:id","perm_read","perm_write","perm_create","perm_unlink"
-"access_email_server","email.server","model_email_server",,1,1,1,1
+"access_fetchmail_server","fetchmail.server","model_email_server",,1,0,0,0
+"access_fetchmail_server","fetchmail.server","model_email_server","base.group_system",1,1,1,1