1 files changed, 1 insertions, 1 deletions

diff --git a/src/casefiddle.c b/src/casefiddle.c
index 3f407eadede..ee292dda9b3 100644
--- a/src/casefiddle.c
+++ b/src/casefiddle.c
@@ -529,7 +529,7 @@ See also `capitalize-region'.  */)
 
   if (!NILP (region_noncontiguous_p))
     {
-      bounds = call1 (Fsymbol_value (intern ("region-extract-function")),
+      bounds = call1 (Fsymbol_value (Qregion_extract_function),
                       intern ("bounds"));
 
       while (CONSP (bounds))