[rkward-cvs] SF.net SVN: rkward-code:[4967] trunk/rkward/packages/rkwarddev

[m-eik at users.sf.net]

Revision: 4967
          http://sourceforge.net/p/rkward/code/4967
Author:   m-eik
Date:     2014-10-27 21:00:57 +0000 (Mon, 27 Oct 2014)
Log Message:
-----------
rkwarddev: now adds "po_id" to generated pluginmaps

Modified Paths:
--------------
    trunk/rkward/packages/rkwarddev/ChangeLog
    trunk/rkward/packages/rkwarddev/R/rk.XML.pluginmap.R

Modified: trunk/rkward/packages/rkwarddev/ChangeLog
===================================================================
--- trunk/rkward/packages/rkwarddev/ChangeLog	2014-10-27 18:43:37 UTC (rev 4966)
+++ trunk/rkward/packages/rkwarddev/ChangeLog	2014-10-27 21:00:57 UTC (rev 4967)
@@ -1,6 +1,6 @@
 ChangeLog for package rkwarddev
 
-changes in version 0.06-6 (2014-10-26)
+changes in version 0.06-6 (2014-10-27)
 fixed:
   - rk.XML.optionset() does now allow to re-use objects defined in the same
     function call (i.e., refer to optioncolumns in the logic section)
@@ -10,6 +10,7 @@
   - all "help" values can now be a list of character strings or XiMpLe nodes,
     to have more control over the markup
   - added "property" and "duplicates" arguments to rk.XML.valueslot() and rk.XML.varslot().
+  - rk.XML.pluginmap() now adds a "po_id" attribute to pluginmaps, necessary for i18n
 
 changes in version 0.06-5 (2014-10-19)
 fixed:

Modified: trunk/rkward/packages/rkwarddev/R/rk.XML.pluginmap.R
===================================================================
--- trunk/rkward/packages/rkwarddev/R/rk.XML.pluginmap.R	2014-10-27 18:43:37 UTC (rev 4966)
+++ trunk/rkward/packages/rkwarddev/R/rk.XML.pluginmap.R	2014-10-27 21:00:57 UTC (rev 4967)
@@ -309,7 +309,7 @@
     stop(simpleError("'priority' must be one of 'hidden', 'low', 'medium' or 'high'!"))
   } else {}
 
-  all.attrs <- list(base_prefix="", namespace=namespace, id=doc.ID.name, priority=priority)
+  all.attrs <- list(base_prefix="", namespace=namespace, id=doc.ID.name, po_id=doc.ID.name, priority=priority)
   # check for possible i18n
   if(!is.null(lang)){
     all.attrs[["lang"]] <- all.attrs[["xml:lang"]] <- lang