aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLars Ingebrigtsen2022-06-27 12:26:19 +0200
committerLars Ingebrigtsen2022-06-27 12:26:19 +0200
commitabdf35fac66ca51419ec39056df0429790ec9db9 (patch)
tree48e965d9332b0eff2cd1d8e0abcc4e1e2a032424
parent513acdc9b4495c5273c55447c47d21534deffc7f (diff)
downloademacs-abdf35fac66ca51419ec39056df0429790ec9db9.tar.gz
emacs-abdf35fac66ca51419ec39056df0429790ec9db9.zip
Adjust plist calls in .m files
* src/nsterm.m (mod_of_kind): * src/nsimage.m (ns_load_image): Adjust plist calls in .m files.
-rw-r--r--src/nsimage.m2
-rw-r--r--src/nsterm.m2
2 files changed, 2 insertions, 2 deletions
diff --git a/src/nsimage.m b/src/nsimage.m
index 2fff987f9fc..9cb5090dd0d 100644
--- a/src/nsimage.m
+++ b/src/nsimage.m
@@ -142,7 +142,7 @@ ns_load_image (struct frame *f, struct image *img,
142 142
143 eassert (valid_image_p (img->spec)); 143 eassert (valid_image_p (img->spec));
144 144
145 lisp_index = Fplist_get (XCDR (img->spec), QCindex); 145 lisp_index = plist_get (XCDR (img->spec), QCindex);
146 index = FIXNUMP (lisp_index) ? XFIXNAT (lisp_index) : 0; 146 index = FIXNUMP (lisp_index) ? XFIXNAT (lisp_index) : 0;
147 147
148 if (STRINGP (spec_file)) 148 if (STRINGP (spec_file))
diff --git a/src/nsterm.m b/src/nsterm.m
index ae44f808459..7f232e72922 100644
--- a/src/nsterm.m
+++ b/src/nsterm.m
@@ -358,7 +358,7 @@ mod_of_kind (Lisp_Object modifier, Lisp_Object kind)
358 return modifier; 358 return modifier;
359 else 359 else
360 { 360 {
361 Lisp_Object val = Fplist_get (modifier, kind); 361 Lisp_Object val = plist_get (modifier, kind);
362 return SYMBOLP (val) ? val : Qnil; 362 return SYMBOLP (val) ? val : Qnil;
363 } 363 }
364} 364}