[Stacomir-commits] r252 - pkg/stacomir/R

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Thu Jan 26 22:42:10 CET 2017


Author: timothee_besse
Date: 2017-01-26 22:42:08 +0100 (Thu, 26 Jan 2017)
New Revision: 252

Modified:
   pkg/stacomir/R/BilanAgedemer.r
   pkg/stacomir/R/BilanArgentee.r
   pkg/stacomir/R/BilanEspeces.r
   pkg/stacomir/R/BilanFonctionnementDC.r
   pkg/stacomir/R/BilanFonctionnementDF.r
   pkg/stacomir/R/Bilan_stades_pigm.r
   pkg/stacomir/R/interface_BilanAgedemer.r
   pkg/stacomir/R/interface_BilanArgentee.r
   pkg/stacomir/R/interface_BilanConditionEnv.r
   pkg/stacomir/R/interface_BilanFonctionnementDC.r
   pkg/stacomir/R/interface_BilanFonctionnementDF.r
   pkg/stacomir/R/interface_Bilan_carlot.r
   pkg/stacomir/R/interface_Bilan_taille.r
Log:
Bulk replace msg

Modified: pkg/stacomir/R/BilanAgedemer.r
===================================================================
--- pkg/stacomir/R/BilanAgedemer.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/BilanAgedemer.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -187,7 +187,7 @@
 			bilan_adm at par<-choice_c(bilan_adm at par,par,silent=silent)
 			bilan_adm at horodatedebut<-choice_c(object=bilan_adm at horodatedebut,
 					nomassign="bilan_adm_date_debut",
-					funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+					funoutlabel=gettext("Beginning date has been chosen\n"),
 					horodate=horodatedebut, 
 					silent=silent)
 			bilan_adm at horodatefin<-choice_c(bilan_adm at horodatefin,

Modified: pkg/stacomir/R/BilanArgentee.r
===================================================================
--- pkg/stacomir/R/BilanArgentee.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/BilanArgentee.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -176,7 +176,7 @@
 			bilanArg at par<-choice_c(bilanArg at par,par,silent=silent)
 			bilanArg at horodatedebut<-choice_c(object=bilanArg at horodatedebut,
 					nomassign="bilanArg_date_debut",
-					funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+					funoutlabel=gettext("Beginning date has been chosen\n"),
 					horodate=horodatedebut, 
 					silent=silent)
 			bilanArg at horodatefin<-choice_c(bilanArg at horodatefin,

Modified: pkg/stacomir/R/BilanEspeces.r
===================================================================
--- pkg/stacomir/R/BilanEspeces.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/BilanEspeces.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -267,11 +267,11 @@
 	choice(bilanEspeces at horodate,
 			label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.3),
 			nomassign="bilanEspeces_date_debut",
-			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+			funoutlabel=gettext("Beginning date has been chosen\n"),
 			decal=-2,
 			affichecal=FALSE)
 	choice(bilanEspeces at horodate,
-			label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.4),
+			label=gettext("End of timestamp"),
 			nomassign="bilanEspeces_date_fin",
 			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.6),
 			decal=-1,

