added docs for the latex keybindings

svn: r14121
This commit is contained in:
Robby Findler 2009-03-16 11:44:09 +00:00
parent 87fcebba64
commit 75a80ff7a8

View File

@ -1,10 +1,15 @@
#lang scribble/doc #lang scribble/doc
@(require "common.ss" @(require "common.ss"
scribble/struct
scribble/bnf scribble/bnf
scheme/list
mrlib/tex-table
(for-label scheme/gui/base)) (for-label scheme/gui/base))
@(define (keybinding key . desc) @(define (keybinding key . desc)
(apply item @index[(list (format "~a keybinding" key)) key] " : " desc)) (let* ([keys (if (string? key) (list key) key)]
[key-str (apply string-append (add-between keys " "))])
(apply item @index[(map (lambda (x) (format "~a keybinding" x)) keys) key-str] " : " desc)))
@(define-syntax-rule (def-mod-beg id) @(define-syntax-rule (def-mod-beg id)
(begin (begin
@ -166,6 +171,25 @@ as the @tech{definitions window} plus a few more:
expression history down to the prompt} expression history down to the prompt}
] ]
@section{LaTeX and TeX inspired keybindings}
@itemize[
@keybinding['("C-\\" "M-\\")]{traces backwards from the insertion
point, looking for a backslash followed by a @index["LaTeX"]{LaTeX} macro name; if one is
found, it replaces the backslash and the macro's name with the keybinding.
These are the currently supported macro names and the keys they map into:
@(make-table
'()
(map (lambda (line)
(let ([macro (list-ref line 0)]
[char (list-ref line 1)])
(list (make-flow (list (make-paragraph (list (index (format "\\~a keyboard shortcut" macro))
(tt (format "\\~a" macro))))))
(make-flow (list (make-paragraph (list char)))))))
tex-shortcut-table))
}
]
@section[#:tag "defining-shortcuts"]{Defining Custom Shortcuts} @section[#:tag "defining-shortcuts"]{Defining Custom Shortcuts}
The @onscreen{Add User-defined Keybindings...} menu item in the The @onscreen{Add User-defined Keybindings...} menu item in the