anchor.diff:                  Column =< EndColumn -> {variable, Variable, L, StartColumn};
                   true -> undefined
               end;
  -        ({record, {L, StartColumn}, Record, Fields}, _) when L =:= Line andalso StartColumn =< Column ->
  -            EndColumn = StartColumn + length(atom_to_list(Record)) + 1,
  -            if
  -                Column =< EndColumn -> {record, Record};
  -                true -> find_record_field_use(Record, Fields, Column)
  -            end;
  -        ({record, {L, StartColumn}, _, Record, Fields}, _) when L =:= Line andalso StartColumn =< Column ->
  -            EndColumn = StartColumn + length(atom_to_list(Record)) + 1,
  -            if
  -                Column =< EndColumn -> {record, Record};
  -                true -> find_record_field_use(Record, Fields, Column)
  +        ({record, {L, StartColumn}, Record, Fields}, _) ->
  +            EndColumn = StartColumn + length(atom_to_list(Record)),
  +            if
  +                L =:= Line, StartColumn =< Column, Column =< EndColumn -> {record, Record};
  +                true -> find_record_field_use(Record, Fields, Column, Line)
  +            end;
  +        ({record, {L, StartColumn}, _, Record, Fields}, _) ->
  +            EndColumn = StartColumn + length(atom_to_list(Record)),
  +            if
  +                L =:= Line, StartColumn =< Column, Column =< EndColumn -> {record, Record};
  +                true -> find_record_field_use(Record, Fields, Column, Line)
               end;
           ({record_field, {L, RecordSttartColumn}, _, Record, {atom, {L, FieldStartColumn}, Field}}, _) when L =:= Line andalso RecordSttartColumn =< Column ->
               FieldEndColumn = FieldStartColumn + length(atom_to_list(Field)),
  
positive.code:         _ ->
              undefined
      end.
  
  find_function_in_export(_CurrentModule, undefined, _Column) ->
      undefined;
  
negative.code:             Size2 = Size - 18,
              BaseName = list_to_binary(filename:basename(HrlFile)),
              case LineContents of
                  <<"-include(\"", BaseName:Size1/binary, "\").\r">> when Column > 10, Column =< 6 + Size1 ->
                      {hrl, HrlFile};
                  <<"-include_lib(\"", LongName:Size2/binary, "\").\r">> when Column > 14, Column =< 10 + Size2 ->
                      case filename:split(binary_to_list(LongName)) of
                          [LibName|Remain] ->
                              case code:lib_dir(LibName) of
  