escape quotation marks in replace function

Dear list,

The following replace function replaces a /straight/ single quotation 
mark (or apostrophe) with a /smart/ single quotation mark when it is 
preceded by either a space or a /smart double/ quotation mark:

<xsl:value-of select="replace(.,&#34;([ C"BB])'&#34;,&#34;$1C"BB&#34;)"/>

I would like to add to this code such that it also replace the straight 
single quotation mark when it is preceded by a /straight/ double 
quotation mark. What do I have to add between the brackets to achieve 
this? Putting either ["] or [&#34;] produces an error since both of 
these are used in the surrounding code.

Thank you in advance for your help!
Wolfhart