Re: [Texmacs-dev] Proposal for consens: Quotation mark styles

[David Allouche]

On Fri, Nov 14, 2003 at 06:21:41PM +0100, Norbert Nemec wrote:
> Am Freitag, 14. November 2003 17:02 schrieb Joris van der Hoeven:
> > > That's a great idea: make ["] insert a pair of automatic quotes and place
> > > the cursor in between.
> >
> > OK; this has been done for Dutch, English, French, German and Swiss.
> 
> Really? Have you done that "automatic quote" configuration stuff already? I 
> thought, the whole thing would become a long term thing somewhere on a long 
> ToDo list...
> 
> > > > > I guess, most German speakers would prefer to type ["] even if they
> > > > > want to see swiss quotes.
> > > >
> > > > Is that so? Germans: please give your opinion!
> > >
> > > I am a German user myself. I guess, only experts would even think about
> > > swiss codes. There might be some surprise when typing ["] produces a pair
> > > of swiss codes, but everybody should understand intuitively and be happy
> > > with it.
> >
> > Should one write >> blah << or >>blah<<?
> 
> No spaces.
> 
> > In French, one should write << blah >>.
> 
> Really? Sure about it? Seems strange to me. Well, French typesetting always 
> seems to be a bit spacier than other languages. Just thinking of that "two 
> spaces after '.'"-typewriter-rule...

Positively sure about it. I even wrote a plugin which actually does the
spacing the right way (TeXmacs native support is slightly wrong). The
interesting part reads:


(define (french-punctuation-initialize)
  (define (make-french-right-punctuation str)
    (insert-object `(concat (hspace "1spc") ,str)))
  (define (make-french-left-punctuation str)
    (insert-object `(concat ,str (hspace "1spc"))))
  (define (make-french-near-punctuation str)
    (insert-object `(concat (space "0.25fn") ,str)))
  
  (kbd-map in-french?
    (";" (make-french-near-punctuation ";"))
    ("?" (make-french-near-punctuation "?"))
    ("!" (make-french-near-punctuation "!"))
    (":" (make-french-right-punctuation ":"))
    ("< *" (make-french-left-punctuation "In"))
    ("> *" (make-french-right-punctuation ")
    ("< <" (make-french-left-punctuation ""))
        ("> >" (make-french-right-punctuation ""))
    ("e t c ." (insert-object '(abbr "etc.")))))


It is hacky and confusing to use and I am not sure its still work now
that internals have seen so much reorganization, but that gives the
idea.

Some punctuation have a extensible/shrinkable full space before or
after, other have a rigid 1/4em space before.

-- 
                                                            -- ddaa