\[ y'(x)=-\log (y(x)-1) \left (\frac {\text {Ei}(-\log (y(x)-1))}{x}-\text {$\_$F1}(x)\right ) \] ✗ Mathematica : cpu = 0.773101 (sec), leaf count = 0 , could not solve
DSolve[Derivative[1][y][x] == -(Log[-1 + y[x]]*(ExpIntegralEi[-Log[-1 + y[x]]]/x - _F1[x])), y[x], x]
✓ Maple : cpu = 0.346 (sec), leaf count = 27
\[ \left \{ y \left ( x \right ) ={{\rm e}^{{\it RootOf} \left ( \int \!{\frac {{\it \_F1} \left ( x \right ) }{x}}\,{\rm d}xx+{\it \_C1}\,x+{\it Ei} \left ( 1,-{\it \_Z} \right ) \right ) }}+1 \right \} \]