I have the following code:
\documentclass[tikz,border=1pt,12pt]{standalone}
\usetikzlibrary{calc,decorations.markings,arrows.meta}
\begin{document}
\tikzset{-<-/.style={decoration={
markings,
mark=at position .5 with {\arrow{<}}},postaction={decorate}}}
\newcommand\Square[1]{+(-#1,-#1) rectangle +(#1,#1)}
\begin{tikzpicture}[scale=0.5]
\draw (2,0) circle (.7);
\draw[-<-] ($(2,0)+(30:.7)$) to[out=30,in=90] (3.8,0) to[out=-90,in=-30] ($(2,0)+(-30:.7)$);
\end{tikzpicture}
\end{document}
the result is not very satisfying:
in particular the arrow is misplaced. How can I get a better result?