diff src/variables.cc @ 2097:19ba1a7dcfbb

[project @ 1996-04-28 10:40:15 by jwe]
author jwe
date Sun, 28 Apr 1996 10:42:14 +0000
parents 36903d507b0e
children d5af81681fda
line wrap: on
line diff
--- a/src/variables.cc
+++ b/src/variables.cc
@@ -353,23 +353,6 @@
 }
 
 string
-default_pager (void)
-{
-  string pager_binary;
-
-  char *pgr = getenv ("PAGER");
-
-  if (pgr)
-    pager_binary = string (pgr);
-#ifdef DEFAULT_PAGER
-  else
-    pager_binary = string (DEFAULT_PAGER);
-#endif
-
-  return pager_binary;
-}
-
-string
 maybe_add_default_load_path (const string& pathstring)
 {
   string std_path = subst_octave_home (OCTAVE_FCNFILEPATH);
@@ -1614,9 +1597,6 @@
   DEFCONSTX ("OCTAVE_VERSION", SBV_OCTAVE_VERSION, OCTAVE_VERSION, 0, 0,
     "Octave version");
 
-  DEFVAR (PAGER, default_pager (), 0, sv_pager_binary,
-    "path to pager binary");
-
   DEFVAR (PS1, "\\s:\\#> ", 0, sv_ps1,
     "primary prompt string");
 
@@ -1748,9 +1728,6 @@
   DEFVAR (output_precision, 5.0, 0, set_output_precision,
     "number of significant figures to display for numeric output");
 
-  DEFVAR (page_screen_output, 1.0, 0, page_screen_output,
-    "if possible, send output intended for the screen through the pager");
-
   DEFCONST (pi, 4.0 * atan (1.0), 0, 0,
     "ratio of the circumference of a circle to its diameter");
 
@@ -1871,6 +1848,7 @@
   install_builtin_variables_7 ();
   install_builtin_variables_8 ();
 
+  symbols_of_pager ();
   symbols_of_syscalls ();
 }