summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJim Blandy <jimb@redhat.com>1993-05-13 03:17:03 +0000
committerJim Blandy <jimb@redhat.com>1993-05-13 03:17:03 +0000
commit6a0486dd89eadee34c166d197531a030a88c3cd5 (patch)
treec196380b63fa953ed0982d41c92863945114cdf8
parentc722566c7ca757012799bd9ee4dfcd932f716698 (diff)
downloademacs-6a0486dd89eadee34c166d197531a030a88c3cd5.tar.gz
* textprop.c (Fnext_single_property_change,
Fprevious_single_property_change): Pass arguments to textget in the right order.
-rw-r--r--src/textprop.c9
1 files changed, 5 insertions, 4 deletions
diff --git a/src/textprop.c b/src/textprop.c
index 06ae670c47f..db618c7e4c7 100644
--- a/src/textprop.c
+++ b/src/textprop.c
@@ -524,9 +524,10 @@ If the value is non-nil, it is a position greater than POS, never equal.")
if (NULL_INTERVAL_P (i))
return Qnil;
- here_val = textget (prop, i->plist);
+ here_val = textget (i->plist, prop);
next = next_interval (i);
- while (! NULL_INTERVAL_P (next) && EQ (here_val, textget (prop, next->plist)))
+ while (! NULL_INTERVAL_P (next)
+ && EQ (here_val, textget (next->plist, prop)))
next = next_interval (next);
if (NULL_INTERVAL_P (next))
@@ -586,10 +587,10 @@ If the value is non-nil, it is a position less than POS, never equal.")
if (NULL_INTERVAL_P (i))
return Qnil;
- here_val = textget (prop, i->plist);
+ here_val = textget (i->plist, prop);
previous = previous_interval (i);
while (! NULL_INTERVAL_P (previous)
- && EQ (here_val, textget (prop, previous->plist)))
+ && EQ (here_val, textget (previous->plist, prop)))
previous = previous_interval (previous);
if (NULL_INTERVAL_P (previous))
return Qnil;