collision between slurs and and accidentals

[Stefan Thomas]

Dear Community,
in the below quoted snippet, there are tow collisions between slurs and accidentals.
Is there any way, to solve this problem, either automatically or by hand?
\version "2.13.0"
{ 
  % \override Staff.Accidental #'avoid-slur = #'around
  \time 7/8
  dis''8 ([cis''' ) f''] ais''4 ais''  %slur doesn't look nice
  cis'' 8 ( [ b'') dis''] gis''4 gis'' % slur is o.k.
  \time 6/8 
  f''8 [( es''') g'' ] d'''([ b'') a'' ] %slur doesn't look nice
  \time 2/4 
  c'''4 c''' }