Replace `cadar' with `cadr/car', since `cadar' is problematic on Emacs.

(c-make-init-lang-vars-fun): Replace two occurrences of `cadar' with
`cadr/car'.

diff --git a/lisp/progmodes/cc-langs.el b/lisp/progmodes/cc-langs.el
index a1e26b9fcc4e5ebb1a7a07b4f2d9663cc3449097..e9c496446767341890e7c3f238279be42a3c8b68 100644 (file)
--- a/lisp/progmodes/cc-langs.el
+++ b/lisp/progmodes/cc-langs.el
@@ -3306,7 +3306,7 @@ accomplish that conveniently."
                                       (cdr c-lang-variable-inits))))
                   (while init
                     (setq current-var (caar init))
-                    (set (caar init) (eval (cadar init)))
+                    (set (caar init) (eval (cadr (car init))))
                     (setq init (cdr init)))))
 
             (error
@@ -3335,7 +3335,7 @@ accomplish that conveniently."
 
             (while init
               (setq current-var (caar init))
-              (set (caar init) (eval (cadar init)))
+              (set (caar init) (eval (cadr (car init))))
               (setq init (cdr init)))
 
           (error