fix label in generated form for relations
the label for object relations was incorrect, because the '_object' mangling is
done on the wrong component of field.label.
fix ticket 472831
""":organization: Logilab:copyright: 2001-2009 LOGILAB S.A. (Paris, FRANCE), license is LGPL v2.:contact: http://www.logilab.fr/ -- mailto:contact@logilab.fr:license: GNU Lesser General Public License, v2.1 - http://www.gnu.org/licenses"""fromlogilab.common.testlibimportTestCase,unittest_mainfromcubicweb.web.views.embeddingimportprefix_linksclassUILIBTC(TestCase):deftest_prefix_links(self):"""suppose we are embedding http://embedded.com/page1.html"""orig=['<a href="http://www.perdu.com">perdu ?</a>','<a href="http://embedded.com/page1.html">perdu ?</a>','<a href="/page2.html">perdu ?</a>','<a href="page3.html">perdu ?</a>','<img src="http://www.perdu.com/img.png"/>','<img src="/img.png"/>','<img src="img.png"/>',]expected=['<a href="PREFIXhttp%3A%2F%2Fwww.perdu.com">perdu ?</a>','<a href="PREFIXhttp%3A%2F%2Fembedded.com%2Fpage1.html">perdu ?</a>','<a href="PREFIXhttp%3A%2F%2Fembedded.com%2Fpage2.html">perdu ?</a>','<a href="PREFIXhttp%3A%2F%2Fembedded.com%2Fpage3.html">perdu ?</a>','<img src="http://www.perdu.com/img.png"/>','<img src="http://embedded.com/img.png"/>','<img src="http://embedded.com/img.png"/>',]fororig_a,expected_ainzip(orig,expected):got=prefix_links(orig_a,'PREFIX','http://embedded.com/page1.html')self.assertEquals(got,expected_a)if__name__=='__main__':unittest_main()