Mercurial > hg > octave-nkf
diff src/defaults.cc @ 3141:292ff0bf484b
[project @ 1998-02-03 08:11:07 by jwe]
author | jwe |
---|---|
date | Tue, 03 Feb 1998 08:11:22 +0000 |
parents | 443851377f3f |
children | 390d5e396682 |
line wrap: on
line diff
--- a/src/defaults.cc +++ b/src/defaults.cc @@ -53,8 +53,9 @@ string Voctave_home; string Vbin_dir; -string Vlib_dir; string Vinfo_dir; +string Vdata_dir; +string Vlibexec_dir; string Varch_lib_dir; string Vlocal_arch_lib_dir; string Vfcn_file_dir; @@ -113,6 +114,18 @@ } static void +set_default_data_dir (void) +{ + Vdata_dir = subst_octave_home (OCTAVE_DATADIR); +} + +static void +set_default_libexec_dir (void) +{ + Vlibexec_dir = subst_octave_home (OCTAVE_LIBEXECDIR); +} + +static void set_default_arch_lib_dir (void) { Varch_lib_dir = subst_octave_home (OCTAVE_ARCHLIBDIR); @@ -137,12 +150,6 @@ } static void -set_default_lib_dir (void) -{ - Vlib_dir = subst_octave_home (OCTAVE_LIBDIR); -} - -static void set_default_exec_path (void) { string octave_exec_path = octave_env::getenv ("OCTAVE_EXEC_PATH"); @@ -192,10 +199,7 @@ string oct_info_prog = octave_env::getenv ("OCTAVE_INFO_PROGRAM"); if (oct_info_prog.empty ()) - { - Vinfo_prog = Varch_lib_dir; - Vinfo_prog.append ("/info"); - } + Vinfo_prog = "info"; else Vinfo_prog = string (oct_info_prog); } @@ -258,6 +262,10 @@ set_default_info_dir (); + set_default_data_dir (); + + set_default_libexec_dir (); + set_default_arch_lib_dir (); set_default_local_arch_lib_dir (); @@ -266,8 +274,6 @@ set_default_bin_dir (); - set_default_lib_dir (); - set_default_exec_path (); set_default_path (); @@ -317,9 +323,8 @@ { Vexec_path = s; - string std_path = Vlocal_arch_lib_dir; - std_path.append (SEPCHAR_STR); - std_path.append (Varch_lib_dir); + string std_path = Vlocal_arch_lib_dir + string (SEPCHAR_STR) + + Varch_lib_dir + string (SEPCHAR_STR) + Vbin_dir; string path; @@ -405,10 +410,10 @@ DEFVAR (IMAGEPATH, OCTAVE_IMAGEPATH, 0, imagepath, "colon separated list of directories to search for image files"); - DEFCONST (OCTAVE_HOME, Voctave_home, 0, 0, + DEFCONST (OCTAVE_HOME, Voctave_home, "top-level Octave installation directory"); - DEFCONSTX ("OCTAVE_VERSION", SBV_OCTAVE_VERSION, OCTAVE_VERSION, 0, 0, + DEFCONSTX ("OCTAVE_VERSION", SBV_OCTAVE_VERSION, OCTAVE_VERSION, "Octave version"); }