[Maxima-commits] CVS: maxima/plotting paths.tcl,NONE,1.1 Makefile.am,1.5,1.6 header.tcl.in,1.1,1.2

[Vadim V. Z. <vv...@us...>]

Update of /cvsroot/maxima/maxima/plotting
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20540/plotting

Modified Files:
	Makefile.am header.tcl.in 
Added Files:
	paths.tcl 
Log Message:
Multi-lingual interface to xmaxima and omplotdata using
Tcl/Tk msgcat (message catalog) package.  Localized
messages are stored in msgs/<lang>.msg file.  There is
two such files - one for omplotdata (plotting/msgs) and
other for xmaxima (interfaces/xmaxima/msgs). At present
only Russian translation is provided. 


--- NEW FILE: paths.tcl ---
# Extract from Tkmaxima/Paths.tcl to load omplotdata messages

if { [info exists env(MAXIMA_DATADIR)] } {
    set maxima_datadir $env(MAXIMA_DATADIR)
} elseif { [info exists env(MAXIMA_PREFIX)] } {
    set maxima_datadir [file join $env(MAXIMA_PREFIX) share]
} else {
    set maxima_datadir $autoconf(datadir)
}

if {[file isdir $maxima_datadir]} {

    set maxima_omplotdata_msgs_dir \
        [file join $maxima_datadir $autoconf(package) $autoconf(version) msgs]

    if {[file isdir $maxima_omplotdata_msgs_dir]} {

	mcload $maxima_omplotdata_msgs_dir
    
    }

}




Index: Makefile.am
===================================================================
RCS file: /cvsroot/maxima/maxima/plotting/Makefile.am,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -d -r1.5 -r1.6
--- Makefile.am	29 Apr 2004 01:24:08 -0000	1.5
+++ Makefile.am	13 Oct 2004 12:08:58 -0000	1.6
@@ -1,11 +1,15 @@
 include $(top_srcdir)/common.mk
 
+SUBDIRS = msgs
+
 verpkglibexec_SCRIPTS = omplotdata mgnuplot
 
 EXTRA_DIST = header.tcl footer.tcl
 
 OMPLOTDATASOURCES = \
 	header.tcl \
+	../interfaces/xmaxima/autoconf-variables.tcl \
+	paths.tcl \
 	../interfaces/xmaxima/Tkmaxima/Constants.tcl \
 	../interfaces/xmaxima/Tkmaxima/Macros.tcl \
 	../interfaces/xmaxima/Tkmaxima/Plotting.tcl \

Index: header.tcl.in
===================================================================
RCS file: /cvsroot/maxima/maxima/plotting/header.tcl.in,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- header.tcl.in	21 Mar 2004 18:45:21 -0000	1.1
+++ header.tcl.in	13 Oct 2004 12:08:58 -0000	1.2
@@ -21,6 +21,8 @@
   set buttonfont [font create -family Helvetica -size $fontSize]
 }
 
+package require msgcat
+namespace import msgcat::*
 
 ###