comparison lispref/modes.texi @ 59963:2bc848857427

(Example Major Modes): Fix typos.
author Lute Kamstra <lute@gnu.org>
date Sun, 06 Feb 2005 15:58:46 +0000
parents 1f6a9cf44999
children aac0a33f5772
comparison
equal deleted inserted replaced
59962:b728ee27ee08 59963:2bc848857427
377 (define-derived-mode text-mode nil "Text" 377 (define-derived-mode text-mode nil "Text"
378 "Major mode for editing text written for humans to read. 378 "Major mode for editing text written for humans to read.
379 In this mode, paragraphs are delimited only by blank or white lines. 379 In this mode, paragraphs are delimited only by blank or white lines.
380 You can thus get the full benefit of adaptive filling 380 You can thus get the full benefit of adaptive filling
381 (see the variable `adaptive-fill-mode'). 381 (see the variable `adaptive-fill-mode').
382 \\{text-mode-map} 382 \\@{text-mode-map@}
383 Turning on Text mode runs the normal hook `text-mode-hook'." 383 Turning on Text mode runs the normal hook `text-mode-hook'."
384 @end group 384 @end group
385 @group 385 @group
386 (make-local-variable 'text-mode-variant) 386 (make-local-variable 'text-mode-variant)
387 (setq text-mode-variant t) 387 (setq text-mode-variant t)
479 (modify-syntax-entry ?\; "< " table) 479 (modify-syntax-entry ?\; "< " table)
480 (modify-syntax-entry ?` "' " table) 480 (modify-syntax-entry ?` "' " table)
481 (modify-syntax-entry ?' "' " table) 481 (modify-syntax-entry ?' "' " table)
482 (modify-syntax-entry ?, "' " table) 482 (modify-syntax-entry ?, "' " table)
483 @end group 483 @end group
484 @end group
485 @group 484 @group
486 ;; @r{@dots{}likewise for many other characters@dots{}} 485 ;; @r{@dots{}likewise for many other characters@dots{}}
487 (modify-syntax-entry ?\( "() " table) 486 (modify-syntax-entry ?\( "() " table)
488 (modify-syntax-entry ?\) ")( " table) 487 (modify-syntax-entry ?\) ")( " table)
489 (modify-syntax-entry ?\[ "(] " table) 488 (modify-syntax-entry ?\[ "(] " table)
490 (modify-syntax-entry ?\] ")[ " table)) 489 (modify-syntax-entry ?\] ")[ " table))
491 table)) 490 table))
492 @end group 491 @end group
492 @group
493 ;; @r{Create an abbrev table for lisp-mode.} 493 ;; @r{Create an abbrev table for lisp-mode.}
494 (define-abbrev-table 'lisp-mode-abbrev-table ()) 494 (define-abbrev-table 'lisp-mode-abbrev-table ())
495 @end group 495 @end group
496 @end smallexample 496 @end smallexample
497 497