[gnumeric] ODF: translate notes for fn-r.

[Morten Welinder <mortenw src gnome org>]

commit 214869f02583eae15075ac58603fd7710a9ac703
Author: Morten Welinder <terra gnome org>
Date:   Mon Jul 6 11:48:57 2009 -0400

    ODF: translate notes for fn-r.

 plugins/fn-r/ChangeLog   |    4 ++++
 plugins/fn-r/functions.c |    6 +++---
 plugins/fn-r/generate    |   11 +++++++++++
 3 files changed, 18 insertions(+), 3 deletions(-)
---
diff --git a/plugins/fn-r/ChangeLog b/plugins/fn-r/ChangeLog
index f99c3bf..3f7d46a 100644
--- a/plugins/fn-r/ChangeLog
+++ b/plugins/fn-r/ChangeLog
@@ -1,3 +1,7 @@
+2009-07-06  Morten Welinder  <terra gnome org>
+
+	* generate (odf_note): Handle odf notes.
+
 2009-06-21  Andreas J. Guelzow <aguelzow pyrshep ca>
 
 	* functions.c (help_r_dchisq): add some documentation item
diff --git a/plugins/fn-r/functions.c b/plugins/fn-r/functions.c
index ac44c03..ef91b32 100644
--- a/plugins/fn-r/functions.c
+++ b/plugins/fn-r/functions.c
@@ -489,7 +489,7 @@ static GnmFuncHelp const help_r_dchisq[] = {
 	{ GNM_FUNC_HELP_ARG, F_("df:the number of degrees of freedom of the distribution") },
 	{ GNM_FUNC_HELP_ARG, F_("give_log:if true, log of the result will be returned instead.  This is useful if the result would otherwise underflow to 0.  Defaults to false.") },
 	{ GNM_FUNC_HELP_DESCRIPTION, F_("This function returns the probability density function of the chi-square distribution.") },
-	{ GNM_FUNC_HELP_ODF, "A two argument invocation R.DCHISQ(@{x},@{df}) is exported to OpenFormula as CHISQDIST(@{x},@{df},FALSE())." },
+	{ GNM_FUNC_HELP_ODF, F_("A two argument invocation R.DCHISQ(@{x},@{df}) is exported to OpenFormula as CHISQDIST(@{x},@{df},FALSE()).") },
 	{ GNM_FUNC_HELP_SEEALSO, "R.PCHISQ,R.QCHISQ" },
 	{ GNM_FUNC_HELP_END }
 };
@@ -514,7 +514,7 @@ static GnmFuncHelp const help_r_pchisq[] = {
 	{ GNM_FUNC_HELP_ARG, F_("lower_tail:if true (the default), the lower tail of the distribution is considered.") },
 	{ GNM_FUNC_HELP_ARG, F_("log_p:if true, log of the probability is used.  This is useful if the probability would otherwise underflow to 0.  Defaults to false.") },
 	{ GNM_FUNC_HELP_DESCRIPTION, F_("This function returns the cumulative distribution function of the chi-square distribution.") },
-	{ GNM_FUNC_HELP_ODF, "A two argument invocation R.PCHISQ(@{x},@{df}) is exported to OpenFormula as CHISQDIST(@{x},@{df})." },
+	{ GNM_FUNC_HELP_ODF, F_("A two argument invocation R.PCHISQ(@{x},@{df}) is exported to OpenFormula as CHISQDIST(@{x},@{df}).") },
 	{ GNM_FUNC_HELP_SEEALSO, "R.DCHISQ,R.QCHISQ" },
 	{ GNM_FUNC_HELP_END }
 };
@@ -540,7 +540,7 @@ static GnmFuncHelp const help_r_qchisq[] = {
 	{ GNM_FUNC_HELP_ARG, F_("lower_tail:if true (the default), the lower tail of the distribution is considered.") },
 	{ GNM_FUNC_HELP_ARG, F_("log_p:if true, log of the probability is used.  This is useful if the probability would otherwise underflow to 0.  Defaults to false.") },
 	{ GNM_FUNC_HELP_DESCRIPTION, F_("This function returns the probability quantile function, i.e., the inverse of the cumulative distribution function, of the chi-square distribution.") },
-	{ GNM_FUNC_HELP_ODF, "A two argument invocation R.QCHISQ(@{p},@{df}) is exported to OpenFormula as CHISQINV(@{p},@{df})." },
+	{ GNM_FUNC_HELP_ODF, F_("A two argument invocation R.QCHISQ(@{p},@{df}) is exported to OpenFormula as CHISQINV(@{p},@{df}).") },
 	{ GNM_FUNC_HELP_SEEALSO, "R.DCHISQ,R.PCHISQ" },
 	{ GNM_FUNC_HELP_END }
 };
diff --git a/plugins/fn-r/generate b/plugins/fn-r/generate
index 4002e7d..181306e 100644
--- a/plugins/fn-r/generate
+++ b/plugins/fn-r/generate
@@ -144,6 +144,12 @@ my %argoverride = ();
 	"psuc";
 }
 
+my %odf_note =
+    ('qchisq' => 'A two argument invocation R.QCHISQ(@{p},@{df}) is exported to OpenFormula as CHISQINV(@{p},@{df}).',
+     'pchisq' => 'A two argument invocation R.PCHISQ(@{x},@{df}) is exported to OpenFormula as CHISQDIST(@{x},@{df}).',
+     'dchisq' => 'A two argument invocation R.DCHISQ(@{x},@{df}) is exported to OpenFormula as CHISQDIST(@{x},@{df},FALSE()).',
+    );
+
 my %type_getter =
     ('gnm_float' => 'value_get_as_float',
      'gboolean' => 'value_get_as_checked_bool',
@@ -272,6 +278,11 @@ sub distribution {
 	    " of the $distname distribution.";
     &emit ("\t{ GNM_FUNC_HELP_DESCRIPTION, F_(\"$what\") },\n");
 
+    my $odf = $odf_note{$func};
+    if ($odf) {
+	&emit ("\t{ GNM_FUNC_HELP_ODF, F_(\"$odf\") },\n");
+    }
+
     my $seealso = "";
     my $f1 = substr ($func, 1);
     my $F1 = uc ($f1);