talexander/organic
1
0
Fork 0
Code Issues Pull Requests Releases Activity

Allow any character to be escaped in the path for links.

Browse Source
This commit is contained in:
Tom Alexander 2023-09-14 02:58:57 -04:00
parent 87941271a4
commit 876d33239e
Signed by: talexander
GPG Key ID: D3A179C9A53C0EDE
3 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
org_mode_samples/object/regular_link/elisp.org Normal file
View File

@ -0,0 +1 @@
[[elisp:(local-set-key "\M-\x" 'foo-bar-baz)]]

2
src/compare/diff.rs
View File

@ -1926,6 +1926,8 @@ fn compare_regular_link<'s>(
Ok(_) => {} Ok(_) => {}
}; };
// TODO: Compare :type :path :format :raw-link :application :search-option
Ok(DiffResult { Ok(DiffResult {
status: this_status, status: this_status,
name: emacs_name.to_owned(), name: emacs_name.to_owned(),

4
src/parser/regular_link.rs
View File

@ -2,7 +2,7 @@ use nom::branch::alt;
use nom::bytes::complete::escaped; use nom::bytes::complete::escaped;
use nom::bytes::complete::tag; use nom::bytes::complete::tag;
use nom::bytes::complete::take_till1; use nom::bytes::complete::take_till1;
use nom::character::complete::one_of; use nom::character::complete::anychar;
use nom::combinator::verify; use nom::combinator::verify;
use nom::multi::many_till; use nom::multi::many_till;
@ -82,7 +82,7 @@ fn pathreg<'b, 'g, 'r, 's>(
_ => false, _ => false,
}), }),
'\\', '\\',
one_of(r#"]"#), anychar,
)(input)?; )(input)?;
Ok((remaining, path)) Ok((remaining, path))
} }