function TotallyNotTheRightName(varargin)

     if nargin >= 2

          TargetFile     = varargin{1};
          BreakStr       = varargin{2};


     elseif nargin == 1

          if isempty(strfind(varargin{1},';'))

               TargetFile     = varargin{1};
               BreakStr       = 'x = 1;';

          else

               BreakStr       = varargin{1};
               StackList      = dbstack;
               TargetFile     = StackList(2).file;

          end

     else

          BreakStr       = 'x = 1;';
          StackList      = dbstack;
          TargetFile     = StackList(2).file;


     end

     BreakLines     = [];

     FileID         = fopen(TargetFile,'r');

     NewLine        = fgetl(FileID);
     LineNum        = 1;

     while ischar(NewLine)

          if isempty(strfind(NewLine,'ActivateBreakpoints')) &&...
             ~isempty(strfind(NewLine,BreakStr)) &&...
             isempty(strfind(NewLine,char(37)))

               BreakLines(end+1) = LineNum;

          end

          LineNum = LineNum + 1;
          NewLine = fgetl(FileID);

     end

     fclose(FileID);

     for i = 1:numel(BreakLines)

          evalin('caller',sprintf('dbstop in %s at %g\n',TargetFile,BreakLines(i)));

     end

end