diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2002-11-03 10:59:18 +0000 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2002-11-03 10:59:18 +0000 |
commit | 538f9462d654682b08f2165de12885dc97e4234a (patch) | |
tree | a867d0976d2403b851b05d2358b18eaf7bc74390 /src/editfns.c | |
parent | 3a6607a22416905277b0938b722d1a08845e8f7d (diff) | |
download | emacs-538f9462d654682b08f2165de12885dc97e4234a.tar.gz |
(get_pos_property): Don't hardcode Qfield.
Diffstat (limited to 'src/editfns.c')
-rw-r--r-- | src/editfns.c | 8 |
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; } |