Modified: pkg/stacomir/R/BilanFonctionnementDC.r
===================================================================
--- pkg/stacomir/R/BilanFonctionnementDC.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/BilanFonctionnementDC.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -118,7 +118,7 @@
 			# assigns the parameter (horodatedebut) of the method to the object using choice_c method for RefDC
 			bilanFonctionnementDC at horodatedebut<-choice_c(object=bilanFonctionnementDC at horodatedebut,
 					nomassign="bilanFonctionnementDC_date_debut",
-					funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+					funoutlabel=gettext("Beginning date has been chosen\n"),
 					horodate=horodatedebut, silent=silent)
 			bilanFonctionnementDC at horodatefin<-choice_c(bilanFonctionnementDC at horodatefin,
 					nomassign="bilanFonctionnementDC_date_fin",

Modified: pkg/stacomir/R/BilanFonctionnementDF.r
===================================================================
--- pkg/stacomir/R/BilanFonctionnementDF.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/BilanFonctionnementDF.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -132,7 +132,7 @@
 			# assigns the parameter (horodatedebut) of the method to the object using choice_c method for RefDC
 			bilanFonctionnementDF at horodatedebut<-choice_c(object=bilanFonctionnementDF at horodatedebut,
 					nomassign="bilanFonctionnementDF_date_debut",
-					funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+					funoutlabel=gettext("Beginning date has been chosen\n"),
 					horodate=horodatedebut, silent=silent)
 			bilanFonctionnementDF at horodatefin<-choice_c(bilanFonctionnementDF at horodatefin,
 					nomassign="bilanFonctionnementDF_date_fin",

Modified: pkg/stacomir/R/Bilan_stades_pigm.r
===================================================================
--- pkg/stacomir/R/Bilan_stades_pigm.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/Bilan_stades_pigm.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -120,7 +120,7 @@
 				tablestades=tablestades/effectifs
 				object at tablestades<-tablestades
 				object at dates<-dates
-			} else funout("pas de donnees de stades pigmentaires",arret=TRUE)
+			} else funout(gettext("No data for pigmentation stages"),arret=TRUE)
 			if (object at options@checked[2]){
 				# chargement du tableau des temperatures
 				requete at datedebut=as.POSIXlt(strptime(object at datedebut,format="%Y-%m-%d")-5184000) # 60 jours avant
@@ -490,7 +490,7 @@
 	if (nrow(bilan_stades_pigm at datatempsal)>0){
 		bilan_stades_pigm at phi<-funphi(parm=bilan_stades_pigm at Vparm$pigmentation,bilan_stades_pigm at datatempsal)
 	}
-	funout("Chargement des donnees dans la base ")
+	funout(gettext("Loading data from database"))
 	dates<-bilan_stades_pigm at dates
 	bilan_stades_pigm at labelgraphstades<-paste(gettext("Pigmentation stages"),
 			if(strftime(as.POSIXlt(dates[1]),"%Y")==
@@ -812,7 +812,7 @@
 			bilan_stades_pigm at labelgraphstades<-gsub("\n","",svalue(titre2))
 			bilan_stades_pigm at labelretro<-gsub("\n","",svalue(titre4))
 			assign("bilan_stades_pigm",bilan_stades_pigm,envir=envir_stacomi)		
-			funout("modification du titre \n")
+			funout(gettext("title edit \n"))
 		}
 		dispose(wintitle)
 	}
@@ -841,7 +841,7 @@
 {  
 	bilan_stades_pigm=new("Bilan_stades_pigm")
 	assign("bilan_stades_pigm",bilan_stades_pigm,envir = envir_stacomi)
-	funout(gettext(get("msg",envir=envir_stacomi)$Bilan_stades_pigm.2))
+	funout(gettext("Summary of pigmentation stages\n"))
 	bilan_stades_pigm at dc=charge(bilan_stades_pigm at dc)
 	bilan_stades_pigm at stationMesure=charge(bilan_stades_pigm at stationMesure)
 	bilan_stades_pigm at lmax<-charge(bilan_stades_pigm at lmax,vecteur=c("0.6","0.8","1","1.2"),label="choice de la largeur des distributions",selected=as.integer(2))
@@ -863,10 +863,10 @@
 	choice(bilan_stades_pigm at stationMesure,title="choice de la temperature")
 	choice(bilan_stades_pigm at horodate,label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.3),
 			nomassign="bilan_stades_pigm_date_debut",
-			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+			funoutlabel=gettext("Beginning date has been chosen\n"),
 			decal=-2,
 			affichecal=FALSE)
-	choice(bilan_stades_pigm at horodate,label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.4),
+	choice(bilan_stades_pigm at horodate,label=gettext("End of timestamp"),
 			nomassign="bilan_stades_pigm_date_fin",
 			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.6),
 			decal=-1,

Modified: pkg/stacomir/R/interface_BilanAgedemer.r
===================================================================
--- pkg/stacomir/R/interface_BilanAgedemer.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/interface_BilanAgedemer.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -26,9 +26,9 @@
 	
 	choice(bilan_adm at horodatedebut,label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.3),
 			nomassign="bilan_adm_date_debut",
-			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+			funoutlabel=gettext("Beginning date has been chosen\n"),
 			decal=-2)
-	choice(bilan_adm at horodatefin,label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.4),
+	choice(bilan_adm at horodatefin,label=gettext("End of timestamp"),
 			nomassign="bilan_adm_date_fin",
 			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.6),
 			decal=-1)	

