[PATCH] Avoid an error when creating a modified lang environment

No ChangeLog entry for this right now, sorry. Maybe tomorrow. --- mule-cmds.el~ 2006-11-29 11:24:07.000000000 +0100 +++ mule-cmds.el 2006-12-07 14:43:55.625000000 +0100 ＠＠ -1079,7 +1079,7 ＠＠ (replace-match (format " (%s)" (upcase (symbol-name (coding-system-name coding-system)))) - nil nil langenv) + nil nil (car langenv)) (format "%s (%s)" (car langenv) (upcase (symbol-name (coding-system-name coding-system))))) (destructive-plist-to-alist -- Santa Maradona, priez pour moi! _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches