Mercurial > hg > octave-nkf

comparison src/pager.cc @ 4324:dcdca99fe2f0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2003-02-15 03:18:43 by jwe]
author jwe
date Sat, 15 Feb 2003 03:18:44 +0000
parents ccfdb55c8156
children 0f9108f298ab
comparison
equal deleted inserted replaced
4323:0990c9b77109 4324:dcdca99fe2f0
499 if (argc == 2) 499 if (argc == 2)
500 { 500 {
501 std::string arg = argv[1]; 501 std::string arg = argv[1];
502 502
503 if (arg == "on") 503 if (arg == "on")
504 bind_builtin_variable ("page_screen_output", 1.0); 504 bind_builtin_variable ("page_screen_output", true);
505 else if (arg == "off") 505 else if (arg == "off")
506 bind_builtin_variable ("page_screen_output", 0.0); 506 bind_builtin_variable ("page_screen_output", false);
507 else 507 else
508 error ("more: unrecognized argument `%s'", arg.c_str ()); 508 error ("more: unrecognized argument `%s'", arg.c_str ());
509 }
510 else if (argc == 1)
511 {
512 octave_value tmp = builtin_any_variable ("page_screen_output");
513
514 if (! error_state)
515 bind_builtin_variable ("page_screen_output", ! tmp.is_true ());
509 } 516 }
510 else 517 else
511 print_usage ("more"); 518 print_usage ("more");
512 519
513 return retval; 520 return retval;