diff options
| author | Felix Lange <fjl@twurst.com> | 2011-10-14 05:45:42 +0200 |
|---|---|---|
| committer | Felix Lange <fjl@twurst.com> | 2011-10-14 05:45:42 +0200 |
| commit | bd5145368593e09460d4461256ee4f934b2ebf26 (patch) | |
| tree | 471852782d61d64bede27d67552eb79af0a598aa /src/edit_help.erl | |
| parent | 90640c1aed302fd83a500bb9ccdfb6cf7b481112 (diff) | |
| download | ermacs-fork-bd5145368593e09460d4461256ee4f934b2ebf26.tar.gz | |
remove cruft
cruft includes:
- module header comments (yikes..)
- author attributes (sorry luke)
- old guard tests
Diffstat (limited to 'src/edit_help.erl')
| -rw-r--r-- | src/edit_help.erl | 16 |
1 files changed, 4 insertions, 12 deletions
diff --git a/src/edit_help.erl b/src/edit_help.erl index dc904cf..3f93467 100644 --- a/src/edit_help.erl +++ b/src/edit_help.erl @@ -1,13 +1,5 @@ -%%%---------------------------------------------------------------------- -%%% File : edit_help.erl -%%% Author : Luke Gorrie <luke@bluetail.com> -%%% Purpose : Help-related functions -%%% Created : 2 Feb 2002 by Luke Gorrie <luke@bluetail.com> -%%%---------------------------------------------------------------------- - -module(edit_help). - --include_lib("ermacs/include/edit.hrl"). +-include("edit.hrl"). -import(edit_lib, [buffer/1]). @@ -37,7 +29,7 @@ find_source(S) -> {Mod, Fun, Args} -> find_source(S, Mod, Fun); _ -> - edit_lib:status_msg(S, "Not bound to a function") + edit_util:status_msg(S, "Not bound to a function") end. find_source(S0, Mod, Fun) -> @@ -51,9 +43,9 @@ find_source(S0, Mod, Fun) -> end. guess_source_file(S0) -> - case regexp:sub(S0, "ebin", "src") of + case re:replace(S0, "ebin", "src", [{return, list}]) of {ok, S1, _} -> - case regexp:sub(S1, "beam", "erl") of + case re:replace(S1, "beam", "erl", [{return, list}]) of {ok, S2, _} -> case file:read_file_info(S2) of {ok, _} -> |