(substring_both): Add missing address operator.

2 files changed, 5 insertions, 1 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 10533c8c7e6..ad17ba8624e 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2006-11-24  Juanma Barranquero  <lekktu@gmail.com>
+
+        * fns.c (substring_both): Add missing address operator.
+
 2006-11-24  Stefan Monnier  <monnier@iro.umontreal.ca>
 
         * fns.c: Use AREF/ASIZE macros.
diff --git a/src/fns.c b/src/fns.c
index 7100ada4a6a..f65375438fa 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -1397,7 +1397,7 @@ substring_both (string, from, from_byte, to, to_byte)
                             string, make_number (0), res, Qnil);
     }
   else
-    res = Fvector (to - from, AREF (string, from));
+    res = Fvector (to - from, &AREF (string, from));
 
   return res;
 }