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_file.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_file.erl')
| -rw-r--r-- | src/edit_file.erl | 16 |
1 files changed, 3 insertions, 13 deletions
diff --git a/src/edit_file.erl b/src/edit_file.erl index 5c26de6..11a7661 100644 --- a/src/edit_file.erl +++ b/src/edit_file.erl @@ -1,14 +1,6 @@ -%%%---------------------------------------------------------------------- -%%% File : edit_file.erl -%%% Author : Luke Gorrie <luke@bluetail.com> -%%% Purpose : file-related editor commands -%%% Created : 14 Jan 2001 by Luke Gorrie <luke@bluetail.com> -%%%---------------------------------------------------------------------- - -module(edit_file). --author('luke@bluetail.com'). --include_lib("ermacs/include/edit.hrl"). +-include("edit.hrl"). -compile(export_all). -compile({parse_transform, edit_transform}). @@ -85,11 +77,9 @@ auto_set_mode(State) -> auto_set_mode(State, Filename, []) -> State; auto_set_mode(State, Filename, [{RE, {Mod, Fun}}|T]) -> - case regexp:match(Filename, RE) of + case re:run(Filename, RE, [{capture,none}]) of nomatch -> auto_set_mode(State, Filename, T); - {match, _, _} -> + match -> Mod:Fun(State) end. - - |