diff options
| author | Marc Coquand <marc@mccd.space> | 2024-05-18 13:36:55 -0500 |
|---|---|---|
| committer | Marc Coquand <marc@mccd.space> | 2024-05-18 13:36:55 -0500 |
| commit | acb42d7250f4832e2c93e5ecfaab4dd69b4c4a11 (patch) | |
| tree | 40d1123e90d13dfbedd20bc329dd85afe808aa1d /lib/arbitrary_command.ml | |
| parent | f805a04bd0600653f71e5e4e006104892cf7b6b9 (diff) | |
| download | stitch-acb42d7250f4832e2c93e5ecfaab4dd69b4c4a11.tar.gz stitch-acb42d7250f4832e2c93e5ecfaab4dd69b4c4a11.tar.bz2 stitch-acb42d7250f4832e2c93e5ecfaab4dd69b4c4a11.zip | |
Arbitrary command for article
Diffstat (limited to 'lib/arbitrary_command.ml')
| -rw-r--r-- | lib/arbitrary_command.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/arbitrary_command.ml b/lib/arbitrary_command.ml index 920a82f..05baf43 100644 --- a/lib/arbitrary_command.ml +++ b/lib/arbitrary_command.ml @@ -7,7 +7,7 @@ let run ~(on_return : string -> unit) t ~selected_file ~content ~command = command |> List.map (fun s -> let s = Str.global_replace (Str.regexp "%(file)") selected_file s in - Str.global_replace (Str.regexp "%(content)") content s) + Str.global_replace (Str.regexp "%(line)") content s) in Common.Term.cursor t (Some (0, 0)); try |