Show
Ignore:
Timestamp:
05/13/06 11:31:18 (3 years ago)
Author:
miyoshi
Message:

Sync up with Emacs CVS HEAD.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/lispintro/emacs-lisp-intro.texi

    r4037 r4079  
    1710117101Convert @kbd{@key{CTL}-h} into @key{DEL} and @key{DEL} 
    1710217102into @kbd{@key{CTL}-h}.@* 
    17103 (Some olders keyboards needed this, although I have not seen the 
     17103(Some older keyboards needed this, although I have not seen the 
    1710417104problem recently.) 
    1710517105 
     
    1949019490@cindex Horizontal axis printing 
    1949119491 
    19492 X axis labels are much like Y axis labels, except that the tics are on a 
     19492X axis labels are much like Y axis labels, except that the ticks are on a 
    1949319493line above the numbers.  Labels should look like this: 
    1949419494 
     
    1950219502The first tic is under the first column of the graph and is preceded by 
    1950319503several blank spaces.  These spaces provide room in rows above for the Y 
    19504 axis labels.  The second, third, fourth, and subsequent tics are all 
     19504axis labels.  The second, third, fourth, and subsequent ticks are all 
    1950519505spaced equally, according to the value of @code{X-axis-label-spacing}. 
    1950619506 
     
    1963019630 
    1963119631We also need to determine the length of the horizontal axis, which is 
    19632 the length of the numbers list, and the number of tics in the horizontal 
     19632the length of the numbers list, and the number of ticks in the horizontal 
    1963319633axis: 
    1963419634 
     
    1964719647 
    1964819648@group 
    19649 ;; number-of-X-tic
     19649;; number-of-X-tick
    1965019650(if (zerop (% (X-length tic-width))) 
    1965119651    (/ (X-length tic-width)) 
     
    1966219662(defun print-X-axis-tic-line 
    1966319663  (number-of-X-tics X-axis-leading-spaces X-axis-tic-element) 
    19664   "Print tics for X axis." 
     19664  "Print ticks for X axis." 
    1966519665    (insert X-axis-leading-spaces) 
    1966619666    (insert X-axis-tic-symbol)  ; @r{Under first column.} 
     
    1967719677@end group 
    1967819678@group 
    19679     ;; @r{Insert remaining tics.} 
     19679    ;; @r{Insert remaining ticks.} 
    1968019680    (while (> number-of-X-tics 1) 
    1968119681      (insert X-axis-tic-element) 
     
    2090620906(defun print-X-axis-tic-line 
    2090720907  (number-of-X-tics X-axis-leading-spaces X-axis-tic-element) 
    20908   "Print tics for X axis." 
     20908  "Print ticks for X axis." 
    2090920909    (insert X-axis-leading-spaces) 
    2091020910    (insert X-axis-tic-symbol)  ; @r{Under first column.} 
     
    2092120921@end group 
    2092220922@group 
    20923     ;; @r{Insert remaining tics.} 
     20923    ;; @r{Insert remaining ticks.} 
    2092420924    (while (> number-of-X-tics 1) 
    2092520925      (insert X-axis-tic-element)