diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2012-03-13 12:57:21 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2012-03-13 12:57:21 -0700 |
| commit | 5961f0de80abce4645ec2f022b2346e24b6479ed (patch) | |
| tree | 2ae5ac4b66170ddf43bbc968f1160cd9aa9f2be9 /txr.vim | |
| parent | aa62864118b755f10b30fd58a3b7fd8407ce8c6c (diff) | |
| download | txr-5961f0de80abce4645ec2f022b2346e24b6479ed.tar.gz txr-5961f0de80abce4645ec2f022b2346e24b6479ed.tar.bz2 txr-5961f0de80abce4645ec2f022b2346e24b6479ed.zip | |
Implementing URL filtering.
* eval.c (eval_init): New intrinsic functions: url-encode, url-decode.
* filter.c (tourl_k, fromurl_k): New keyword variables.
(is_url_reserved, digit_value): New static functions.
(url_encode, url_decode): New functions.
(filter_init): Intialize new keyword variables and register
new :tourl and :fromurl filters.
* filter.h (tourl_k, fromurl_k, url_encode, url_decode): Declared.
* txr.1: Updated.
* txr.vim: Likewise.
Diffstat (limited to 'txr.vim')
| -rw-r--r-- | txr.vim | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -45,7 +45,9 @@ syn keyword txl_keyword contained remq remql remqual syn keyword txl_keyword contained all none eq eql equal + - * abs trunc mod syn keyword txl_keyword contained expt exptmod sqrt gcd fixnump bignump syn keyword txl_keyword contained numberp zerop evenp oddp > -syn keyword txl_keyword contained < >= <= max min search-regex match-regex regsub + +.SS Functions url-encode and url-decode + syn keyword txl_keyword contained make-hash hash gethash sethash pushhash remhash syn keyword txl_keyword contained hash-count get-hash-userdata set-hash-userdata hashp maphash syn keyword txl_keyword contained hash-eql hash-equal eval *stdout* *stdin* *stddebug* @@ -83,7 +85,7 @@ syn keyword txl_keyword contained make-random-state random-state-p syn keyword txl_keyword contained random-fixnum random rand syn keyword txl_keyword contained range range* generate repeat force -syn keyword txl_keyword contained throw throwf error match-fun +syn keyword txl_keyword contained throw throwf error match-fun url-encode url-decode syn match txr_error "@[\t ]*[*]\?[\t ]*." syn match txr_nested_error "[^\t `]\+" contained |