Как правильно закодировать?

Есть сервер сессий, который возвращает {error, _} либо #session{....., opaque = CaptchaCode}
Есть кусок кода, который проверяет валидность формы регистрации и выдает ok либо текст о�?ибки.

    SessionTest = case session:get({captcha, CL}, -1) of
        {error, expired} -> "Verification code expired";
        {error, nosession} -> "Bad verification code";
        #session{opaque = CS} -> ok;   %% тут я по-разному писал...
        _ -> "Unknown error"
    end,
    Test = if
        SessionTest /= ok -> SessionTest;
        CC /= CS -> "Wrong verification code"; %% вот здесь о�?ибка компиляции
        LL < 4 -> "Pasword is too short";
        P /= P2 -> "Paswords not match";
       true -> ok
    end,

Эрланг компилирует и говорит "variable 'CS' unsafe in 'case'"
и указывает на строчку, в которой стоит комментарий про о�?ибку.

Формально, понятно о чем он, и если я {error, expired} -> "Verification code expired";
переписываю как {error, expired} -> CS = void, "Verification code expired";
и т.д., то компилер успокаивается.
Но фактически, проверка SessionTest и так исключает unsafe случай.
Два вопроса:
1. Прав ли я?
2. Как это закодить красив�?е?
2.5. Как это закодить красив�?е, чтобы эрланг ску�?ал? :-)

Наверно луч�?е так:

SessionTest = case session:get({captcha, CL}, -1) of
{error, expired} -> {error, "Verification code expired"};
{error, nosession} -> {error, "Bad verification code"};
#session{opaque = CS} -> {ok, CS};
_ -> {error, "Unknown error"}
end,
Test = case SessionTest of
{error, Message} -> Message;
{ok, CS} when CS /= CC -> "Wrong verification code";
{ok, _} when LL < 4 -> "Pasword is too short";
{ok, _} when P /= P2 -> "Paswords not match";
_ -> ok
end,

Но всё равно структура мне не очень нравится, много избыточности. Видимо ты мало на функциональных языках программируе�?ь, раз такой код получается).

Ну из куска было непонятно, что такой вариант допускается. Тогда так:

SessionTest = case session:get({captcha, CL}, -1) of
{error, expired} -> "Verification code expired";
{error, nosession} -> "Bad verification code";
#session{opaque = CS} when CC /= CS -> "Wrong verification code";
#session{} -> ok;
_ -> "Unknown error"
end,

PS В каких тегах ты код пи�?е�?ь? code /code не катит что-то(.

Там pre не указано(. У меня написано тока так:
Разре�?енные коды: a blockquote br code em strong ul ol li img.