R-alpha: R 0.50.a1 bug in do_title()

[Kurt Hornik]

There is an empty `else' clause in the code for do_title() in
src/main/plot.c (which results in subtitles appearing twice, or some
other strange thing ...).

Below is a `patch'.

-k

*** src/main/plot.c.orig	Fri Aug  1 10:17:41 1997
--- src/main/plot.c	Fri Aug  1 10:18:05 1997
*************** SEXP do_title(SEXP call, SEXP op, SEXP a
*** 1224,1231 ****
  
  	if (CAR(args) != R_NilValue && LENGTH(CAR(args)) > 0)
  		sub = CAR(args);
- 	else
- 		
  	args = CDR(args);
  
  	if (CAR(args) != R_NilValue && LENGTH(CAR(args)) > 0)
--- 1224,1229 ----
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-devel-request@stat.math.ethz.ch
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-