Re: escaping quote for use with a selectionplaceholder
- To: mathgroup at smc.vnet.net
- Subject: [mg98454] Re: escaping quote for use with a selectionplaceholder
- From: Albert Retey <awnl at gmx-topmail.de>
- Date: Fri, 10 Apr 2009 04:53:09 -0400 (EDT)
- References: <grkgs7$75t$1@smc.vnet.net>
meitnik wrote:
> I am trying to figure out how to make a typesetting action that wraps
> quotes (" ") around the selection in a cell.
> I cant seem to get a proper escape for quote to put around a
> selectionplaceholder symbol so Mathematica can use in NoteBookApply.
> btw, is there a function that puts quotes around any expression passed
> to it??
> Can what am wanting to do as a typesetting action doable??
>
this is a first try, which of course only handles some simple cases
correctly, but maybe it is good enough as a starting point. To make it
work for the cases you are interested in, you should post some examples...
Button["Wrap with \"",
NotebookWrite[ButtonNotebook[],
RowBox[{"\"", NotebookRead[ButtonNotebook[]], "\""}]]
]
hth,
albert