Limit[(x-1)/Abs[x-1],x->1,Direction->1]