Use `tikzpicture` em `\newcommand` ou `\newenvironment` junto com `lstlisting`

Use `tikzpicture` em `\newcommand` ou `\newenvironment` junto com `lstlisting`

Defini o seguinte comando \recommpara imprimir uma caixa com corpo e título separados:

\newcommand{\recomm}[3]{
  \vspace{0.5cm}
  \noindent 
  \begin{tikzpicture}
    \node [rectangle, inner sep=10pt] (box){%
        \begin{minipage}{\dimexpr\linewidth-20pt-\pgflinewidth\relax}
            #2
        \end{minipage}
    };
    \node [rectangle, inner sep=10pt, fill=black!15, below right] (box2) at (box.south west){%
        \begin{minipage}{\dimexpr\linewidth-20pt-\pgflinewidth\relax}
            #3
        \end{minipage}
    };
    \draw[draw=blue!75!black, very thick] 
      -- (box2.south west)
      -- (box.north west)
      -- (box.north east)
      -- (box2.south east)
      -- (box2.south west);
    \node[above right, fill=blue!75!black, text=white, font=\bfseries] at (box.north west) {#1};
  \end{tikzpicture}%
}

Isso funciona bem e imprime uma bela caixa quando usado com entrada simples:

\recomm{Title}{%
  Some content in the first part
}{%
  Some content in the second part
}

Caixa de trabalho

No entanto, quando tento inserir uma listagem de código usando o lstlistingambiente, recebo todos os tipos de erros:

\recomm{Title}{%
  Some content in the first part
}{%
  Some content in the second part

  \begin{lstlisting}
    a=b
  \end{lstlisting}
}
Argument of \lst@next has an extra }.
<inserted text> 
                \par 
l.185 }

Tentei usar \newenvironment, mas isso permite apenas um único ambiente onde preciso de dois (a primeira e a segunda parte da imagem). Qual é a maneira recomendada de resolver isso bem?

(Gostaria de evitar o tcolorbox, pois tenho que trabalhar com um ambiente texlive muito incompleto, onde esse pacote e muitas de suas dependências não estão incluídos.)


Exemplo mínimo que não funciona:

\documentclass{article}

\usepackage{listings}
\usepackage{tikz}

\newcommand{\recomm}[2]{
  \begin{tikzpicture}
    \node [rectangle, inner sep=10pt] (box){%
        \begin{minipage}{\dimexpr\linewidth-20pt-\pgflinewidth\relax}
            #1
        \end{minipage}
    };
    \node [rectangle, inner sep=10pt, fill=black!15, below right] (box2) at (box.south west){%
        \begin{minipage}{\dimexpr\linewidth-20pt-\pgflinewidth\relax}
            #2
        \end{minipage}
    };
}

\begin{document}

\recomm{%
  Some content in the first part
}{%
  Some content in the second part

  \begin{lstlisting}
    a=b
  \end{lstlisting}
}

\end{document}

informação relacionada