Scribble soft-hyphen support for Latex rendering; ?-' in
scribble/base'
original commit: 21d324a1696daa84954959696052163fa5488021
This commit is contained in:
parent
6c51ec9a9c
commit
ab1fe071d1
|
@ -262,11 +262,12 @@
|
||||||
|
|
||||||
;; ----------------------------------------
|
;; ----------------------------------------
|
||||||
|
|
||||||
(provide ._ .__ ~ -~-)
|
(provide ._ .__ ~ ?- -~-)
|
||||||
|
|
||||||
(define ._ (make-element (make-style "Sendabbrev" null) "."))
|
(define ._ (make-element (make-style "Sendabbrev" null) "."))
|
||||||
(define .__ (make-element (make-style "Sendsentence" null) "."))
|
(define .__ (make-element (make-style "Sendsentence" null) "."))
|
||||||
(define ~ "\uA0")
|
(define ~ "\uA0")
|
||||||
|
(define ?- "\uAD")
|
||||||
(define -~- "\u2011")
|
(define -~- "\u2011")
|
||||||
|
|
||||||
;; ----------------------------------------
|
;; ----------------------------------------
|
||||||
|
|
|
@ -626,6 +626,7 @@
|
||||||
c)]
|
c)]
|
||||||
[(#\# #\% #\& #\$) (format "\\~a" c)]
|
[(#\# #\% #\& #\$) (format "\\~a" c)]
|
||||||
[(#\uA0) "~"] ; non-breaking space
|
[(#\uA0) "~"] ; non-breaking space
|
||||||
|
[(#\uAD) "\\-"] ; soft hyphen; unfortunately, also disables auto-hyphen
|
||||||
[(#\uDF) "{\\ss}"]
|
[(#\uDF) "{\\ss}"]
|
||||||
[else
|
[else
|
||||||
(if ((char->integer c) . > . 127)
|
(if ((char->integer c) . > . 127)
|
||||||
|
|
|
@ -367,6 +367,12 @@ which is equivalent to @racket['nbsp] as an element.}
|
||||||
A string containing the non-breaking hyphen character.}
|
A string containing the non-breaking hyphen character.}
|
||||||
|
|
||||||
|
|
||||||
|
@defthing[?- string?]{
|
||||||
|
|
||||||
|
A string containing the soft-hyphen character (i.e., a suggestion of
|
||||||
|
where to hyphenate a word to break it across lines when rendering).}
|
||||||
|
|
||||||
|
|
||||||
@defthing[._ element?]{
|
@defthing[._ element?]{
|
||||||
|
|
||||||
Generates a period that ends an abbreviation in the middle of a
|
Generates a period that ends an abbreviation in the middle of a
|
||||||
|
|
Loading…
Reference in New Issue
Block a user