diff options
| author | Robin Haberkorn <robin.haberkorn@googlemail.com> | 2025-03-13 02:14:03 +0300 |
|---|---|---|
| committer | Robin Haberkorn <robin.haberkorn@googlemail.com> | 2025-03-13 02:14:03 +0300 |
| commit | 541bee1c6d56ce81a0302263af006b53dc1aea64 (patch) | |
| tree | 0f763f47f30cbbe2d7b76eae5599f5b9308389d9 /tests | |
| parent | cefe7e65281a34c20da7288618d1df11d3b9db28 (diff) | |
| download | sciteco-541bee1c6d56ce81a0302263af006b53dc1aea64.tar.gz | |
rewrote <W> command on the same basis as <V> and <Y>
* <W> was also using keyboard movement commands.
* This fixes an inconsistency between the handling of punctuation characters,
e.g. "(word" followed by -W vs. Y.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/atlocal.in | 3 | ||||
| -rw-r--r-- | tests/testsuite.at | 10 |
2 files changed, 11 insertions, 2 deletions
diff --git a/tests/atlocal.in b/tests/atlocal.in index 2c76ab0..ef9c43c 100644 --- a/tests/atlocal.in +++ b/tests/atlocal.in @@ -38,3 +38,6 @@ esac # Some platforms allow very large stack sizes, making it hard to test # against potential stack overflows. ulimit -s 8192 + +# Test strings used by multiple test cases +WORDS_EXAMPLE="navigating (words is useful" diff --git a/tests/testsuite.at b/tests/testsuite.at index 4d66392..05ec2e3 100644 --- a/tests/testsuite.at +++ b/tests/testsuite.at @@ -113,9 +113,15 @@ AT_SETUP([Convert between line and glyph positions]) AT_CHECK([$SCITECO -e "@I/1^J2^J3/J 2^QC :^Q-3\"N(0/0)'"], 0, ignore, ignore) AT_CLEANUP +AT_SETUP([Moving by words]) +AT_CHECK([$SCITECO -e "Z= 3J 2W .-11\"N(0/0)'" "$WORDS_EXAMPLE"], 0, ignore, ignore) +# FIXME: Sooner or later, there will be a shortcut for -W. +AT_CHECK([$SCITECO -e "Z-4J -2W .-17\"N(0/0)'" "$WORDS_EXAMPLE"], 0, ignore, ignore) +AT_CLEANUP + AT_SETUP([Deleting words]) -AT_CHECK([$SCITECO -e "@I/deleting words is useful/3J 2V .-3\"N(0/0)' Z-13\"N(0/0)'"], 0, ignore, ignore) -AT_CHECK([$SCITECO -e "@I/deleting words is useful/3R 2Y .-14\"N(0/0)' Z-17\"N(0/0)'"], 0, ignore, ignore) +AT_CHECK([$SCITECO -e "3J 2V .-3\"N(0/0)' Z-20\"N(0/0)'" "$WORDS_EXAMPLE"], 0, ignore, ignore) +AT_CHECK([$SCITECO -e "Z-4J 2Y .-17\"N(0/0)' Z-21\"N(0/0)'" "$WORDS_EXAMPLE"], 0, ignore, ignore) AT_CLEANUP AT_SETUP([Searches]) |