hanging punctuation with microtype and luaLaTeX

Question

I want to get this style of hanging punctuation:

Quotation marks «...» „...“, brackets (...) [...] {...} and bullets are put beyond the left margin.

Quotation marks, brackets, periods, and commas are set outside the right margin. Hyphens (both in compound words and between the syllables of a word that’s divided at the end of a line) should not fall outside the margin full-length, but rather be hung one third or half of their length.

I try to achieve this by using the \SetProtrusion command according to the manual (page 12):

% !TeX encoding = UTF-8
% !TeX TS-program = lualatex
\documentclass[a4paper,14pt]{extarticle}
\usepackage[russian]{babel}
\usepackage{fontspec}
\usepackage{xltxtra}
\usepackage{csquotes}
\defaultfontfeatures{Renderer=Basic,Mapping=tex-text,Scale=MatchLowercase}
\setmainfont{Charis SIL}[Mapping=tex-text,Scale=MatchLowercase]
\setromanfont{Charis SIL}[Mapping=tex-text,Scale=MatchLowercase]
\setsansfont{PT Sans}[Mapping=tex-text,Scale=MatchLowercase]
\setmonofont{PT Mono}[Mapping=tex-text,Scale=MatchLowercase]
\usepackage[protrusion=true,expansion=true,final,babel=true,factor=2000]{microtype}
\SetProtrusion 
{encoding = *}
{
    \textquotedblleft = {4000, },
    \textquotedblright = { ,4000},
    . = { , 4000}
    « = {4000, },
    » = { ,4000},
    ( = {4000, },
    ) = { ,4000}
}

\begin{document}
\noindent\enquote{Окончательная машинописная рукопись основана на отредактированном третьем варианте и, после того как она готова, ее \enquote{читают} и правят, и правят заново.
Приблизительно через два) года после начала работы (два рабочих года! Они могут быть. намного длиннее двух календарных лет...) книга отсылается в} издательство.\\
«Окончательная машинописная рукопись  основана на отредактированном третьем варианте и, после того как она готова, ее (читают и правят, и правят заново.
Приблизительно через два) года после начала работы (два рабочих года! Они могут быть. намного длиннее двух календарных лет...) книга отсылается в» издательство....
\end{document}

But it doesn't work:

(If it matters, I use LuaLaTeX from MikTeX on Windows 7)

Answer 1

Your settings are never applied because in the first argument to \SetProtrusion you only specify the encoding. microtype will always try to load the best matching settings, and since settings for Charis SIL exist, they will be applied instead. Drawing from this answer, you can overwrite settings by first loading the configuration file and then redefining these settings:

\usepackage[protrusion=true,expansion=true,final,babel=true]{microtype} % default factor (1000)
\LoadMicrotypeFile{CharisSIL}
\SetProtrusion
   [ name = Charis-default ]
   { }
   {
    \textquotedblleft = {1000, },
    \textquotedblright = { ,1000},
    \quotedblbase = {1000, }, % = „
    . = { , 1000}, % there was a comma missing here
   {,} = { , 1000}, % this comma needs to be masked 
    « = {1000, },
    » = { ,1000},
    ( = {1000, },
    ) = { ,1000},
    - = { ,500}
   }

For the other shapes, you can then simply load these settings:

\SetProtrusion
   [ name = Charis-it,
     load = Charis-default ]
   {}{}
\SetProtrusion
   [ name = Charis-sc,
     load = Charis-default ]
   {}{}

(I must say that I find these settings weird, since they are contrary to the idea that microtypographical tweaks should be discreet and not jump out at the reader – as elaborated here)