Modified: pkg/stacomir/R/interface_BilanArgentee.r
===================================================================
--- pkg/stacomir/R/interface_BilanArgentee.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/interface_BilanArgentee.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -26,9 +26,9 @@
 	
 	choice(bilan_arg at horodatedebut,label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.3),
 			nomassign="bilan_arg_date_debut",
-			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+			funoutlabel=gettext("Beginning date has been chosen\n"),
 			decal=-2)
-	choice(bilan_arg at horodatefin,label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.4),
+	choice(bilan_arg at horodatefin,label=gettext("End of timestamp"),
 			nomassign="bilan_arg_date_fin",
 			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.6),
 			decal=-1)	

Modified: pkg/stacomir/R/interface_BilanConditionEnv.r
===================================================================
--- pkg/stacomir/R/interface_BilanConditionEnv.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/interface_BilanConditionEnv.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -18,11 +18,11 @@
     # date de debut et de fin
     choice(bilanConditionEnv at horodate,label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.3),
 			nomassign="bilanConditionEnv_date_debut",
-			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+			funoutlabel=gettext("Beginning date has been chosen\n"),
 			decal=-2,
 			affichecal=FALSE)
     choice(bilanConditionEnv at horodate,
-			label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.4),
+			label=gettext("End of timestamp"),
 			nomassign="bilanConditionEnv_date_fin",
 			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.6),
 			decal=-1,

Modified: pkg/stacomir/R/interface_BilanFonctionnementDC.r
===================================================================
--- pkg/stacomir/R/interface_BilanFonctionnementDC.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/interface_BilanFonctionnementDC.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -21,10 +21,10 @@
     choice(bilanFonctionnementDC at horodatedebut,
 			label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.3),
 			nomassign="bilanFonctionnementDC_date_debut",
-			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+			funoutlabel=gettext("Beginning date has been chosen\n"),
 			decal=-2)
     choice(bilanFonctionnementDC at horodatefin,
-			label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.4),
+			label=gettext("End of timestamp"),
 			nomassign="bilanFonctionnementDC_date_fin",
 			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.6),
 			decal=-1)

Modified: pkg/stacomir/R/interface_BilanFonctionnementDF.r
===================================================================
--- pkg/stacomir/R/interface_BilanFonctionnementDF.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/interface_BilanFonctionnementDF.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -17,10 +17,10 @@
 	choice(bilanFonctionnementDF at horodatedebut,
 			label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.3),
 			nomassign="bilanFonctionnementDF_date_debut",
-			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+			funoutlabel=gettext("Beginning date has been chosen\n"),
 			decal=-2)
 	choice(bilanFonctionnementDF at horodatefin,
-			label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.4),
+			label=gettext("End of timestamp"),
 			nomassign="bilanFonctionnementDF_date_fin",
 			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.6),
 			decal=-1)

Modified: pkg/stacomir/R/interface_Bilan_carlot.r
===================================================================
--- pkg/stacomir/R/interface_Bilan_carlot.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/interface_Bilan_carlot.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -26,9 +26,9 @@
 	
 	choice(bilan_carlot at horodatedebut,label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.3),
 			nomassign="bilan_carlot_date_debut",
-			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+			funoutlabel=gettext("Beginning date has been chosen\n"),
 			decal=-2)
-	choice(bilan_carlot at horodatefin,label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.4),
+	choice(bilan_carlot at horodatefin,label=gettext("End of timestamp"),
 			nomassign="bilan_carlot_date_fin",
 			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.6),
 			decal=-1)

Modified: pkg/stacomir/R/interface_Bilan_taille.r
===================================================================
--- pkg/stacomir/R/interface_Bilan_taille.r	2017-01-26 21:27:48 UTC (rev 251)
+++ pkg/stacomir/R/interface_Bilan_taille.r	2017-01-26 21:42:08 UTC (rev 252)
@@ -25,11 +25,11 @@
 	choice(bilan_taille at horodate,
 			label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.3),
 			nomassign="bilan_taille_date_debut",
-			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.5),
+			funoutlabel=gettext("Beginning date has been chosen\n"),
 			decal=-2,
 			affichecal=FALSE)
 	choice(bilan_taille at horodate,
-			label=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.4),
+			label=gettext("End of timestamp"),
 			nomassign="bilan_taille_date_fin",
 			funoutlabel=gettext(get("msg",envir=envir_stacomi)$interface_Bilan_lot.6),
 			decal=-1,



More information about the Stacomir-commits mailing list