summaryrefslogtreecommitdiff
path: root/src/editfns.c
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2002-11-03 10:59:18 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2002-11-03 10:59:18 +0000
commit538f9462d654682b08f2165de12885dc97e4234a (patch)
treea867d0976d2403b851b05d2358b18eaf7bc74390 /src/editfns.c
parent3a6607a22416905277b0938b722d1a08845e8f7d (diff)
downloademacs-538f9462d654682b08f2165de12885dc97e4234a.tar.gz
(get_pos_property): Don't hardcode Qfield.
Diffstat (limited to 'src/editfns.c')
-rw-r--r--src/editfns.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/editfns.c b/src/editfns.c
index 7fb203c854b..d814f9f857c 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -394,7 +394,7 @@ overlays_around (pos, vec, len)
If OBJECT is a window, then that window's buffer is used, but
window-specific overlays are considered only if they are associated
with OBJECT. */
-static Lisp_Object
+Lisp_Object
get_pos_property (position, prop, object)
Lisp_Object position, object;
register Lisp_Object prop;
@@ -460,12 +460,12 @@ get_pos_property (position, prop, object)
}
{ /* Now check the text-properties. */
- int stickiness = text_property_stickiness (Qfield, position);
+ int stickiness = text_property_stickiness (prop, position);
if (stickiness > 0)
- return Fget_text_property (position, Qfield, Qnil);
+ return Fget_text_property (position, prop, Qnil);
else if (stickiness < 0 && XINT (position) > BEGV)
return Fget_text_property (make_number (XINT (position) - 1),
- Qfield, Qnil);
+ prop, Qnil);
else
return Qnil;
}