Hi from Beautiful Brittany,
I played with "zryip theSlug's" code for all of
30 seconds, replace ncal command by "cal 2010",
corrected the line ending errors, corrected the
month of August, and it all works fine for me.
I'm on 10.5.8.
Merci Monsieur "zryip theSlug"
Francis
on mouseUp
local tTheCal, tTheMonth, tTheFrenchMonth, tTheDay, tTheFrenchDay
put
"January
,February
,March
,April,May,June,July,August,September,October,November,December"
into tTheMonth
put
"Janvier
,Février
,Mars
,Avril,Mai,Juin,Juillet,Août,Septembre,Octobre,Novembre,Décembre"
into tTheFrenchMonth
put "Mo,Tu,We,Th,Fr,Sa,Su" into tTheDay
put "Lu,Ma,Me,Je,Ve,Sa,Di" into tTheFrenchDay
put shell("cal 2010") into tTheCal
-- Translate month
repeat with x = 1 to number of items in tTheMonth
replace (item x of tTheMonth) with (item x of tTheFrenchMonth)
in tTheCal
end repeat
-- Translate day
repeat with x = 1 to number of items in tTheDay
replace (item x of tTheDay) with (item x of tTheFrenchDay) in
tTheCal
end repeat
put tTheCal into fld "MyCal"
end mouseUp
_______________________________________________
use-revolution mailing list
use-revolution@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
