anchor.diff:  				)
   			),
   		?_assertEqual(
  +			#ee_caret{line_no = 4, col_no = 7},
  +			move_left(
  +				#ee_caret{line_no = 4, col_no = 9},
  +				TestBuffer
  +				)
  +			),
  +		?_assertEqual(
   			#ee_caret{line_no = 4, col_no = 8},
   			move_left(
   				#ee_caret{line_no = 5, col_no = 1},
  
positive.code: 	)
  	->
  		move_horizontally(Caret, 1, Buffer).
  
  %% --------------------------------------------------------------------
  
  
negative.code: 				)
  			),
  		?_assertEqual(
  			#ee_caret{line_no = 1, col_no = 1},
  			move_left(
  				#ee_caret{line_no = 1, col_no = 1},
  				TestBuffer
  				)
  			),
  		?_assertEqual(
  			#ee_caret{line_no = 2, col_no = 3},
  			move_left(
  				#ee_caret{line_no = 2, col_no = 4},
  