diff options
| author | Paul Eggert | 2011-03-05 23:53:03 -0800 |
|---|---|---|
| committer | Paul Eggert | 2011-03-05 23:53:03 -0800 |
| commit | 58635e4de85621d4f16befe15b1df44a637bd078 (patch) | |
| tree | b5dc80332d5912ba795e59ee86cea1527324709e | |
| parent | 5489860be109ec6fa2a7d143cdecb6887e37f5d5 (diff) | |
| parent | 555e9b5c69d70acca13310fbe533594a8f1eab98 (diff) | |
| download | emacs-58635e4de85621d4f16befe15b1df44a637bd078.tar.gz emacs-58635e4de85621d4f16befe15b1df44a637bd078.zip | |
Merge from mainline.
128 files changed, 2594 insertions, 1574 deletions
| @@ -1,3 +1,7 @@ | |||
| 1 | 2011-03-06 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * configure.in (FREETYPE_LIBS): Actually set it to something. | ||
| 4 | |||
| 1 | 2011-03-02 Paul Eggert <eggert@cs.ucla.edu> | 5 | 2011-03-02 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 6 | ||
| 3 | Work around some portability problems with symlinks. | 7 | Work around some portability problems with symlinks. |
diff --git a/aclocal.m4 b/aclocal.m4 index 1536f3b48b5..9fdc8e76c49 100644 --- a/aclocal.m4 +++ b/aclocal.m4 | |||
| @@ -13,8 +13,8 @@ | |||
| 13 | 13 | ||
| 14 | m4_ifndef([AC_AUTOCONF_VERSION], | 14 | m4_ifndef([AC_AUTOCONF_VERSION], |
| 15 | [m4_copy([m4_PACKAGE_VERSION], [AC_AUTOCONF_VERSION])])dnl | 15 | [m4_copy([m4_PACKAGE_VERSION], [AC_AUTOCONF_VERSION])])dnl |
| 16 | m4_if(m4_defn([AC_AUTOCONF_VERSION]), [2.68],, | 16 | m4_if(m4_defn([AC_AUTOCONF_VERSION]), [2.67],, |
| 17 | [m4_warning([this file was generated for autoconf 2.68. | 17 | [m4_warning([this file was generated for autoconf 2.67. |
| 18 | You have another version of autoconf. It may work, but is not guaranteed to. | 18 | You have another version of autoconf. It may work, but is not guaranteed to. |
| 19 | If you have problems, you may need to regenerate the build system entirely. | 19 | If you have problems, you may need to regenerate the build system entirely. |
| 20 | To do so, use the procedure documented by the package, typically `autoreconf'.])]) | 20 | To do so, use the procedure documented by the package, typically `autoreconf'.])]) |
| @@ -1,6 +1,6 @@ | |||
| 1 | #! /bin/sh | 1 | #! /bin/sh |
| 2 | # Guess values for system-dependent variables and create Makefiles. | 2 | # Guess values for system-dependent variables and create Makefiles. |
| 3 | # Generated by GNU Autoconf 2.68 for emacs 24.0.50. | 3 | # Generated by GNU Autoconf 2.67 for emacs 24.0.50. |
| 4 | # | 4 | # |
| 5 | # | 5 | # |
| 6 | # Copyright (C) 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001, | 6 | # Copyright (C) 1992, 1993, 1994, 1995, 1996, 1998, 1999, 2000, 2001, |
| @@ -89,7 +89,6 @@ fi | |||
| 89 | IFS=" "" $as_nl" | 89 | IFS=" "" $as_nl" |
| 90 | 90 | ||
| 91 | # Find who we are. Look in the path if we contain no directory separator. | 91 | # Find who we are. Look in the path if we contain no directory separator. |
| 92 | as_myself= | ||
| 93 | case $0 in #(( | 92 | case $0 in #(( |
| 94 | *[\\/]* ) as_myself=$0 ;; | 93 | *[\\/]* ) as_myself=$0 ;; |
| 95 | *) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR | 94 | *) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR |
| @@ -215,18 +214,11 @@ IFS=$as_save_IFS | |||
| 215 | # We cannot yet assume a decent shell, so we have to provide a | 214 | # We cannot yet assume a decent shell, so we have to provide a |
| 216 | # neutralization value for shells without unset; and this also | 215 | # neutralization value for shells without unset; and this also |
| 217 | # works around shells that cannot unset nonexistent variables. | 216 | # works around shells that cannot unset nonexistent variables. |
| 218 | # Preserve -v and -x to the replacement shell. | ||
| 219 | BASH_ENV=/dev/null | 217 | BASH_ENV=/dev/null |
| 220 | ENV=/dev/null | 218 | ENV=/dev/null |
| 221 | (unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV | 219 | (unset BASH_ENV) >/dev/null 2>&1 && unset BASH_ENV ENV |
| 222 | export CONFIG_SHELL | 220 | export CONFIG_SHELL |
| 223 | case $- in # (((( | 221 | exec "$CONFIG_SHELL" "$as_myself" ${1+"$@"} |
| 224 | *v*x* | *x*v* ) as_opts=-vx ;; | ||
| 225 | *v* ) as_opts=-v ;; | ||
| 226 | *x* ) as_opts=-x ;; | ||
| 227 | * ) as_opts= ;; | ||
| 228 | esac | ||
| 229 | exec "$CONFIG_SHELL" $as_opts "$as_myself" ${1+"$@"} | ||
| 230 | fi | 222 | fi |
| 231 | 223 | ||
| 232 | if test x$as_have_required = xno; then : | 224 | if test x$as_have_required = xno; then : |
| @@ -954,12 +946,12 @@ LIBTIFF | |||
| 954 | LIBPNG | 946 | LIBPNG |
| 955 | LIBJPEG | 947 | LIBJPEG |
| 956 | LIBXPM | 948 | LIBXPM |
| 957 | FREETYPE_LIBS | ||
| 958 | FREETYPE_CFLAGS | ||
| 959 | M17N_FLT_LIBS | 949 | M17N_FLT_LIBS |
| 960 | M17N_FLT_CFLAGS | 950 | M17N_FLT_CFLAGS |
| 961 | LIBOTF_LIBS | 951 | LIBOTF_LIBS |
| 962 | LIBOTF_CFLAGS | 952 | LIBOTF_CFLAGS |
| 953 | FREETYPE_LIBS | ||
| 954 | FREETYPE_CFLAGS | ||
| 963 | XFT_LIBS | 955 | XFT_LIBS |
| 964 | XFT_CFLAGS | 956 | XFT_CFLAGS |
| 965 | FONTCONFIG_LIBS | 957 | FONTCONFIG_LIBS |
| @@ -1570,7 +1562,7 @@ Try \`$0 --help' for more information" | |||
| 1570 | $as_echo "$as_me: WARNING: you should use --build, --host, --target" >&2 | 1562 | $as_echo "$as_me: WARNING: you should use --build, --host, --target" >&2 |
| 1571 | expr "x$ac_option" : ".*[^-._$as_cr_alnum]" >/dev/null && | 1563 | expr "x$ac_option" : ".*[^-._$as_cr_alnum]" >/dev/null && |
| 1572 | $as_echo "$as_me: WARNING: invalid host type: $ac_option" >&2 | 1564 | $as_echo "$as_me: WARNING: invalid host type: $ac_option" >&2 |
| 1573 | : "${build_alias=$ac_option} ${host_alias=$ac_option} ${target_alias=$ac_option}" | 1565 | : ${build_alias=$ac_option} ${host_alias=$ac_option} ${target_alias=$ac_option} |
| 1574 | ;; | 1566 | ;; |
| 1575 | 1567 | ||
| 1576 | esac | 1568 | esac |
| @@ -1847,7 +1839,7 @@ Optional Packages: | |||
| 1847 | don't use Motif or Xaw3d scroll bars | 1839 | don't use Motif or Xaw3d scroll bars |
| 1848 | --without-xaw3d don't use Xaw3d | 1840 | --without-xaw3d don't use Xaw3d |
| 1849 | --without-xim don't use X11 XIM | 1841 | --without-xim don't use X11 XIM |
| 1850 | --with-ns use nextstep (Cocoa or GNUstep) windowing system | 1842 | --with-ns use NeXTstep (Cocoa or GNUstep) windowing system |
| 1851 | --without-gpm don't use -lgpm for mouse support on a GNU/Linux | 1843 | --without-gpm don't use -lgpm for mouse support on a GNU/Linux |
| 1852 | console | 1844 | console |
| 1853 | --without-dbus don't compile with D-Bus support | 1845 | --without-dbus don't compile with D-Bus support |
| @@ -1944,7 +1936,7 @@ test -n "$ac_init_help" && exit $ac_status | |||
| 1944 | if $ac_init_version; then | 1936 | if $ac_init_version; then |
| 1945 | cat <<\_ACEOF | 1937 | cat <<\_ACEOF |
| 1946 | emacs configure 24.0.50 | 1938 | emacs configure 24.0.50 |
| 1947 | generated by GNU Autoconf 2.68 | 1939 | generated by GNU Autoconf 2.67 |
| 1948 | 1940 | ||
| 1949 | Copyright (C) 2010 Free Software Foundation, Inc. | 1941 | Copyright (C) 2010 Free Software Foundation, Inc. |
| 1950 | This configure script is free software; the Free Software Foundation | 1942 | This configure script is free software; the Free Software Foundation |
| @@ -1990,7 +1982,7 @@ sed 's/^/| /' conftest.$ac_ext >&5 | |||
| 1990 | 1982 | ||
| 1991 | ac_retval=1 | 1983 | ac_retval=1 |
| 1992 | fi | 1984 | fi |
| 1993 | eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno | 1985 | eval $as_lineno_stack; test "x$as_lineno_stack" = x && { as_lineno=; unset as_lineno;} |
| 1994 | as_fn_set_status $ac_retval | 1986 | as_fn_set_status $ac_retval |
| 1995 | 1987 | ||
| 1996 | } # ac_fn_c_try_compile | 1988 | } # ac_fn_c_try_compile |
| @@ -2027,7 +2019,7 @@ sed 's/^/| /' conftest.$ac_ext >&5 | |||
| 2027 | 2019 | ||
| 2028 | ac_retval=1 | 2020 | ac_retval=1 |
| 2029 | fi | 2021 | fi |
| 2030 | eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno | 2022 | eval $as_lineno_stack; test "x$as_lineno_stack" = x && { as_lineno=; unset as_lineno;} |
| 2031 | as_fn_set_status $ac_retval | 2023 | as_fn_set_status $ac_retval |
| 2032 | 2024 | ||
| 2033 | } # ac_fn_c_try_cpp | 2025 | } # ac_fn_c_try_cpp |
| @@ -2040,10 +2032,10 @@ fi | |||
| 2040 | ac_fn_c_check_header_mongrel () | 2032 | ac_fn_c_check_header_mongrel () |
| 2041 | { | 2033 | { |
| 2042 | as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack | 2034 | as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack |
| 2043 | if eval \${$3+:} false; then : | 2035 | if eval "test \"\${$3+set}\"" = set; then : |
| 2044 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 | 2036 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 |
| 2045 | $as_echo_n "checking for $2... " >&6; } | 2037 | $as_echo_n "checking for $2... " >&6; } |
| 2046 | if eval \${$3+:} false; then : | 2038 | if eval "test \"\${$3+set}\"" = set; then : |
| 2047 | $as_echo_n "(cached) " >&6 | 2039 | $as_echo_n "(cached) " >&6 |
| 2048 | fi | 2040 | fi |
| 2049 | eval ac_res=\$$3 | 2041 | eval ac_res=\$$3 |
| @@ -2106,7 +2098,7 @@ $as_echo "$as_me: WARNING: $2: proceeding with the compiler's result" >&2;} | |||
| 2106 | esac | 2098 | esac |
| 2107 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 | 2099 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 |
| 2108 | $as_echo_n "checking for $2... " >&6; } | 2100 | $as_echo_n "checking for $2... " >&6; } |
| 2109 | if eval \${$3+:} false; then : | 2101 | if eval "test \"\${$3+set}\"" = set; then : |
| 2110 | $as_echo_n "(cached) " >&6 | 2102 | $as_echo_n "(cached) " >&6 |
| 2111 | else | 2103 | else |
| 2112 | eval "$3=\$ac_header_compiler" | 2104 | eval "$3=\$ac_header_compiler" |
| @@ -2115,7 +2107,7 @@ eval ac_res=\$$3 | |||
| 2115 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 | 2107 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 |
| 2116 | $as_echo "$ac_res" >&6; } | 2108 | $as_echo "$ac_res" >&6; } |
| 2117 | fi | 2109 | fi |
| 2118 | eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno | 2110 | eval $as_lineno_stack; test "x$as_lineno_stack" = x && { as_lineno=; unset as_lineno;} |
| 2119 | 2111 | ||
| 2120 | } # ac_fn_c_check_header_mongrel | 2112 | } # ac_fn_c_check_header_mongrel |
| 2121 | 2113 | ||
| @@ -2156,7 +2148,7 @@ sed 's/^/| /' conftest.$ac_ext >&5 | |||
| 2156 | ac_retval=$ac_status | 2148 | ac_retval=$ac_status |
| 2157 | fi | 2149 | fi |
| 2158 | rm -rf conftest.dSYM conftest_ipa8_conftest.oo | 2150 | rm -rf conftest.dSYM conftest_ipa8_conftest.oo |
| 2159 | eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno | 2151 | eval $as_lineno_stack; test "x$as_lineno_stack" = x && { as_lineno=; unset as_lineno;} |
| 2160 | as_fn_set_status $ac_retval | 2152 | as_fn_set_status $ac_retval |
| 2161 | 2153 | ||
| 2162 | } # ac_fn_c_try_run | 2154 | } # ac_fn_c_try_run |
| @@ -2170,7 +2162,7 @@ ac_fn_c_check_header_compile () | |||
| 2170 | as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack | 2162 | as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack |
| 2171 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 | 2163 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 |
| 2172 | $as_echo_n "checking for $2... " >&6; } | 2164 | $as_echo_n "checking for $2... " >&6; } |
| 2173 | if eval \${$3+:} false; then : | 2165 | if eval "test \"\${$3+set}\"" = set; then : |
| 2174 | $as_echo_n "(cached) " >&6 | 2166 | $as_echo_n "(cached) " >&6 |
| 2175 | else | 2167 | else |
| 2176 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 2168 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -2188,7 +2180,7 @@ fi | |||
| 2188 | eval ac_res=\$$3 | 2180 | eval ac_res=\$$3 |
| 2189 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 | 2181 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 |
| 2190 | $as_echo "$ac_res" >&6; } | 2182 | $as_echo "$ac_res" >&6; } |
| 2191 | eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno | 2183 | eval $as_lineno_stack; test "x$as_lineno_stack" = x && { as_lineno=; unset as_lineno;} |
| 2192 | 2184 | ||
| 2193 | } # ac_fn_c_check_header_compile | 2185 | } # ac_fn_c_check_header_compile |
| 2194 | 2186 | ||
| @@ -2233,7 +2225,7 @@ fi | |||
| 2233 | # interfere with the next link command; also delete a directory that is | 2225 | # interfere with the next link command; also delete a directory that is |
| 2234 | # left behind by Apple's compiler. We do this before executing the actions. | 2226 | # left behind by Apple's compiler. We do this before executing the actions. |
| 2235 | rm -rf conftest.dSYM conftest_ipa8_conftest.oo | 2227 | rm -rf conftest.dSYM conftest_ipa8_conftest.oo |
| 2236 | eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno | 2228 | eval $as_lineno_stack; test "x$as_lineno_stack" = x && { as_lineno=; unset as_lineno;} |
| 2237 | as_fn_set_status $ac_retval | 2229 | as_fn_set_status $ac_retval |
| 2238 | 2230 | ||
| 2239 | } # ac_fn_c_try_link | 2231 | } # ac_fn_c_try_link |
| @@ -2249,7 +2241,7 @@ ac_fn_c_check_decl () | |||
| 2249 | as_decl_use=`echo $2|sed -e 's/(/((/' -e 's/)/) 0&/' -e 's/,/) 0& (/g'` | 2241 | as_decl_use=`echo $2|sed -e 's/(/((/' -e 's/)/) 0&/' -e 's/,/) 0& (/g'` |
| 2250 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $as_decl_name is declared" >&5 | 2242 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $as_decl_name is declared" >&5 |
| 2251 | $as_echo_n "checking whether $as_decl_name is declared... " >&6; } | 2243 | $as_echo_n "checking whether $as_decl_name is declared... " >&6; } |
| 2252 | if eval \${$3+:} false; then : | 2244 | if eval "test \"\${$3+set}\"" = set; then : |
| 2253 | $as_echo_n "(cached) " >&6 | 2245 | $as_echo_n "(cached) " >&6 |
| 2254 | else | 2246 | else |
| 2255 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 2247 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -2280,7 +2272,7 @@ fi | |||
| 2280 | eval ac_res=\$$3 | 2272 | eval ac_res=\$$3 |
| 2281 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 | 2273 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 |
| 2282 | $as_echo "$ac_res" >&6; } | 2274 | $as_echo "$ac_res" >&6; } |
| 2283 | eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno | 2275 | eval $as_lineno_stack; test "x$as_lineno_stack" = x && { as_lineno=; unset as_lineno;} |
| 2284 | 2276 | ||
| 2285 | } # ac_fn_c_check_decl | 2277 | } # ac_fn_c_check_decl |
| 2286 | 2278 | ||
| @@ -2292,7 +2284,7 @@ ac_fn_c_check_header_preproc () | |||
| 2292 | as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack | 2284 | as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack |
| 2293 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 | 2285 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 |
| 2294 | $as_echo_n "checking for $2... " >&6; } | 2286 | $as_echo_n "checking for $2... " >&6; } |
| 2295 | if eval \${$3+:} false; then : | 2287 | if eval "test \"\${$3+set}\"" = set; then : |
| 2296 | $as_echo_n "(cached) " >&6 | 2288 | $as_echo_n "(cached) " >&6 |
| 2297 | else | 2289 | else |
| 2298 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 2290 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -2309,7 +2301,7 @@ fi | |||
| 2309 | eval ac_res=\$$3 | 2301 | eval ac_res=\$$3 |
| 2310 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 | 2302 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 |
| 2311 | $as_echo "$ac_res" >&6; } | 2303 | $as_echo "$ac_res" >&6; } |
| 2312 | eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno | 2304 | eval $as_lineno_stack; test "x$as_lineno_stack" = x && { as_lineno=; unset as_lineno;} |
| 2313 | 2305 | ||
| 2314 | } # ac_fn_c_check_header_preproc | 2306 | } # ac_fn_c_check_header_preproc |
| 2315 | 2307 | ||
| @@ -2322,7 +2314,7 @@ ac_fn_c_check_member () | |||
| 2322 | as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack | 2314 | as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack |
| 2323 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2.$3" >&5 | 2315 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2.$3" >&5 |
| 2324 | $as_echo_n "checking for $2.$3... " >&6; } | 2316 | $as_echo_n "checking for $2.$3... " >&6; } |
| 2325 | if eval \${$4+:} false; then : | 2317 | if eval "test \"\${$4+set}\"" = set; then : |
| 2326 | $as_echo_n "(cached) " >&6 | 2318 | $as_echo_n "(cached) " >&6 |
| 2327 | else | 2319 | else |
| 2328 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 2320 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -2366,7 +2358,7 @@ fi | |||
| 2366 | eval ac_res=\$$4 | 2358 | eval ac_res=\$$4 |
| 2367 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 | 2359 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 |
| 2368 | $as_echo "$ac_res" >&6; } | 2360 | $as_echo "$ac_res" >&6; } |
| 2369 | eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno | 2361 | eval $as_lineno_stack; test "x$as_lineno_stack" = x && { as_lineno=; unset as_lineno;} |
| 2370 | 2362 | ||
| 2371 | } # ac_fn_c_check_member | 2363 | } # ac_fn_c_check_member |
| 2372 | 2364 | ||
| @@ -2378,7 +2370,7 @@ ac_fn_c_check_func () | |||
| 2378 | as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack | 2370 | as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack |
| 2379 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 | 2371 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 |
| 2380 | $as_echo_n "checking for $2... " >&6; } | 2372 | $as_echo_n "checking for $2... " >&6; } |
| 2381 | if eval \${$3+:} false; then : | 2373 | if eval "test \"\${$3+set}\"" = set; then : |
| 2382 | $as_echo_n "(cached) " >&6 | 2374 | $as_echo_n "(cached) " >&6 |
| 2383 | else | 2375 | else |
| 2384 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 2376 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -2433,7 +2425,7 @@ fi | |||
| 2433 | eval ac_res=\$$3 | 2425 | eval ac_res=\$$3 |
| 2434 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 | 2426 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 |
| 2435 | $as_echo "$ac_res" >&6; } | 2427 | $as_echo "$ac_res" >&6; } |
| 2436 | eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno | 2428 | eval $as_lineno_stack; test "x$as_lineno_stack" = x && { as_lineno=; unset as_lineno;} |
| 2437 | 2429 | ||
| 2438 | } # ac_fn_c_check_func | 2430 | } # ac_fn_c_check_func |
| 2439 | 2431 | ||
| @@ -2446,7 +2438,7 @@ ac_fn_c_check_type () | |||
| 2446 | as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack | 2438 | as_lineno=${as_lineno-"$1"} as_lineno_stack=as_lineno_stack=$as_lineno_stack |
| 2447 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 | 2439 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $2" >&5 |
| 2448 | $as_echo_n "checking for $2... " >&6; } | 2440 | $as_echo_n "checking for $2... " >&6; } |
| 2449 | if eval \${$3+:} false; then : | 2441 | if eval "test \"\${$3+set}\"" = set; then : |
| 2450 | $as_echo_n "(cached) " >&6 | 2442 | $as_echo_n "(cached) " >&6 |
| 2451 | else | 2443 | else |
| 2452 | eval "$3=no" | 2444 | eval "$3=no" |
| @@ -2487,7 +2479,7 @@ fi | |||
| 2487 | eval ac_res=\$$3 | 2479 | eval ac_res=\$$3 |
| 2488 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 | 2480 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_res" >&5 |
| 2489 | $as_echo "$ac_res" >&6; } | 2481 | $as_echo "$ac_res" >&6; } |
| 2490 | eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno | 2482 | eval $as_lineno_stack; test "x$as_lineno_stack" = x && { as_lineno=; unset as_lineno;} |
| 2491 | 2483 | ||
| 2492 | } # ac_fn_c_check_type | 2484 | } # ac_fn_c_check_type |
| 2493 | 2485 | ||
| @@ -2664,7 +2656,7 @@ rm -f core *.core core.conftest.* gmon.out bb.out conftest$ac_exeext \ | |||
| 2664 | rm -f conftest.val | 2656 | rm -f conftest.val |
| 2665 | 2657 | ||
| 2666 | fi | 2658 | fi |
| 2667 | eval $as_lineno_stack; ${as_lineno_stack:+:} unset as_lineno | 2659 | eval $as_lineno_stack; test "x$as_lineno_stack" = x && { as_lineno=; unset as_lineno;} |
| 2668 | as_fn_set_status $ac_retval | 2660 | as_fn_set_status $ac_retval |
| 2669 | 2661 | ||
| 2670 | } # ac_fn_c_compute_int | 2662 | } # ac_fn_c_compute_int |
| @@ -2673,7 +2665,7 @@ This file contains any messages produced by compilers while | |||
| 2673 | running configure, to aid debugging if configure makes a mistake. | 2665 | running configure, to aid debugging if configure makes a mistake. |
| 2674 | 2666 | ||
| 2675 | It was created by emacs $as_me 24.0.50, which was | 2667 | It was created by emacs $as_me 24.0.50, which was |
| 2676 | generated by GNU Autoconf 2.68. Invocation command line was | 2668 | generated by GNU Autoconf 2.67. Invocation command line was |
| 2677 | 2669 | ||
| 2678 | $ $0 $@ | 2670 | $ $0 $@ |
| 2679 | 2671 | ||
| @@ -2931,7 +2923,7 @@ $as_echo "$as_me: loading site script $ac_site_file" >&6;} | |||
| 2931 | || { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 | 2923 | || { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 |
| 2932 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} | 2924 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} |
| 2933 | as_fn_error $? "failed to load site script $ac_site_file | 2925 | as_fn_error $? "failed to load site script $ac_site_file |
| 2934 | See \`config.log' for more details" "$LINENO" 5; } | 2926 | See \`config.log' for more details" "$LINENO" 5 ; } |
| 2935 | fi | 2927 | fi |
| 2936 | done | 2928 | done |
| 2937 | 2929 | ||
| @@ -3086,7 +3078,7 @@ ac_configure="$SHELL $ac_aux_dir/configure" # Please don't use this var. | |||
| 3086 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for a BSD-compatible install" >&5 | 3078 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for a BSD-compatible install" >&5 |
| 3087 | $as_echo_n "checking for a BSD-compatible install... " >&6; } | 3079 | $as_echo_n "checking for a BSD-compatible install... " >&6; } |
| 3088 | if test -z "$INSTALL"; then | 3080 | if test -z "$INSTALL"; then |
| 3089 | if ${ac_cv_path_install+:} false; then : | 3081 | if test "${ac_cv_path_install+set}" = set; then : |
| 3090 | $as_echo_n "(cached) " >&6 | 3082 | $as_echo_n "(cached) " >&6 |
| 3091 | else | 3083 | else |
| 3092 | as_save_IFS=$IFS; IFS=$PATH_SEPARATOR | 3084 | as_save_IFS=$IFS; IFS=$PATH_SEPARATOR |
| @@ -3173,11 +3165,11 @@ am_lf=' | |||
| 3173 | ' | 3165 | ' |
| 3174 | case `pwd` in | 3166 | case `pwd` in |
| 3175 | *[\\\"\#\$\&\'\`$am_lf]*) | 3167 | *[\\\"\#\$\&\'\`$am_lf]*) |
| 3176 | as_fn_error $? "unsafe absolute working directory name" "$LINENO" 5;; | 3168 | as_fn_error $? "unsafe absolute working directory name" "$LINENO" 5 ;; |
| 3177 | esac | 3169 | esac |
| 3178 | case $srcdir in | 3170 | case $srcdir in |
| 3179 | *[\\\"\#\$\&\'\`$am_lf\ \ ]*) | 3171 | *[\\\"\#\$\&\'\`$am_lf\ \ ]*) |
| 3180 | as_fn_error $? "unsafe srcdir value: \`$srcdir'" "$LINENO" 5;; | 3172 | as_fn_error $? "unsafe srcdir value: \`$srcdir'" "$LINENO" 5 ;; |
| 3181 | esac | 3173 | esac |
| 3182 | 3174 | ||
| 3183 | # Do `set' in a subshell so we don't clobber the current shell's | 3175 | # Do `set' in a subshell so we don't clobber the current shell's |
| @@ -3263,7 +3255,7 @@ if test "$cross_compiling" != no; then | |||
| 3263 | set dummy ${ac_tool_prefix}strip; ac_word=$2 | 3255 | set dummy ${ac_tool_prefix}strip; ac_word=$2 |
| 3264 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 3256 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 3265 | $as_echo_n "checking for $ac_word... " >&6; } | 3257 | $as_echo_n "checking for $ac_word... " >&6; } |
| 3266 | if ${ac_cv_prog_STRIP+:} false; then : | 3258 | if test "${ac_cv_prog_STRIP+set}" = set; then : |
| 3267 | $as_echo_n "(cached) " >&6 | 3259 | $as_echo_n "(cached) " >&6 |
| 3268 | else | 3260 | else |
| 3269 | if test -n "$STRIP"; then | 3261 | if test -n "$STRIP"; then |
| @@ -3303,7 +3295,7 @@ if test -z "$ac_cv_prog_STRIP"; then | |||
| 3303 | set dummy strip; ac_word=$2 | 3295 | set dummy strip; ac_word=$2 |
| 3304 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 3296 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 3305 | $as_echo_n "checking for $ac_word... " >&6; } | 3297 | $as_echo_n "checking for $ac_word... " >&6; } |
| 3306 | if ${ac_cv_prog_ac_ct_STRIP+:} false; then : | 3298 | if test "${ac_cv_prog_ac_ct_STRIP+set}" = set; then : |
| 3307 | $as_echo_n "(cached) " >&6 | 3299 | $as_echo_n "(cached) " >&6 |
| 3308 | else | 3300 | else |
| 3309 | if test -n "$ac_ct_STRIP"; then | 3301 | if test -n "$ac_ct_STRIP"; then |
| @@ -3356,7 +3348,7 @@ INSTALL_STRIP_PROGRAM="\$(install_sh) -c -s" | |||
| 3356 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for a thread-safe mkdir -p" >&5 | 3348 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for a thread-safe mkdir -p" >&5 |
| 3357 | $as_echo_n "checking for a thread-safe mkdir -p... " >&6; } | 3349 | $as_echo_n "checking for a thread-safe mkdir -p... " >&6; } |
| 3358 | if test -z "$MKDIR_P"; then | 3350 | if test -z "$MKDIR_P"; then |
| 3359 | if ${ac_cv_path_mkdir+:} false; then : | 3351 | if test "${ac_cv_path_mkdir+set}" = set; then : |
| 3360 | $as_echo_n "(cached) " >&6 | 3352 | $as_echo_n "(cached) " >&6 |
| 3361 | else | 3353 | else |
| 3362 | as_save_IFS=$IFS; IFS=$PATH_SEPARATOR | 3354 | as_save_IFS=$IFS; IFS=$PATH_SEPARATOR |
| @@ -3408,7 +3400,7 @@ do | |||
| 3408 | set dummy $ac_prog; ac_word=$2 | 3400 | set dummy $ac_prog; ac_word=$2 |
| 3409 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 3401 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 3410 | $as_echo_n "checking for $ac_word... " >&6; } | 3402 | $as_echo_n "checking for $ac_word... " >&6; } |
| 3411 | if ${ac_cv_prog_AWK+:} false; then : | 3403 | if test "${ac_cv_prog_AWK+set}" = set; then : |
| 3412 | $as_echo_n "(cached) " >&6 | 3404 | $as_echo_n "(cached) " >&6 |
| 3413 | else | 3405 | else |
| 3414 | if test -n "$AWK"; then | 3406 | if test -n "$AWK"; then |
| @@ -3448,7 +3440,7 @@ done | |||
| 3448 | $as_echo_n "checking whether ${MAKE-make} sets \$(MAKE)... " >&6; } | 3440 | $as_echo_n "checking whether ${MAKE-make} sets \$(MAKE)... " >&6; } |
| 3449 | set x ${MAKE-make} | 3441 | set x ${MAKE-make} |
| 3450 | ac_make=`$as_echo "$2" | sed 's/+/p/g; s/[^a-zA-Z0-9_]/_/g'` | 3442 | ac_make=`$as_echo "$2" | sed 's/+/p/g; s/[^a-zA-Z0-9_]/_/g'` |
| 3451 | if eval \${ac_cv_prog_make_${ac_make}_set+:} false; then : | 3443 | if eval "test \"\${ac_cv_prog_make_${ac_make}_set+set}\"" = set; then : |
| 3452 | $as_echo_n "(cached) " >&6 | 3444 | $as_echo_n "(cached) " >&6 |
| 3453 | else | 3445 | else |
| 3454 | cat >conftest.make <<\_ACEOF | 3446 | cat >conftest.make <<\_ACEOF |
| @@ -4006,7 +3998,7 @@ do | |||
| 4006 | stringfreelist) ac_gc_check_string_free_list=1 ;; | 3998 | stringfreelist) ac_gc_check_string_free_list=1 ;; |
| 4007 | xmallocoverrun) ac_xmalloc_overrun=1 ;; | 3999 | xmallocoverrun) ac_xmalloc_overrun=1 ;; |
| 4008 | conslist) ac_gc_check_cons_list=1 ;; | 4000 | conslist) ac_gc_check_cons_list=1 ;; |
| 4009 | *) as_fn_error $? "unknown check category $check" "$LINENO" 5 ;; | 4001 | *) as_fn_error $? "unknown check category $check" "$LINENO" 5 ;; |
| 4010 | esac | 4002 | esac |
| 4011 | done | 4003 | done |
| 4012 | IFS="$ac_save_IFS" | 4004 | IFS="$ac_save_IFS" |
| @@ -4125,7 +4117,7 @@ $SHELL "$ac_aux_dir/config.sub" sun4 >/dev/null 2>&1 || | |||
| 4125 | 4117 | ||
| 4126 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking build system type" >&5 | 4118 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking build system type" >&5 |
| 4127 | $as_echo_n "checking build system type... " >&6; } | 4119 | $as_echo_n "checking build system type... " >&6; } |
| 4128 | if ${ac_cv_build+:} false; then : | 4120 | if test "${ac_cv_build+set}" = set; then : |
| 4129 | $as_echo_n "(cached) " >&6 | 4121 | $as_echo_n "(cached) " >&6 |
| 4130 | else | 4122 | else |
| 4131 | ac_build_alias=$build_alias | 4123 | ac_build_alias=$build_alias |
| @@ -4141,7 +4133,7 @@ fi | |||
| 4141 | $as_echo "$ac_cv_build" >&6; } | 4133 | $as_echo "$ac_cv_build" >&6; } |
| 4142 | case $ac_cv_build in | 4134 | case $ac_cv_build in |
| 4143 | *-*-*) ;; | 4135 | *-*-*) ;; |
| 4144 | *) as_fn_error $? "invalid value of canonical build" "$LINENO" 5;; | 4136 | *) as_fn_error $? "invalid value of canonical build" "$LINENO" 5 ;; |
| 4145 | esac | 4137 | esac |
| 4146 | build=$ac_cv_build | 4138 | build=$ac_cv_build |
| 4147 | ac_save_IFS=$IFS; IFS='-' | 4139 | ac_save_IFS=$IFS; IFS='-' |
| @@ -4159,7 +4151,7 @@ case $build_os in *\ *) build_os=`echo "$build_os" | sed 's/ /-/g'`;; esac | |||
| 4159 | 4151 | ||
| 4160 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking host system type" >&5 | 4152 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking host system type" >&5 |
| 4161 | $as_echo_n "checking host system type... " >&6; } | 4153 | $as_echo_n "checking host system type... " >&6; } |
| 4162 | if ${ac_cv_host+:} false; then : | 4154 | if test "${ac_cv_host+set}" = set; then : |
| 4163 | $as_echo_n "(cached) " >&6 | 4155 | $as_echo_n "(cached) " >&6 |
| 4164 | else | 4156 | else |
| 4165 | if test "x$host_alias" = x; then | 4157 | if test "x$host_alias" = x; then |
| @@ -4174,7 +4166,7 @@ fi | |||
| 4174 | $as_echo "$ac_cv_host" >&6; } | 4166 | $as_echo "$ac_cv_host" >&6; } |
| 4175 | case $ac_cv_host in | 4167 | case $ac_cv_host in |
| 4176 | *-*-*) ;; | 4168 | *-*-*) ;; |
| 4177 | *) as_fn_error $? "invalid value of canonical host" "$LINENO" 5;; | 4169 | *) as_fn_error $? "invalid value of canonical host" "$LINENO" 5 ;; |
| 4178 | esac | 4170 | esac |
| 4179 | host=$ac_cv_host | 4171 | host=$ac_cv_host |
| 4180 | ac_save_IFS=$IFS; IFS='-' | 4172 | ac_save_IFS=$IFS; IFS='-' |
| @@ -4456,7 +4448,7 @@ if test -n "$ac_tool_prefix"; then | |||
| 4456 | set dummy ${ac_tool_prefix}gcc; ac_word=$2 | 4448 | set dummy ${ac_tool_prefix}gcc; ac_word=$2 |
| 4457 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 4449 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 4458 | $as_echo_n "checking for $ac_word... " >&6; } | 4450 | $as_echo_n "checking for $ac_word... " >&6; } |
| 4459 | if ${ac_cv_prog_CC+:} false; then : | 4451 | if test "${ac_cv_prog_CC+set}" = set; then : |
| 4460 | $as_echo_n "(cached) " >&6 | 4452 | $as_echo_n "(cached) " >&6 |
| 4461 | else | 4453 | else |
| 4462 | if test -n "$CC"; then | 4454 | if test -n "$CC"; then |
| @@ -4496,7 +4488,7 @@ if test -z "$ac_cv_prog_CC"; then | |||
| 4496 | set dummy gcc; ac_word=$2 | 4488 | set dummy gcc; ac_word=$2 |
| 4497 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 4489 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 4498 | $as_echo_n "checking for $ac_word... " >&6; } | 4490 | $as_echo_n "checking for $ac_word... " >&6; } |
| 4499 | if ${ac_cv_prog_ac_ct_CC+:} false; then : | 4491 | if test "${ac_cv_prog_ac_ct_CC+set}" = set; then : |
| 4500 | $as_echo_n "(cached) " >&6 | 4492 | $as_echo_n "(cached) " >&6 |
| 4501 | else | 4493 | else |
| 4502 | if test -n "$ac_ct_CC"; then | 4494 | if test -n "$ac_ct_CC"; then |
| @@ -4549,7 +4541,7 @@ if test -z "$CC"; then | |||
| 4549 | set dummy ${ac_tool_prefix}cc; ac_word=$2 | 4541 | set dummy ${ac_tool_prefix}cc; ac_word=$2 |
| 4550 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 4542 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 4551 | $as_echo_n "checking for $ac_word... " >&6; } | 4543 | $as_echo_n "checking for $ac_word... " >&6; } |
| 4552 | if ${ac_cv_prog_CC+:} false; then : | 4544 | if test "${ac_cv_prog_CC+set}" = set; then : |
| 4553 | $as_echo_n "(cached) " >&6 | 4545 | $as_echo_n "(cached) " >&6 |
| 4554 | else | 4546 | else |
| 4555 | if test -n "$CC"; then | 4547 | if test -n "$CC"; then |
| @@ -4589,7 +4581,7 @@ if test -z "$CC"; then | |||
| 4589 | set dummy cc; ac_word=$2 | 4581 | set dummy cc; ac_word=$2 |
| 4590 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 4582 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 4591 | $as_echo_n "checking for $ac_word... " >&6; } | 4583 | $as_echo_n "checking for $ac_word... " >&6; } |
| 4592 | if ${ac_cv_prog_CC+:} false; then : | 4584 | if test "${ac_cv_prog_CC+set}" = set; then : |
| 4593 | $as_echo_n "(cached) " >&6 | 4585 | $as_echo_n "(cached) " >&6 |
| 4594 | else | 4586 | else |
| 4595 | if test -n "$CC"; then | 4587 | if test -n "$CC"; then |
| @@ -4648,7 +4640,7 @@ if test -z "$CC"; then | |||
| 4648 | set dummy $ac_tool_prefix$ac_prog; ac_word=$2 | 4640 | set dummy $ac_tool_prefix$ac_prog; ac_word=$2 |
| 4649 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 4641 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 4650 | $as_echo_n "checking for $ac_word... " >&6; } | 4642 | $as_echo_n "checking for $ac_word... " >&6; } |
| 4651 | if ${ac_cv_prog_CC+:} false; then : | 4643 | if test "${ac_cv_prog_CC+set}" = set; then : |
| 4652 | $as_echo_n "(cached) " >&6 | 4644 | $as_echo_n "(cached) " >&6 |
| 4653 | else | 4645 | else |
| 4654 | if test -n "$CC"; then | 4646 | if test -n "$CC"; then |
| @@ -4692,7 +4684,7 @@ do | |||
| 4692 | set dummy $ac_prog; ac_word=$2 | 4684 | set dummy $ac_prog; ac_word=$2 |
| 4693 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 4685 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 4694 | $as_echo_n "checking for $ac_word... " >&6; } | 4686 | $as_echo_n "checking for $ac_word... " >&6; } |
| 4695 | if ${ac_cv_prog_ac_ct_CC+:} false; then : | 4687 | if test "${ac_cv_prog_ac_ct_CC+set}" = set; then : |
| 4696 | $as_echo_n "(cached) " >&6 | 4688 | $as_echo_n "(cached) " >&6 |
| 4697 | else | 4689 | else |
| 4698 | if test -n "$ac_ct_CC"; then | 4690 | if test -n "$ac_ct_CC"; then |
| @@ -4747,7 +4739,7 @@ fi | |||
| 4747 | test -z "$CC" && { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 | 4739 | test -z "$CC" && { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 |
| 4748 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} | 4740 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} |
| 4749 | as_fn_error $? "no acceptable C compiler found in \$PATH | 4741 | as_fn_error $? "no acceptable C compiler found in \$PATH |
| 4750 | See \`config.log' for more details" "$LINENO" 5; } | 4742 | See \`config.log' for more details" "$LINENO" 5 ; } |
| 4751 | 4743 | ||
| 4752 | # Provide some information about the compiler. | 4744 | # Provide some information about the compiler. |
| 4753 | $as_echo "$as_me:${as_lineno-$LINENO}: checking for C compiler version" >&5 | 4745 | $as_echo "$as_me:${as_lineno-$LINENO}: checking for C compiler version" >&5 |
| @@ -4862,7 +4854,7 @@ sed 's/^/| /' conftest.$ac_ext >&5 | |||
| 4862 | { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 | 4854 | { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 |
| 4863 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} | 4855 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} |
| 4864 | as_fn_error 77 "C compiler cannot create executables | 4856 | as_fn_error 77 "C compiler cannot create executables |
| 4865 | See \`config.log' for more details" "$LINENO" 5; } | 4857 | See \`config.log' for more details" "$LINENO" 5 ; } |
| 4866 | else | 4858 | else |
| 4867 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5 | 4859 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5 |
| 4868 | $as_echo "yes" >&6; } | 4860 | $as_echo "yes" >&6; } |
| @@ -4905,7 +4897,7 @@ else | |||
| 4905 | { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 | 4897 | { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 |
| 4906 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} | 4898 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} |
| 4907 | as_fn_error $? "cannot compute suffix of executables: cannot compile and link | 4899 | as_fn_error $? "cannot compute suffix of executables: cannot compile and link |
| 4908 | See \`config.log' for more details" "$LINENO" 5; } | 4900 | See \`config.log' for more details" "$LINENO" 5 ; } |
| 4909 | fi | 4901 | fi |
| 4910 | rm -f conftest conftest$ac_cv_exeext | 4902 | rm -f conftest conftest$ac_cv_exeext |
| 4911 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_exeext" >&5 | 4903 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_exeext" >&5 |
| @@ -4964,7 +4956,7 @@ $as_echo "$ac_try_echo"; } >&5 | |||
| 4964 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} | 4956 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} |
| 4965 | as_fn_error $? "cannot run C compiled programs. | 4957 | as_fn_error $? "cannot run C compiled programs. |
| 4966 | If you meant to cross compile, use \`--host'. | 4958 | If you meant to cross compile, use \`--host'. |
| 4967 | See \`config.log' for more details" "$LINENO" 5; } | 4959 | See \`config.log' for more details" "$LINENO" 5 ; } |
| 4968 | fi | 4960 | fi |
| 4969 | fi | 4961 | fi |
| 4970 | fi | 4962 | fi |
| @@ -4975,7 +4967,7 @@ rm -f conftest.$ac_ext conftest$ac_cv_exeext conftest.out | |||
| 4975 | ac_clean_files=$ac_clean_files_save | 4967 | ac_clean_files=$ac_clean_files_save |
| 4976 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for suffix of object files" >&5 | 4968 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for suffix of object files" >&5 |
| 4977 | $as_echo_n "checking for suffix of object files... " >&6; } | 4969 | $as_echo_n "checking for suffix of object files... " >&6; } |
| 4978 | if ${ac_cv_objext+:} false; then : | 4970 | if test "${ac_cv_objext+set}" = set; then : |
| 4979 | $as_echo_n "(cached) " >&6 | 4971 | $as_echo_n "(cached) " >&6 |
| 4980 | else | 4972 | else |
| 4981 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 4973 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -5016,7 +5008,7 @@ sed 's/^/| /' conftest.$ac_ext >&5 | |||
| 5016 | { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 | 5008 | { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 |
| 5017 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} | 5009 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} |
| 5018 | as_fn_error $? "cannot compute suffix of object files: cannot compile | 5010 | as_fn_error $? "cannot compute suffix of object files: cannot compile |
| 5019 | See \`config.log' for more details" "$LINENO" 5; } | 5011 | See \`config.log' for more details" "$LINENO" 5 ; } |
| 5020 | fi | 5012 | fi |
| 5021 | rm -f conftest.$ac_cv_objext conftest.$ac_ext | 5013 | rm -f conftest.$ac_cv_objext conftest.$ac_ext |
| 5022 | fi | 5014 | fi |
| @@ -5026,7 +5018,7 @@ OBJEXT=$ac_cv_objext | |||
| 5026 | ac_objext=$OBJEXT | 5018 | ac_objext=$OBJEXT |
| 5027 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether we are using the GNU C compiler" >&5 | 5019 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether we are using the GNU C compiler" >&5 |
| 5028 | $as_echo_n "checking whether we are using the GNU C compiler... " >&6; } | 5020 | $as_echo_n "checking whether we are using the GNU C compiler... " >&6; } |
| 5029 | if ${ac_cv_c_compiler_gnu+:} false; then : | 5021 | if test "${ac_cv_c_compiler_gnu+set}" = set; then : |
| 5030 | $as_echo_n "(cached) " >&6 | 5022 | $as_echo_n "(cached) " >&6 |
| 5031 | else | 5023 | else |
| 5032 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 5024 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -5063,7 +5055,7 @@ ac_test_CFLAGS=${CFLAGS+set} | |||
| 5063 | ac_save_CFLAGS=$CFLAGS | 5055 | ac_save_CFLAGS=$CFLAGS |
| 5064 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $CC accepts -g" >&5 | 5056 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $CC accepts -g" >&5 |
| 5065 | $as_echo_n "checking whether $CC accepts -g... " >&6; } | 5057 | $as_echo_n "checking whether $CC accepts -g... " >&6; } |
| 5066 | if ${ac_cv_prog_cc_g+:} false; then : | 5058 | if test "${ac_cv_prog_cc_g+set}" = set; then : |
| 5067 | $as_echo_n "(cached) " >&6 | 5059 | $as_echo_n "(cached) " >&6 |
| 5068 | else | 5060 | else |
| 5069 | ac_save_c_werror_flag=$ac_c_werror_flag | 5061 | ac_save_c_werror_flag=$ac_c_werror_flag |
| @@ -5141,7 +5133,7 @@ else | |||
| 5141 | fi | 5133 | fi |
| 5142 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $CC option to accept ISO C89" >&5 | 5134 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $CC option to accept ISO C89" >&5 |
| 5143 | $as_echo_n "checking for $CC option to accept ISO C89... " >&6; } | 5135 | $as_echo_n "checking for $CC option to accept ISO C89... " >&6; } |
| 5144 | if ${ac_cv_prog_cc_c89+:} false; then : | 5136 | if test "${ac_cv_prog_cc_c89+set}" = set; then : |
| 5145 | $as_echo_n "(cached) " >&6 | 5137 | $as_echo_n "(cached) " >&6 |
| 5146 | else | 5138 | else |
| 5147 | ac_cv_prog_cc_c89=no | 5139 | ac_cv_prog_cc_c89=no |
| @@ -5302,7 +5294,7 @@ depcc="$CC" am_compiler_list= | |||
| 5302 | 5294 | ||
| 5303 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking dependency style of $depcc" >&5 | 5295 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking dependency style of $depcc" >&5 |
| 5304 | $as_echo_n "checking dependency style of $depcc... " >&6; } | 5296 | $as_echo_n "checking dependency style of $depcc... " >&6; } |
| 5305 | if ${am_cv_CC_dependencies_compiler_type+:} false; then : | 5297 | if test "${am_cv_CC_dependencies_compiler_type+set}" = set; then : |
| 5306 | $as_echo_n "(cached) " >&6 | 5298 | $as_echo_n "(cached) " >&6 |
| 5307 | else | 5299 | else |
| 5308 | if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then | 5300 | if test -z "$AMDEP_TRUE" && test -f "$am_depcomp"; then |
| @@ -5434,7 +5426,7 @@ $as_echo_n "checking whether cc understands -c and -o together... " >&6; } | |||
| 5434 | fi | 5426 | fi |
| 5435 | set dummy $CC; ac_cc=`$as_echo "$2" | | 5427 | set dummy $CC; ac_cc=`$as_echo "$2" | |
| 5436 | sed 's/[^a-zA-Z0-9_]/_/g;s/^[0-9]/_/'` | 5428 | sed 's/[^a-zA-Z0-9_]/_/g;s/^[0-9]/_/'` |
| 5437 | if eval \${ac_cv_prog_cc_${ac_cc}_c_o+:} false; then : | 5429 | if eval "test \"\${ac_cv_prog_cc_${ac_cc}_c_o+set}\"" = set; then : |
| 5438 | $as_echo_n "(cached) " >&6 | 5430 | $as_echo_n "(cached) " >&6 |
| 5439 | else | 5431 | else |
| 5440 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 5432 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -5558,7 +5550,7 @@ if test -n "$ac_tool_prefix"; then | |||
| 5558 | set dummy ${ac_tool_prefix}ranlib; ac_word=$2 | 5550 | set dummy ${ac_tool_prefix}ranlib; ac_word=$2 |
| 5559 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 5551 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 5560 | $as_echo_n "checking for $ac_word... " >&6; } | 5552 | $as_echo_n "checking for $ac_word... " >&6; } |
| 5561 | if ${ac_cv_prog_RANLIB+:} false; then : | 5553 | if test "${ac_cv_prog_RANLIB+set}" = set; then : |
| 5562 | $as_echo_n "(cached) " >&6 | 5554 | $as_echo_n "(cached) " >&6 |
| 5563 | else | 5555 | else |
| 5564 | if test -n "$RANLIB"; then | 5556 | if test -n "$RANLIB"; then |
| @@ -5598,7 +5590,7 @@ if test -z "$ac_cv_prog_RANLIB"; then | |||
| 5598 | set dummy ranlib; ac_word=$2 | 5590 | set dummy ranlib; ac_word=$2 |
| 5599 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 5591 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 5600 | $as_echo_n "checking for $ac_word... " >&6; } | 5592 | $as_echo_n "checking for $ac_word... " >&6; } |
| 5601 | if ${ac_cv_prog_ac_ct_RANLIB+:} false; then : | 5593 | if test "${ac_cv_prog_ac_ct_RANLIB+set}" = set; then : |
| 5602 | $as_echo_n "(cached) " >&6 | 5594 | $as_echo_n "(cached) " >&6 |
| 5603 | else | 5595 | else |
| 5604 | if test -n "$ac_ct_RANLIB"; then | 5596 | if test -n "$ac_ct_RANLIB"; then |
| @@ -5658,7 +5650,7 @@ if test -n "$CPP" && test -d "$CPP"; then | |||
| 5658 | CPP= | 5650 | CPP= |
| 5659 | fi | 5651 | fi |
| 5660 | if test -z "$CPP"; then | 5652 | if test -z "$CPP"; then |
| 5661 | if ${ac_cv_prog_CPP+:} false; then : | 5653 | if test "${ac_cv_prog_CPP+set}" = set; then : |
| 5662 | $as_echo_n "(cached) " >&6 | 5654 | $as_echo_n "(cached) " >&6 |
| 5663 | else | 5655 | else |
| 5664 | # Double quotes because CPP needs to be expanded | 5656 | # Double quotes because CPP needs to be expanded |
| @@ -5774,7 +5766,7 @@ else | |||
| 5774 | { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 | 5766 | { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 |
| 5775 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} | 5767 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} |
| 5776 | as_fn_error $? "C preprocessor \"$CPP\" fails sanity check | 5768 | as_fn_error $? "C preprocessor \"$CPP\" fails sanity check |
| 5777 | See \`config.log' for more details" "$LINENO" 5; } | 5769 | See \`config.log' for more details" "$LINENO" 5 ; } |
| 5778 | fi | 5770 | fi |
| 5779 | 5771 | ||
| 5780 | ac_ext=c | 5772 | ac_ext=c |
| @@ -5786,7 +5778,7 @@ ac_compiler_gnu=$ac_cv_c_compiler_gnu | |||
| 5786 | 5778 | ||
| 5787 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for grep that handles long lines and -e" >&5 | 5779 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for grep that handles long lines and -e" >&5 |
| 5788 | $as_echo_n "checking for grep that handles long lines and -e... " >&6; } | 5780 | $as_echo_n "checking for grep that handles long lines and -e... " >&6; } |
| 5789 | if ${ac_cv_path_GREP+:} false; then : | 5781 | if test "${ac_cv_path_GREP+set}" = set; then : |
| 5790 | $as_echo_n "(cached) " >&6 | 5782 | $as_echo_n "(cached) " >&6 |
| 5791 | else | 5783 | else |
| 5792 | if test -z "$GREP"; then | 5784 | if test -z "$GREP"; then |
| @@ -5849,7 +5841,7 @@ $as_echo "$ac_cv_path_GREP" >&6; } | |||
| 5849 | 5841 | ||
| 5850 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for egrep" >&5 | 5842 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for egrep" >&5 |
| 5851 | $as_echo_n "checking for egrep... " >&6; } | 5843 | $as_echo_n "checking for egrep... " >&6; } |
| 5852 | if ${ac_cv_path_EGREP+:} false; then : | 5844 | if test "${ac_cv_path_EGREP+set}" = set; then : |
| 5853 | $as_echo_n "(cached) " >&6 | 5845 | $as_echo_n "(cached) " >&6 |
| 5854 | else | 5846 | else |
| 5855 | if echo a | $GREP -E '(a|b)' >/dev/null 2>&1 | 5847 | if echo a | $GREP -E '(a|b)' >/dev/null 2>&1 |
| @@ -5916,7 +5908,7 @@ $as_echo "$ac_cv_path_EGREP" >&6; } | |||
| 5916 | 5908 | ||
| 5917 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for ANSI C header files" >&5 | 5909 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for ANSI C header files" >&5 |
| 5918 | $as_echo_n "checking for ANSI C header files... " >&6; } | 5910 | $as_echo_n "checking for ANSI C header files... " >&6; } |
| 5919 | if ${ac_cv_header_stdc+:} false; then : | 5911 | if test "${ac_cv_header_stdc+set}" = set; then : |
| 5920 | $as_echo_n "(cached) " >&6 | 5912 | $as_echo_n "(cached) " >&6 |
| 5921 | else | 5913 | else |
| 5922 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 5914 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -6047,7 +6039,7 @@ done | |||
| 6047 | 6039 | ||
| 6048 | 6040 | ||
| 6049 | ac_fn_c_check_header_mongrel "$LINENO" "minix/config.h" "ac_cv_header_minix_config_h" "$ac_includes_default" | 6041 | ac_fn_c_check_header_mongrel "$LINENO" "minix/config.h" "ac_cv_header_minix_config_h" "$ac_includes_default" |
| 6050 | if test "x$ac_cv_header_minix_config_h" = xyes; then : | 6042 | if test "x$ac_cv_header_minix_config_h" = x""yes; then : |
| 6051 | MINIX=yes | 6043 | MINIX=yes |
| 6052 | else | 6044 | else |
| 6053 | MINIX= | 6045 | MINIX= |
| @@ -6077,7 +6069,7 @@ $as_echo "#define _XOPEN_SOURCE 500" >>confdefs.h | |||
| 6077 | 6069 | ||
| 6078 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether it is safe to define __EXTENSIONS__" >&5 | 6070 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether it is safe to define __EXTENSIONS__" >&5 |
| 6079 | $as_echo_n "checking whether it is safe to define __EXTENSIONS__... " >&6; } | 6071 | $as_echo_n "checking whether it is safe to define __EXTENSIONS__... " >&6; } |
| 6080 | if ${ac_cv_safe_to_define___extensions__+:} false; then : | 6072 | if test "${ac_cv_safe_to_define___extensions__+set}" = set; then : |
| 6081 | $as_echo_n "(cached) " >&6 | 6073 | $as_echo_n "(cached) " >&6 |
| 6082 | else | 6074 | else |
| 6083 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 6075 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -6166,7 +6158,7 @@ if test x"$GCC" != xyes && test x"$emacs_check_sunpro_c" = xyes && \ | |||
| 6166 | test x"$CPP" = x; then | 6158 | test x"$CPP" = x; then |
| 6167 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether we are using a Sun C compiler" >&5 | 6159 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether we are using a Sun C compiler" >&5 |
| 6168 | $as_echo_n "checking whether we are using a Sun C compiler... " >&6; } | 6160 | $as_echo_n "checking whether we are using a Sun C compiler... " >&6; } |
| 6169 | if ${emacs_cv_sunpro_c+:} false; then : | 6161 | if test "${emacs_cv_sunpro_c+set}" = set; then : |
| 6170 | $as_echo_n "(cached) " >&6 | 6162 | $as_echo_n "(cached) " >&6 |
| 6171 | else | 6163 | else |
| 6172 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 6164 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -6334,7 +6326,7 @@ if test -n "$CPP" && test -d "$CPP"; then | |||
| 6334 | CPP= | 6326 | CPP= |
| 6335 | fi | 6327 | fi |
| 6336 | if test -z "$CPP"; then | 6328 | if test -z "$CPP"; then |
| 6337 | if ${ac_cv_prog_CPP+:} false; then : | 6329 | if test "${ac_cv_prog_CPP+set}" = set; then : |
| 6338 | $as_echo_n "(cached) " >&6 | 6330 | $as_echo_n "(cached) " >&6 |
| 6339 | else | 6331 | else |
| 6340 | # Double quotes because CPP needs to be expanded | 6332 | # Double quotes because CPP needs to be expanded |
| @@ -6450,7 +6442,7 @@ else | |||
| 6450 | { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 | 6442 | { { $as_echo "$as_me:${as_lineno-$LINENO}: error: in \`$ac_pwd':" >&5 |
| 6451 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} | 6443 | $as_echo "$as_me: error: in \`$ac_pwd':" >&2;} |
| 6452 | as_fn_error $? "C preprocessor \"$CPP\" fails sanity check | 6444 | as_fn_error $? "C preprocessor \"$CPP\" fails sanity check |
| 6453 | See \`config.log' for more details" "$LINENO" 5; } | 6445 | See \`config.log' for more details" "$LINENO" 5 ; } |
| 6454 | fi | 6446 | fi |
| 6455 | 6447 | ||
| 6456 | ac_ext=c | 6448 | ac_ext=c |
| @@ -6466,7 +6458,7 @@ if test "x$RANLIB" = x; then | |||
| 6466 | set dummy ${ac_tool_prefix}ranlib; ac_word=$2 | 6458 | set dummy ${ac_tool_prefix}ranlib; ac_word=$2 |
| 6467 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 6459 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 6468 | $as_echo_n "checking for $ac_word... " >&6; } | 6460 | $as_echo_n "checking for $ac_word... " >&6; } |
| 6469 | if ${ac_cv_prog_RANLIB+:} false; then : | 6461 | if test "${ac_cv_prog_RANLIB+set}" = set; then : |
| 6470 | $as_echo_n "(cached) " >&6 | 6462 | $as_echo_n "(cached) " >&6 |
| 6471 | else | 6463 | else |
| 6472 | if test -n "$RANLIB"; then | 6464 | if test -n "$RANLIB"; then |
| @@ -6506,7 +6498,7 @@ if test -z "$ac_cv_prog_RANLIB"; then | |||
| 6506 | set dummy ranlib; ac_word=$2 | 6498 | set dummy ranlib; ac_word=$2 |
| 6507 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 6499 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 6508 | $as_echo_n "checking for $ac_word... " >&6; } | 6500 | $as_echo_n "checking for $ac_word... " >&6; } |
| 6509 | if ${ac_cv_prog_ac_ct_RANLIB+:} false; then : | 6501 | if test "${ac_cv_prog_ac_ct_RANLIB+set}" = set; then : |
| 6510 | $as_echo_n "(cached) " >&6 | 6502 | $as_echo_n "(cached) " >&6 |
| 6511 | else | 6503 | else |
| 6512 | if test -n "$ac_ct_RANLIB"; then | 6504 | if test -n "$ac_ct_RANLIB"; then |
| @@ -6561,7 +6553,7 @@ fi | |||
| 6561 | ## is running in i386 mode, we can help them out. | 6553 | ## is running in i386 mode, we can help them out. |
| 6562 | if test "$machine" = "amdx86-64"; then | 6554 | if test "$machine" = "amdx86-64"; then |
| 6563 | ac_fn_c_check_decl "$LINENO" "i386" "ac_cv_have_decl_i386" "$ac_includes_default" | 6555 | ac_fn_c_check_decl "$LINENO" "i386" "ac_cv_have_decl_i386" "$ac_includes_default" |
| 6564 | if test "x$ac_cv_have_decl_i386" = xyes; then : | 6556 | if test "x$ac_cv_have_decl_i386" = x""yes; then : |
| 6565 | 6557 | ||
| 6566 | fi | 6558 | fi |
| 6567 | 6559 | ||
| @@ -6576,7 +6568,7 @@ fi | |||
| 6576 | set dummy install-info; ac_word=$2 | 6568 | set dummy install-info; ac_word=$2 |
| 6577 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 6569 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 6578 | $as_echo_n "checking for $ac_word... " >&6; } | 6570 | $as_echo_n "checking for $ac_word... " >&6; } |
| 6579 | if ${ac_cv_path_INSTALL_INFO+:} false; then : | 6571 | if test "${ac_cv_path_INSTALL_INFO+set}" = set; then : |
| 6580 | $as_echo_n "(cached) " >&6 | 6572 | $as_echo_n "(cached) " >&6 |
| 6581 | else | 6573 | else |
| 6582 | case $INSTALL_INFO in | 6574 | case $INSTALL_INFO in |
| @@ -6616,7 +6608,7 @@ fi | |||
| 6616 | set dummy install-info; ac_word=$2 | 6608 | set dummy install-info; ac_word=$2 |
| 6617 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 6609 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 6618 | $as_echo_n "checking for $ac_word... " >&6; } | 6610 | $as_echo_n "checking for $ac_word... " >&6; } |
| 6619 | if ${ac_cv_path_INSTALL_INFO+:} false; then : | 6611 | if test "${ac_cv_path_INSTALL_INFO+set}" = set; then : |
| 6620 | $as_echo_n "(cached) " >&6 | 6612 | $as_echo_n "(cached) " >&6 |
| 6621 | else | 6613 | else |
| 6622 | case $INSTALL_INFO in | 6614 | case $INSTALL_INFO in |
| @@ -6656,7 +6648,7 @@ fi | |||
| 6656 | set dummy install-info; ac_word=$2 | 6648 | set dummy install-info; ac_word=$2 |
| 6657 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 6649 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 6658 | $as_echo_n "checking for $ac_word... " >&6; } | 6650 | $as_echo_n "checking for $ac_word... " >&6; } |
| 6659 | if ${ac_cv_path_INSTALL_INFO+:} false; then : | 6651 | if test "${ac_cv_path_INSTALL_INFO+set}" = set; then : |
| 6660 | $as_echo_n "(cached) " >&6 | 6652 | $as_echo_n "(cached) " >&6 |
| 6661 | else | 6653 | else |
| 6662 | case $INSTALL_INFO in | 6654 | case $INSTALL_INFO in |
| @@ -6697,7 +6689,7 @@ fi | |||
| 6697 | set dummy gzip; ac_word=$2 | 6689 | set dummy gzip; ac_word=$2 |
| 6698 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 6690 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 6699 | $as_echo_n "checking for $ac_word... " >&6; } | 6691 | $as_echo_n "checking for $ac_word... " >&6; } |
| 6700 | if ${ac_cv_path_GZIP_PROG+:} false; then : | 6692 | if test "${ac_cv_path_GZIP_PROG+set}" = set; then : |
| 6701 | $as_echo_n "(cached) " >&6 | 6693 | $as_echo_n "(cached) " >&6 |
| 6702 | else | 6694 | else |
| 6703 | case $GZIP_PROG in | 6695 | case $GZIP_PROG in |
| @@ -6740,7 +6732,7 @@ fi | |||
| 6740 | set dummy makeinfo; ac_word=$2 | 6732 | set dummy makeinfo; ac_word=$2 |
| 6741 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 6733 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 6742 | $as_echo_n "checking for $ac_word... " >&6; } | 6734 | $as_echo_n "checking for $ac_word... " >&6; } |
| 6743 | if ${ac_cv_path_MAKEINFO+:} false; then : | 6735 | if test "${ac_cv_path_MAKEINFO+set}" = set; then : |
| 6744 | $as_echo_n "(cached) " >&6 | 6736 | $as_echo_n "(cached) " >&6 |
| 6745 | else | 6737 | else |
| 6746 | case $MAKEINFO in | 6738 | case $MAKEINFO in |
| @@ -6946,7 +6938,7 @@ esac | |||
| 6946 | C_SWITCH_MACHINE= | 6938 | C_SWITCH_MACHINE= |
| 6947 | if test "$machine" = "alpha"; then | 6939 | if test "$machine" = "alpha"; then |
| 6948 | ac_fn_c_check_decl "$LINENO" "__ELF__" "ac_cv_have_decl___ELF__" "$ac_includes_default" | 6940 | ac_fn_c_check_decl "$LINENO" "__ELF__" "ac_cv_have_decl___ELF__" "$ac_includes_default" |
| 6949 | if test "x$ac_cv_have_decl___ELF__" = xyes; then : | 6941 | if test "x$ac_cv_have_decl___ELF__" = x""yes; then : |
| 6950 | 6942 | ||
| 6951 | fi | 6943 | fi |
| 6952 | 6944 | ||
| @@ -7014,7 +7006,7 @@ if test "$enable_largefile" != no; then | |||
| 7014 | 7006 | ||
| 7015 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for special C compiler options needed for large files" >&5 | 7007 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for special C compiler options needed for large files" >&5 |
| 7016 | $as_echo_n "checking for special C compiler options needed for large files... " >&6; } | 7008 | $as_echo_n "checking for special C compiler options needed for large files... " >&6; } |
| 7017 | if ${ac_cv_sys_largefile_CC+:} false; then : | 7009 | if test "${ac_cv_sys_largefile_CC+set}" = set; then : |
| 7018 | $as_echo_n "(cached) " >&6 | 7010 | $as_echo_n "(cached) " >&6 |
| 7019 | else | 7011 | else |
| 7020 | ac_cv_sys_largefile_CC=no | 7012 | ac_cv_sys_largefile_CC=no |
| @@ -7065,7 +7057,7 @@ $as_echo "$ac_cv_sys_largefile_CC" >&6; } | |||
| 7065 | 7057 | ||
| 7066 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for _FILE_OFFSET_BITS value needed for large files" >&5 | 7058 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for _FILE_OFFSET_BITS value needed for large files" >&5 |
| 7067 | $as_echo_n "checking for _FILE_OFFSET_BITS value needed for large files... " >&6; } | 7059 | $as_echo_n "checking for _FILE_OFFSET_BITS value needed for large files... " >&6; } |
| 7068 | if ${ac_cv_sys_file_offset_bits+:} false; then : | 7060 | if test "${ac_cv_sys_file_offset_bits+set}" = set; then : |
| 7069 | $as_echo_n "(cached) " >&6 | 7061 | $as_echo_n "(cached) " >&6 |
| 7070 | else | 7062 | else |
| 7071 | while :; do | 7063 | while :; do |
| @@ -7134,7 +7126,7 @@ rm -rf conftest* | |||
| 7134 | if test $ac_cv_sys_file_offset_bits = unknown; then | 7126 | if test $ac_cv_sys_file_offset_bits = unknown; then |
| 7135 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for _LARGE_FILES value needed for large files" >&5 | 7127 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for _LARGE_FILES value needed for large files" >&5 |
| 7136 | $as_echo_n "checking for _LARGE_FILES value needed for large files... " >&6; } | 7128 | $as_echo_n "checking for _LARGE_FILES value needed for large files... " >&6; } |
| 7137 | if ${ac_cv_sys_large_files+:} false; then : | 7129 | if test "${ac_cv_sys_large_files+set}" = set; then : |
| 7138 | $as_echo_n "(cached) " >&6 | 7130 | $as_echo_n "(cached) " >&6 |
| 7139 | else | 7131 | else |
| 7140 | while :; do | 7132 | while :; do |
| @@ -7302,7 +7294,7 @@ done | |||
| 7302 | # Emulation library used on NetBSD. | 7294 | # Emulation library used on NetBSD. |
| 7303 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for _oss_ioctl in -lossaudio" >&5 | 7295 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for _oss_ioctl in -lossaudio" >&5 |
| 7304 | $as_echo_n "checking for _oss_ioctl in -lossaudio... " >&6; } | 7296 | $as_echo_n "checking for _oss_ioctl in -lossaudio... " >&6; } |
| 7305 | if ${ac_cv_lib_ossaudio__oss_ioctl+:} false; then : | 7297 | if test "${ac_cv_lib_ossaudio__oss_ioctl+set}" = set; then : |
| 7306 | $as_echo_n "(cached) " >&6 | 7298 | $as_echo_n "(cached) " >&6 |
| 7307 | else | 7299 | else |
| 7308 | ac_check_lib_save_LIBS=$LIBS | 7300 | ac_check_lib_save_LIBS=$LIBS |
| @@ -7336,7 +7328,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 7336 | fi | 7328 | fi |
| 7337 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_ossaudio__oss_ioctl" >&5 | 7329 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_ossaudio__oss_ioctl" >&5 |
| 7338 | $as_echo "$ac_cv_lib_ossaudio__oss_ioctl" >&6; } | 7330 | $as_echo "$ac_cv_lib_ossaudio__oss_ioctl" >&6; } |
| 7339 | if test "x$ac_cv_lib_ossaudio__oss_ioctl" = xyes; then : | 7331 | if test "x$ac_cv_lib_ossaudio__oss_ioctl" = x""yes; then : |
| 7340 | LIBSOUND=-lossaudio | 7332 | LIBSOUND=-lossaudio |
| 7341 | else | 7333 | else |
| 7342 | LIBSOUND= | 7334 | LIBSOUND= |
| @@ -7353,7 +7345,7 @@ fi | |||
| 7353 | set dummy pkg-config; ac_word=$2 | 7345 | set dummy pkg-config; ac_word=$2 |
| 7354 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 7346 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 7355 | $as_echo_n "checking for $ac_word... " >&6; } | 7347 | $as_echo_n "checking for $ac_word... " >&6; } |
| 7356 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 7348 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 7357 | $as_echo_n "(cached) " >&6 | 7349 | $as_echo_n "(cached) " >&6 |
| 7358 | else | 7350 | else |
| 7359 | case $PKG_CONFIG in | 7351 | case $PKG_CONFIG in |
| @@ -7557,7 +7549,7 @@ fi | |||
| 7557 | for ac_header in term.h | 7549 | for ac_header in term.h |
| 7558 | do : | 7550 | do : |
| 7559 | ac_fn_c_check_header_preproc "$LINENO" "term.h" "ac_cv_header_term_h" | 7551 | ac_fn_c_check_header_preproc "$LINENO" "term.h" "ac_cv_header_term_h" |
| 7560 | if test "x$ac_cv_header_term_h" = xyes; then : | 7552 | if test "x$ac_cv_header_term_h" = x""yes; then : |
| 7561 | cat >>confdefs.h <<_ACEOF | 7553 | cat >>confdefs.h <<_ACEOF |
| 7562 | #define HAVE_TERM_H 1 | 7554 | #define HAVE_TERM_H 1 |
| 7563 | _ACEOF | 7555 | _ACEOF |
| @@ -7568,7 +7560,7 @@ done | |||
| 7568 | 7560 | ||
| 7569 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for ANSI C header files" >&5 | 7561 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for ANSI C header files" >&5 |
| 7570 | $as_echo_n "checking for ANSI C header files... " >&6; } | 7562 | $as_echo_n "checking for ANSI C header files... " >&6; } |
| 7571 | if ${ac_cv_header_stdc+:} false; then : | 7563 | if test "${ac_cv_header_stdc+set}" = set; then : |
| 7572 | $as_echo_n "(cached) " >&6 | 7564 | $as_echo_n "(cached) " >&6 |
| 7573 | else | 7565 | else |
| 7574 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 7566 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -7680,7 +7672,7 @@ fi | |||
| 7680 | 7672 | ||
| 7681 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether time.h and sys/time.h may both be included" >&5 | 7673 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether time.h and sys/time.h may both be included" >&5 |
| 7682 | $as_echo_n "checking whether time.h and sys/time.h may both be included... " >&6; } | 7674 | $as_echo_n "checking whether time.h and sys/time.h may both be included... " >&6; } |
| 7683 | if ${ac_cv_header_time+:} false; then : | 7675 | if test "${ac_cv_header_time+set}" = set; then : |
| 7684 | $as_echo_n "(cached) " >&6 | 7676 | $as_echo_n "(cached) " >&6 |
| 7685 | else | 7677 | else |
| 7686 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 7678 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -7714,7 +7706,7 @@ $as_echo "#define TIME_WITH_SYS_TIME 1" >>confdefs.h | |||
| 7714 | fi | 7706 | fi |
| 7715 | 7707 | ||
| 7716 | ac_fn_c_check_decl "$LINENO" "sys_siglist" "ac_cv_have_decl_sys_siglist" "$ac_includes_default" | 7708 | ac_fn_c_check_decl "$LINENO" "sys_siglist" "ac_cv_have_decl_sys_siglist" "$ac_includes_default" |
| 7717 | if test "x$ac_cv_have_decl_sys_siglist" = xyes; then : | 7709 | if test "x$ac_cv_have_decl_sys_siglist" = x""yes; then : |
| 7718 | ac_have_decl=1 | 7710 | ac_have_decl=1 |
| 7719 | else | 7711 | else |
| 7720 | ac_have_decl=0 | 7712 | ac_have_decl=0 |
| @@ -7727,7 +7719,7 @@ _ACEOF | |||
| 7727 | if test $ac_cv_have_decl_sys_siglist != yes; then | 7719 | if test $ac_cv_have_decl_sys_siglist != yes; then |
| 7728 | # For Tru64, at least: | 7720 | # For Tru64, at least: |
| 7729 | ac_fn_c_check_decl "$LINENO" "__sys_siglist" "ac_cv_have_decl___sys_siglist" "$ac_includes_default" | 7721 | ac_fn_c_check_decl "$LINENO" "__sys_siglist" "ac_cv_have_decl___sys_siglist" "$ac_includes_default" |
| 7730 | if test "x$ac_cv_have_decl___sys_siglist" = xyes; then : | 7722 | if test "x$ac_cv_have_decl___sys_siglist" = x""yes; then : |
| 7731 | ac_have_decl=1 | 7723 | ac_have_decl=1 |
| 7732 | else | 7724 | else |
| 7733 | ac_have_decl=0 | 7725 | ac_have_decl=0 |
| @@ -7745,7 +7737,7 @@ $as_echo "#define sys_siglist __sys_siglist" >>confdefs.h | |||
| 7745 | fi | 7737 | fi |
| 7746 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for sys/wait.h that is POSIX.1 compatible" >&5 | 7738 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for sys/wait.h that is POSIX.1 compatible" >&5 |
| 7747 | $as_echo_n "checking for sys/wait.h that is POSIX.1 compatible... " >&6; } | 7739 | $as_echo_n "checking for sys/wait.h that is POSIX.1 compatible... " >&6; } |
| 7748 | if ${ac_cv_header_sys_wait_h+:} false; then : | 7740 | if test "${ac_cv_header_sys_wait_h+set}" = set; then : |
| 7749 | $as_echo_n "(cached) " >&6 | 7741 | $as_echo_n "(cached) " >&6 |
| 7750 | else | 7742 | else |
| 7751 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 7743 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -7787,7 +7779,7 @@ fi | |||
| 7787 | 7779 | ||
| 7788 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for struct utimbuf" >&5 | 7780 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for struct utimbuf" >&5 |
| 7789 | $as_echo_n "checking for struct utimbuf... " >&6; } | 7781 | $as_echo_n "checking for struct utimbuf... " >&6; } |
| 7790 | if ${emacs_cv_struct_utimbuf+:} false; then : | 7782 | if test "${emacs_cv_struct_utimbuf+set}" = set; then : |
| 7791 | $as_echo_n "(cached) " >&6 | 7783 | $as_echo_n "(cached) " >&6 |
| 7792 | else | 7784 | else |
| 7793 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 7785 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -7830,7 +7822,7 @@ fi | |||
| 7830 | 7822 | ||
| 7831 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking return type of signal handlers" >&5 | 7823 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking return type of signal handlers" >&5 |
| 7832 | $as_echo_n "checking return type of signal handlers... " >&6; } | 7824 | $as_echo_n "checking return type of signal handlers... " >&6; } |
| 7833 | if ${ac_cv_type_signal+:} false; then : | 7825 | if test "${ac_cv_type_signal+set}" = set; then : |
| 7834 | $as_echo_n "(cached) " >&6 | 7826 | $as_echo_n "(cached) " >&6 |
| 7835 | else | 7827 | else |
| 7836 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 7828 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -7864,7 +7856,7 @@ _ACEOF | |||
| 7864 | 7856 | ||
| 7865 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for speed_t" >&5 | 7857 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for speed_t" >&5 |
| 7866 | $as_echo_n "checking for speed_t... " >&6; } | 7858 | $as_echo_n "checking for speed_t... " >&6; } |
| 7867 | if ${emacs_cv_speed_t+:} false; then : | 7859 | if test "${emacs_cv_speed_t+set}" = set; then : |
| 7868 | $as_echo_n "(cached) " >&6 | 7860 | $as_echo_n "(cached) " >&6 |
| 7869 | else | 7861 | else |
| 7870 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 7862 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -7895,7 +7887,7 @@ fi | |||
| 7895 | 7887 | ||
| 7896 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for struct timeval" >&5 | 7888 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for struct timeval" >&5 |
| 7897 | $as_echo_n "checking for struct timeval... " >&6; } | 7889 | $as_echo_n "checking for struct timeval... " >&6; } |
| 7898 | if ${emacs_cv_struct_timeval+:} false; then : | 7890 | if test "${emacs_cv_struct_timeval+set}" = set; then : |
| 7899 | $as_echo_n "(cached) " >&6 | 7891 | $as_echo_n "(cached) " >&6 |
| 7900 | else | 7892 | else |
| 7901 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 7893 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -7936,7 +7928,7 @@ fi | |||
| 7936 | 7928 | ||
| 7937 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for struct exception" >&5 | 7929 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for struct exception" >&5 |
| 7938 | $as_echo_n "checking for struct exception... " >&6; } | 7930 | $as_echo_n "checking for struct exception... " >&6; } |
| 7939 | if ${emacs_cv_struct_exception+:} false; then : | 7931 | if test "${emacs_cv_struct_exception+set}" = set; then : |
| 7940 | $as_echo_n "(cached) " >&6 | 7932 | $as_echo_n "(cached) " >&6 |
| 7941 | else | 7933 | else |
| 7942 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 7934 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -7969,7 +7961,7 @@ fi | |||
| 7969 | for ac_header in sys/socket.h | 7961 | for ac_header in sys/socket.h |
| 7970 | do : | 7962 | do : |
| 7971 | ac_fn_c_check_header_mongrel "$LINENO" "sys/socket.h" "ac_cv_header_sys_socket_h" "$ac_includes_default" | 7963 | ac_fn_c_check_header_mongrel "$LINENO" "sys/socket.h" "ac_cv_header_sys_socket_h" "$ac_includes_default" |
| 7972 | if test "x$ac_cv_header_sys_socket_h" = xyes; then : | 7964 | if test "x$ac_cv_header_sys_socket_h" = x""yes; then : |
| 7973 | cat >>confdefs.h <<_ACEOF | 7965 | cat >>confdefs.h <<_ACEOF |
| 7974 | #define HAVE_SYS_SOCKET_H 1 | 7966 | #define HAVE_SYS_SOCKET_H 1 |
| 7975 | _ACEOF | 7967 | _ACEOF |
| @@ -7985,7 +7977,7 @@ do : | |||
| 7985 | #include <sys/socket.h> | 7977 | #include <sys/socket.h> |
| 7986 | #endif | 7978 | #endif |
| 7987 | " | 7979 | " |
| 7988 | if test "x$ac_cv_header_net_if_h" = xyes; then : | 7980 | if test "x$ac_cv_header_net_if_h" = x""yes; then : |
| 7989 | cat >>confdefs.h <<_ACEOF | 7981 | cat >>confdefs.h <<_ACEOF |
| 7990 | #define HAVE_NET_IF_H 1 | 7982 | #define HAVE_NET_IF_H 1 |
| 7991 | _ACEOF | 7983 | _ACEOF |
| @@ -7997,7 +7989,7 @@ done | |||
| 7997 | 7989 | ||
| 7998 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether struct tm is in sys/time.h or time.h" >&5 | 7990 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether struct tm is in sys/time.h or time.h" >&5 |
| 7999 | $as_echo_n "checking whether struct tm is in sys/time.h or time.h... " >&6; } | 7991 | $as_echo_n "checking whether struct tm is in sys/time.h or time.h... " >&6; } |
| 8000 | if ${ac_cv_struct_tm+:} false; then : | 7992 | if test "${ac_cv_struct_tm+set}" = set; then : |
| 8001 | $as_echo_n "(cached) " >&6 | 7993 | $as_echo_n "(cached) " >&6 |
| 8002 | else | 7994 | else |
| 8003 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 7995 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -8034,7 +8026,7 @@ ac_fn_c_check_member "$LINENO" "struct tm" "tm_zone" "ac_cv_member_struct_tm_tm_ | |||
| 8034 | #include <$ac_cv_struct_tm> | 8026 | #include <$ac_cv_struct_tm> |
| 8035 | 8027 | ||
| 8036 | " | 8028 | " |
| 8037 | if test "x$ac_cv_member_struct_tm_tm_zone" = xyes; then : | 8029 | if test "x$ac_cv_member_struct_tm_tm_zone" = x""yes; then : |
| 8038 | 8030 | ||
| 8039 | cat >>confdefs.h <<_ACEOF | 8031 | cat >>confdefs.h <<_ACEOF |
| 8040 | #define HAVE_STRUCT_TM_TM_ZONE 1 | 8032 | #define HAVE_STRUCT_TM_TM_ZONE 1 |
| @@ -8050,7 +8042,7 @@ $as_echo "#define HAVE_TM_ZONE 1" >>confdefs.h | |||
| 8050 | else | 8042 | else |
| 8051 | ac_fn_c_check_decl "$LINENO" "tzname" "ac_cv_have_decl_tzname" "#include <time.h> | 8043 | ac_fn_c_check_decl "$LINENO" "tzname" "ac_cv_have_decl_tzname" "#include <time.h> |
| 8052 | " | 8044 | " |
| 8053 | if test "x$ac_cv_have_decl_tzname" = xyes; then : | 8045 | if test "x$ac_cv_have_decl_tzname" = x""yes; then : |
| 8054 | ac_have_decl=1 | 8046 | ac_have_decl=1 |
| 8055 | else | 8047 | else |
| 8056 | ac_have_decl=0 | 8048 | ac_have_decl=0 |
| @@ -8062,7 +8054,7 @@ _ACEOF | |||
| 8062 | 8054 | ||
| 8063 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for tzname" >&5 | 8055 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for tzname" >&5 |
| 8064 | $as_echo_n "checking for tzname... " >&6; } | 8056 | $as_echo_n "checking for tzname... " >&6; } |
| 8065 | if ${ac_cv_var_tzname+:} false; then : | 8057 | if test "${ac_cv_var_tzname+set}" = set; then : |
| 8066 | $as_echo_n "(cached) " >&6 | 8058 | $as_echo_n "(cached) " >&6 |
| 8067 | else | 8059 | else |
| 8068 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 8060 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -8099,7 +8091,7 @@ fi | |||
| 8099 | 8091 | ||
| 8100 | ac_fn_c_check_member "$LINENO" "struct tm" "tm_gmtoff" "ac_cv_member_struct_tm_tm_gmtoff" "#include <time.h> | 8092 | ac_fn_c_check_member "$LINENO" "struct tm" "tm_gmtoff" "ac_cv_member_struct_tm_tm_gmtoff" "#include <time.h> |
| 8101 | " | 8093 | " |
| 8102 | if test "x$ac_cv_member_struct_tm_tm_gmtoff" = xyes; then : | 8094 | if test "x$ac_cv_member_struct_tm_tm_gmtoff" = x""yes; then : |
| 8103 | 8095 | ||
| 8104 | $as_echo "#define HAVE_TM_GMTOFF 1" >>confdefs.h | 8096 | $as_echo "#define HAVE_TM_GMTOFF 1" >>confdefs.h |
| 8105 | 8097 | ||
| @@ -8113,7 +8105,7 @@ ac_fn_c_check_member "$LINENO" "struct ifreq" "ifr_flags" "ac_cv_member_struct_i | |||
| 8113 | #include <net/if.h> | 8105 | #include <net/if.h> |
| 8114 | #endif | 8106 | #endif |
| 8115 | " | 8107 | " |
| 8116 | if test "x$ac_cv_member_struct_ifreq_ifr_flags" = xyes; then : | 8108 | if test "x$ac_cv_member_struct_ifreq_ifr_flags" = x""yes; then : |
| 8117 | 8109 | ||
| 8118 | cat >>confdefs.h <<_ACEOF | 8110 | cat >>confdefs.h <<_ACEOF |
| 8119 | #define HAVE_STRUCT_IFREQ_IFR_FLAGS 1 | 8111 | #define HAVE_STRUCT_IFREQ_IFR_FLAGS 1 |
| @@ -8129,7 +8121,7 @@ ac_fn_c_check_member "$LINENO" "struct ifreq" "ifr_hwaddr" "ac_cv_member_struct_ | |||
| 8129 | #include <net/if.h> | 8121 | #include <net/if.h> |
| 8130 | #endif | 8122 | #endif |
| 8131 | " | 8123 | " |
| 8132 | if test "x$ac_cv_member_struct_ifreq_ifr_hwaddr" = xyes; then : | 8124 | if test "x$ac_cv_member_struct_ifreq_ifr_hwaddr" = x""yes; then : |
| 8133 | 8125 | ||
| 8134 | cat >>confdefs.h <<_ACEOF | 8126 | cat >>confdefs.h <<_ACEOF |
| 8135 | #define HAVE_STRUCT_IFREQ_IFR_HWADDR 1 | 8127 | #define HAVE_STRUCT_IFREQ_IFR_HWADDR 1 |
| @@ -8145,7 +8137,7 @@ ac_fn_c_check_member "$LINENO" "struct ifreq" "ifr_netmask" "ac_cv_member_struct | |||
| 8145 | #include <net/if.h> | 8137 | #include <net/if.h> |
| 8146 | #endif | 8138 | #endif |
| 8147 | " | 8139 | " |
| 8148 | if test "x$ac_cv_member_struct_ifreq_ifr_netmask" = xyes; then : | 8140 | if test "x$ac_cv_member_struct_ifreq_ifr_netmask" = x""yes; then : |
| 8149 | 8141 | ||
| 8150 | cat >>confdefs.h <<_ACEOF | 8142 | cat >>confdefs.h <<_ACEOF |
| 8151 | #define HAVE_STRUCT_IFREQ_IFR_NETMASK 1 | 8143 | #define HAVE_STRUCT_IFREQ_IFR_NETMASK 1 |
| @@ -8161,7 +8153,7 @@ ac_fn_c_check_member "$LINENO" "struct ifreq" "ifr_broadaddr" "ac_cv_member_stru | |||
| 8161 | #include <net/if.h> | 8153 | #include <net/if.h> |
| 8162 | #endif | 8154 | #endif |
| 8163 | " | 8155 | " |
| 8164 | if test "x$ac_cv_member_struct_ifreq_ifr_broadaddr" = xyes; then : | 8156 | if test "x$ac_cv_member_struct_ifreq_ifr_broadaddr" = x""yes; then : |
| 8165 | 8157 | ||
| 8166 | cat >>confdefs.h <<_ACEOF | 8158 | cat >>confdefs.h <<_ACEOF |
| 8167 | #define HAVE_STRUCT_IFREQ_IFR_BROADADDR 1 | 8159 | #define HAVE_STRUCT_IFREQ_IFR_BROADADDR 1 |
| @@ -8177,7 +8169,7 @@ ac_fn_c_check_member "$LINENO" "struct ifreq" "ifr_addr" "ac_cv_member_struct_if | |||
| 8177 | #include <net/if.h> | 8169 | #include <net/if.h> |
| 8178 | #endif | 8170 | #endif |
| 8179 | " | 8171 | " |
| 8180 | if test "x$ac_cv_member_struct_ifreq_ifr_addr" = xyes; then : | 8172 | if test "x$ac_cv_member_struct_ifreq_ifr_addr" = x""yes; then : |
| 8181 | 8173 | ||
| 8182 | cat >>confdefs.h <<_ACEOF | 8174 | cat >>confdefs.h <<_ACEOF |
| 8183 | #define HAVE_STRUCT_IFREQ_IFR_ADDR 1 | 8175 | #define HAVE_STRUCT_IFREQ_IFR_ADDR 1 |
| @@ -8206,7 +8198,7 @@ fi | |||
| 8206 | 8198 | ||
| 8207 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working volatile" >&5 | 8199 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working volatile" >&5 |
| 8208 | $as_echo_n "checking for working volatile... " >&6; } | 8200 | $as_echo_n "checking for working volatile... " >&6; } |
| 8209 | if ${ac_cv_c_volatile+:} false; then : | 8201 | if test "${ac_cv_c_volatile+set}" = set; then : |
| 8210 | $as_echo_n "(cached) " >&6 | 8202 | $as_echo_n "(cached) " >&6 |
| 8211 | else | 8203 | else |
| 8212 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 8204 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -8240,7 +8232,7 @@ fi | |||
| 8240 | 8232 | ||
| 8241 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for an ANSI C-conforming const" >&5 | 8233 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for an ANSI C-conforming const" >&5 |
| 8242 | $as_echo_n "checking for an ANSI C-conforming const... " >&6; } | 8234 | $as_echo_n "checking for an ANSI C-conforming const... " >&6; } |
| 8243 | if ${ac_cv_c_const+:} false; then : | 8235 | if test "${ac_cv_c_const+set}" = set; then : |
| 8244 | $as_echo_n "(cached) " >&6 | 8236 | $as_echo_n "(cached) " >&6 |
| 8245 | else | 8237 | else |
| 8246 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 8238 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -8320,7 +8312,7 @@ fi | |||
| 8320 | 8312 | ||
| 8321 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for void * support" >&5 | 8313 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for void * support" >&5 |
| 8322 | $as_echo_n "checking for void * support... " >&6; } | 8314 | $as_echo_n "checking for void * support... " >&6; } |
| 8323 | if ${emacs_cv_void_star+:} false; then : | 8315 | if test "${emacs_cv_void_star+set}" = set; then : |
| 8324 | $as_echo_n "(cached) " >&6 | 8316 | $as_echo_n "(cached) " >&6 |
| 8325 | else | 8317 | else |
| 8326 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 8318 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -8353,7 +8345,7 @@ fi | |||
| 8353 | 8345 | ||
| 8354 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether byte ordering is bigendian" >&5 | 8346 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether byte ordering is bigendian" >&5 |
| 8355 | $as_echo_n "checking whether byte ordering is bigendian... " >&6; } | 8347 | $as_echo_n "checking whether byte ordering is bigendian... " >&6; } |
| 8356 | if ${ac_cv_c_bigendian+:} false; then : | 8348 | if test "${ac_cv_c_bigendian+set}" = set; then : |
| 8357 | $as_echo_n "(cached) " >&6 | 8349 | $as_echo_n "(cached) " >&6 |
| 8358 | else | 8350 | else |
| 8359 | ac_cv_c_bigendian=unknown | 8351 | ac_cv_c_bigendian=unknown |
| @@ -8572,13 +8564,13 @@ $as_echo "#define AC_APPLE_UNIVERSAL_BUILD 1" >>confdefs.h | |||
| 8572 | ;; #( | 8564 | ;; #( |
| 8573 | *) | 8565 | *) |
| 8574 | as_fn_error $? "unknown endianness | 8566 | as_fn_error $? "unknown endianness |
| 8575 | presetting ac_cv_c_bigendian=no (or yes) will help" "$LINENO" 5 ;; | 8567 | presetting ac_cv_c_bigendian=no (or yes) will help" "$LINENO" 5 ;; |
| 8576 | esac | 8568 | esac |
| 8577 | 8569 | ||
| 8578 | 8570 | ||
| 8579 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for __attribute__ ((__aligned__ (expr)))" >&5 | 8571 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for __attribute__ ((__aligned__ (expr)))" >&5 |
| 8580 | $as_echo_n "checking for __attribute__ ((__aligned__ (expr)))... " >&6; } | 8572 | $as_echo_n "checking for __attribute__ ((__aligned__ (expr)))... " >&6; } |
| 8581 | if ${emacs_cv_attribute_aligned+:} false; then : | 8573 | if test "${emacs_cv_attribute_aligned+set}" = set; then : |
| 8582 | $as_echo_n "(cached) " >&6 | 8574 | $as_echo_n "(cached) " >&6 |
| 8583 | else | 8575 | else |
| 8584 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 8576 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -8611,7 +8603,7 @@ fi | |||
| 8611 | $as_echo_n "checking whether ${MAKE-make} sets \$(MAKE)... " >&6; } | 8603 | $as_echo_n "checking whether ${MAKE-make} sets \$(MAKE)... " >&6; } |
| 8612 | set x ${MAKE-make} | 8604 | set x ${MAKE-make} |
| 8613 | ac_make=`$as_echo "$2" | sed 's/+/p/g; s/[^a-zA-Z0-9_]/_/g'` | 8605 | ac_make=`$as_echo "$2" | sed 's/+/p/g; s/[^a-zA-Z0-9_]/_/g'` |
| 8614 | if eval \${ac_cv_prog_make_${ac_make}_set+:} false; then : | 8606 | if eval "test \"\${ac_cv_prog_make_${ac_make}_set+set}\"" = set; then : |
| 8615 | $as_echo_n "(cached) " >&6 | 8607 | $as_echo_n "(cached) " >&6 |
| 8616 | else | 8608 | else |
| 8617 | cat >conftest.make <<\_ACEOF | 8609 | cat >conftest.make <<\_ACEOF |
| @@ -8699,7 +8691,7 @@ deps_frag=$srcdir/src/$deps_frag | |||
| 8699 | 8691 | ||
| 8700 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for long file names" >&5 | 8692 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for long file names" >&5 |
| 8701 | $as_echo_n "checking for long file names... " >&6; } | 8693 | $as_echo_n "checking for long file names... " >&6; } |
| 8702 | if ${ac_cv_sys_long_file_names+:} false; then : | 8694 | if test "${ac_cv_sys_long_file_names+set}" = set; then : |
| 8703 | $as_echo_n "(cached) " >&6 | 8695 | $as_echo_n "(cached) " >&6 |
| 8704 | else | 8696 | else |
| 8705 | ac_cv_sys_long_file_names=yes | 8697 | ac_cv_sys_long_file_names=yes |
| @@ -8755,8 +8747,8 @@ if test "x$with_x" = xno; then | |||
| 8755 | have_x=disabled | 8747 | have_x=disabled |
| 8756 | else | 8748 | else |
| 8757 | case $x_includes,$x_libraries in #( | 8749 | case $x_includes,$x_libraries in #( |
| 8758 | *\'*) as_fn_error $? "cannot use X directory names containing '" "$LINENO" 5;; #( | 8750 | *\'*) as_fn_error $? "cannot use X directory names containing '" "$LINENO" 5 ;; #( |
| 8759 | *,NONE | NONE,*) if ${ac_cv_have_x+:} false; then : | 8751 | *,NONE | NONE,*) if test "${ac_cv_have_x+set}" = set; then : |
| 8760 | $as_echo_n "(cached) " >&6 | 8752 | $as_echo_n "(cached) " >&6 |
| 8761 | else | 8753 | else |
| 8762 | # One or both of the vars are not set, and there is no cached value. | 8754 | # One or both of the vars are not set, and there is no cached value. |
| @@ -9039,7 +9031,7 @@ if test "${with_ns}" != no; then | |||
| 9039 | TEMACS_LDFLAGS2= | 9031 | TEMACS_LDFLAGS2= |
| 9040 | fi | 9032 | fi |
| 9041 | ac_fn_c_check_header_mongrel "$LINENO" "AppKit/AppKit.h" "ac_cv_header_AppKit_AppKit_h" "$ac_includes_default" | 9033 | ac_fn_c_check_header_mongrel "$LINENO" "AppKit/AppKit.h" "ac_cv_header_AppKit_AppKit_h" "$ac_includes_default" |
| 9042 | if test "x$ac_cv_header_AppKit_AppKit_h" = xyes; then : | 9034 | if test "x$ac_cv_header_AppKit_AppKit_h" = x""yes; then : |
| 9043 | HAVE_NS=yes | 9035 | HAVE_NS=yes |
| 9044 | else | 9036 | else |
| 9045 | as_fn_error $? "\`--with-ns' was specified, but the include | 9037 | as_fn_error $? "\`--with-ns' was specified, but the include |
| @@ -9124,7 +9116,7 @@ if test "$window_system" = none && test "X$with_x" != "Xno"; then | |||
| 9124 | set dummy X; ac_word=$2 | 9116 | set dummy X; ac_word=$2 |
| 9125 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 9117 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 9126 | $as_echo_n "checking for $ac_word... " >&6; } | 9118 | $as_echo_n "checking for $ac_word... " >&6; } |
| 9127 | if ${ac_cv_prog_HAVE_XSERVER+:} false; then : | 9119 | if test "${ac_cv_prog_HAVE_XSERVER+set}" = set; then : |
| 9128 | $as_echo_n "(cached) " >&6 | 9120 | $as_echo_n "(cached) " >&6 |
| 9129 | else | 9121 | else |
| 9130 | if test -n "$HAVE_XSERVER"; then | 9122 | if test -n "$HAVE_XSERVER"; then |
| @@ -9183,14 +9175,14 @@ esac | |||
| 9183 | GNU_MALLOC=yes | 9175 | GNU_MALLOC=yes |
| 9184 | doug_lea_malloc=yes | 9176 | doug_lea_malloc=yes |
| 9185 | ac_fn_c_check_func "$LINENO" "malloc_get_state" "ac_cv_func_malloc_get_state" | 9177 | ac_fn_c_check_func "$LINENO" "malloc_get_state" "ac_cv_func_malloc_get_state" |
| 9186 | if test "x$ac_cv_func_malloc_get_state" = xyes; then : | 9178 | if test "x$ac_cv_func_malloc_get_state" = x""yes; then : |
| 9187 | 9179 | ||
| 9188 | else | 9180 | else |
| 9189 | doug_lea_malloc=no | 9181 | doug_lea_malloc=no |
| 9190 | fi | 9182 | fi |
| 9191 | 9183 | ||
| 9192 | ac_fn_c_check_func "$LINENO" "malloc_set_state" "ac_cv_func_malloc_set_state" | 9184 | ac_fn_c_check_func "$LINENO" "malloc_set_state" "ac_cv_func_malloc_set_state" |
| 9193 | if test "x$ac_cv_func_malloc_set_state" = xyes; then : | 9185 | if test "x$ac_cv_func_malloc_set_state" = x""yes; then : |
| 9194 | 9186 | ||
| 9195 | else | 9187 | else |
| 9196 | doug_lea_malloc=no | 9188 | doug_lea_malloc=no |
| @@ -9198,7 +9190,7 @@ fi | |||
| 9198 | 9190 | ||
| 9199 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether __after_morecore_hook exists" >&5 | 9191 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether __after_morecore_hook exists" >&5 |
| 9200 | $as_echo_n "checking whether __after_morecore_hook exists... " >&6; } | 9192 | $as_echo_n "checking whether __after_morecore_hook exists... " >&6; } |
| 9201 | if ${emacs_cv_var___after_morecore_hook+:} false; then : | 9193 | if test "${emacs_cv_var___after_morecore_hook+set}" = set; then : |
| 9202 | $as_echo_n "(cached) " >&6 | 9194 | $as_echo_n "(cached) " >&6 |
| 9203 | else | 9195 | else |
| 9204 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 9196 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -9303,7 +9295,7 @@ done | |||
| 9303 | for ac_func in getpagesize | 9295 | for ac_func in getpagesize |
| 9304 | do : | 9296 | do : |
| 9305 | ac_fn_c_check_func "$LINENO" "getpagesize" "ac_cv_func_getpagesize" | 9297 | ac_fn_c_check_func "$LINENO" "getpagesize" "ac_cv_func_getpagesize" |
| 9306 | if test "x$ac_cv_func_getpagesize" = xyes; then : | 9298 | if test "x$ac_cv_func_getpagesize" = x""yes; then : |
| 9307 | cat >>confdefs.h <<_ACEOF | 9299 | cat >>confdefs.h <<_ACEOF |
| 9308 | #define HAVE_GETPAGESIZE 1 | 9300 | #define HAVE_GETPAGESIZE 1 |
| 9309 | _ACEOF | 9301 | _ACEOF |
| @@ -9313,7 +9305,7 @@ done | |||
| 9313 | 9305 | ||
| 9314 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working mmap" >&5 | 9306 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working mmap" >&5 |
| 9315 | $as_echo_n "checking for working mmap... " >&6; } | 9307 | $as_echo_n "checking for working mmap... " >&6; } |
| 9316 | if ${ac_cv_func_mmap_fixed_mapped+:} false; then : | 9308 | if test "${ac_cv_func_mmap_fixed_mapped+set}" = set; then : |
| 9317 | $as_echo_n "(cached) " >&6 | 9309 | $as_echo_n "(cached) " >&6 |
| 9318 | else | 9310 | else |
| 9319 | if test "$cross_compiling" = yes; then : | 9311 | if test "$cross_compiling" = yes; then : |
| @@ -9488,7 +9480,7 @@ LIBS="$LIBS_SYSTEM $LIBS" | |||
| 9488 | 9480 | ||
| 9489 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for dnet_ntoa in -ldnet" >&5 | 9481 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for dnet_ntoa in -ldnet" >&5 |
| 9490 | $as_echo_n "checking for dnet_ntoa in -ldnet... " >&6; } | 9482 | $as_echo_n "checking for dnet_ntoa in -ldnet... " >&6; } |
| 9491 | if ${ac_cv_lib_dnet_dnet_ntoa+:} false; then : | 9483 | if test "${ac_cv_lib_dnet_dnet_ntoa+set}" = set; then : |
| 9492 | $as_echo_n "(cached) " >&6 | 9484 | $as_echo_n "(cached) " >&6 |
| 9493 | else | 9485 | else |
| 9494 | ac_check_lib_save_LIBS=$LIBS | 9486 | ac_check_lib_save_LIBS=$LIBS |
| @@ -9522,7 +9514,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 9522 | fi | 9514 | fi |
| 9523 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_dnet_dnet_ntoa" >&5 | 9515 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_dnet_dnet_ntoa" >&5 |
| 9524 | $as_echo "$ac_cv_lib_dnet_dnet_ntoa" >&6; } | 9516 | $as_echo "$ac_cv_lib_dnet_dnet_ntoa" >&6; } |
| 9525 | if test "x$ac_cv_lib_dnet_dnet_ntoa" = xyes; then : | 9517 | if test "x$ac_cv_lib_dnet_dnet_ntoa" = x""yes; then : |
| 9526 | cat >>confdefs.h <<_ACEOF | 9518 | cat >>confdefs.h <<_ACEOF |
| 9527 | #define HAVE_LIBDNET 1 | 9519 | #define HAVE_LIBDNET 1 |
| 9528 | _ACEOF | 9520 | _ACEOF |
| @@ -9534,7 +9526,7 @@ fi | |||
| 9534 | 9526 | ||
| 9535 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for main in -lXbsd" >&5 | 9527 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for main in -lXbsd" >&5 |
| 9536 | $as_echo_n "checking for main in -lXbsd... " >&6; } | 9528 | $as_echo_n "checking for main in -lXbsd... " >&6; } |
| 9537 | if ${ac_cv_lib_Xbsd_main+:} false; then : | 9529 | if test "${ac_cv_lib_Xbsd_main+set}" = set; then : |
| 9538 | $as_echo_n "(cached) " >&6 | 9530 | $as_echo_n "(cached) " >&6 |
| 9539 | else | 9531 | else |
| 9540 | ac_check_lib_save_LIBS=$LIBS | 9532 | ac_check_lib_save_LIBS=$LIBS |
| @@ -9562,14 +9554,14 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 9562 | fi | 9554 | fi |
| 9563 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xbsd_main" >&5 | 9555 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xbsd_main" >&5 |
| 9564 | $as_echo "$ac_cv_lib_Xbsd_main" >&6; } | 9556 | $as_echo "$ac_cv_lib_Xbsd_main" >&6; } |
| 9565 | if test "x$ac_cv_lib_Xbsd_main" = xyes; then : | 9557 | if test "x$ac_cv_lib_Xbsd_main" = x""yes; then : |
| 9566 | LD_SWITCH_X_SITE="$LD_SWITCH_X_SITE -lXbsd" | 9558 | LD_SWITCH_X_SITE="$LD_SWITCH_X_SITE -lXbsd" |
| 9567 | fi | 9559 | fi |
| 9568 | 9560 | ||
| 9569 | 9561 | ||
| 9570 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for cma_open in -lpthreads" >&5 | 9562 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for cma_open in -lpthreads" >&5 |
| 9571 | $as_echo_n "checking for cma_open in -lpthreads... " >&6; } | 9563 | $as_echo_n "checking for cma_open in -lpthreads... " >&6; } |
| 9572 | if ${ac_cv_lib_pthreads_cma_open+:} false; then : | 9564 | if test "${ac_cv_lib_pthreads_cma_open+set}" = set; then : |
| 9573 | $as_echo_n "(cached) " >&6 | 9565 | $as_echo_n "(cached) " >&6 |
| 9574 | else | 9566 | else |
| 9575 | ac_check_lib_save_LIBS=$LIBS | 9567 | ac_check_lib_save_LIBS=$LIBS |
| @@ -9603,7 +9595,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 9603 | fi | 9595 | fi |
| 9604 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_pthreads_cma_open" >&5 | 9596 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_pthreads_cma_open" >&5 |
| 9605 | $as_echo "$ac_cv_lib_pthreads_cma_open" >&6; } | 9597 | $as_echo "$ac_cv_lib_pthreads_cma_open" >&6; } |
| 9606 | if test "x$ac_cv_lib_pthreads_cma_open" = xyes; then : | 9598 | if test "x$ac_cv_lib_pthreads_cma_open" = x""yes; then : |
| 9607 | cat >>confdefs.h <<_ACEOF | 9599 | cat >>confdefs.h <<_ACEOF |
| 9608 | #define HAVE_LIBPTHREADS 1 | 9600 | #define HAVE_LIBPTHREADS 1 |
| 9609 | _ACEOF | 9601 | _ACEOF |
| @@ -9630,7 +9622,7 @@ case ${host_os} in | |||
| 9630 | aix*) | 9622 | aix*) |
| 9631 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for -bbigtoc option" >&5 | 9623 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for -bbigtoc option" >&5 |
| 9632 | $as_echo_n "checking for -bbigtoc option... " >&6; } | 9624 | $as_echo_n "checking for -bbigtoc option... " >&6; } |
| 9633 | if ${gdb_cv_bigtoc+:} false; then : | 9625 | if test "${gdb_cv_bigtoc+set}" = set; then : |
| 9634 | $as_echo_n "(cached) " >&6 | 9626 | $as_echo_n "(cached) " >&6 |
| 9635 | else | 9627 | else |
| 9636 | 9628 | ||
| @@ -9804,7 +9796,7 @@ fi | |||
| 9804 | if test "${window_system}" = "x11"; then | 9796 | if test "${window_system}" = "x11"; then |
| 9805 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking X11 version 6" >&5 | 9797 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking X11 version 6" >&5 |
| 9806 | $as_echo_n "checking X11 version 6... " >&6; } | 9798 | $as_echo_n "checking X11 version 6... " >&6; } |
| 9807 | if ${emacs_cv_x11_version_6+:} false; then : | 9799 | if test "${emacs_cv_x11_version_6+set}" = set; then : |
| 9808 | $as_echo_n "(cached) " >&6 | 9800 | $as_echo_n "(cached) " >&6 |
| 9809 | else | 9801 | else |
| 9810 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 9802 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -9869,7 +9861,7 @@ if test "${HAVE_X11}" = "yes" || test "${NS_IMPL_GNUSTEP}" = "yes"; then | |||
| 9869 | set dummy pkg-config; ac_word=$2 | 9861 | set dummy pkg-config; ac_word=$2 |
| 9870 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 9862 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 9871 | $as_echo_n "checking for $ac_word... " >&6; } | 9863 | $as_echo_n "checking for $ac_word... " >&6; } |
| 9872 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 9864 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 9873 | $as_echo_n "(cached) " >&6 | 9865 | $as_echo_n "(cached) " >&6 |
| 9874 | else | 9866 | else |
| 9875 | case $PKG_CONFIG in | 9867 | case $PKG_CONFIG in |
| @@ -9980,7 +9972,7 @@ if test "${HAVE_X11}" = "yes"; then | |||
| 9980 | set dummy pkg-config; ac_word=$2 | 9972 | set dummy pkg-config; ac_word=$2 |
| 9981 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 9973 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 9982 | $as_echo_n "checking for $ac_word... " >&6; } | 9974 | $as_echo_n "checking for $ac_word... " >&6; } |
| 9983 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 9975 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 9984 | $as_echo_n "(cached) " >&6 | 9976 | $as_echo_n "(cached) " >&6 |
| 9985 | else | 9977 | else |
| 9986 | case $PKG_CONFIG in | 9978 | case $PKG_CONFIG in |
| @@ -10079,7 +10071,7 @@ $as_echo "#define HAVE_IMAGEMAGICK 1" >>confdefs.h | |||
| 10079 | for ac_func in MagickExportImagePixels | 10071 | for ac_func in MagickExportImagePixels |
| 10080 | do : | 10072 | do : |
| 10081 | ac_fn_c_check_func "$LINENO" "MagickExportImagePixels" "ac_cv_func_MagickExportImagePixels" | 10073 | ac_fn_c_check_func "$LINENO" "MagickExportImagePixels" "ac_cv_func_MagickExportImagePixels" |
| 10082 | if test "x$ac_cv_func_MagickExportImagePixels" = xyes; then : | 10074 | if test "x$ac_cv_func_MagickExportImagePixels" = x""yes; then : |
| 10083 | cat >>confdefs.h <<_ACEOF | 10075 | cat >>confdefs.h <<_ACEOF |
| 10084 | #define HAVE_MAGICKEXPORTIMAGEPIXELS 1 | 10076 | #define HAVE_MAGICKEXPORTIMAGEPIXELS 1 |
| 10085 | _ACEOF | 10077 | _ACEOF |
| @@ -10105,7 +10097,7 @@ if test "${with_gtk3}" = "yes"; then | |||
| 10105 | set dummy pkg-config; ac_word=$2 | 10097 | set dummy pkg-config; ac_word=$2 |
| 10106 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 10098 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 10107 | $as_echo_n "checking for $ac_word... " >&6; } | 10099 | $as_echo_n "checking for $ac_word... " >&6; } |
| 10108 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 10100 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 10109 | $as_echo_n "(cached) " >&6 | 10101 | $as_echo_n "(cached) " >&6 |
| 10110 | else | 10102 | else |
| 10111 | case $PKG_CONFIG in | 10103 | case $PKG_CONFIG in |
| @@ -10211,7 +10203,7 @@ if test "${with_gtk}" = "yes" || test "$USE_X_TOOLKIT" = "maybe"; then | |||
| 10211 | set dummy pkg-config; ac_word=$2 | 10203 | set dummy pkg-config; ac_word=$2 |
| 10212 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 10204 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 10213 | $as_echo_n "checking for $ac_word... " >&6; } | 10205 | $as_echo_n "checking for $ac_word... " >&6; } |
| 10214 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 10206 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 10215 | $as_echo_n "(cached) " >&6 | 10207 | $as_echo_n "(cached) " >&6 |
| 10216 | else | 10208 | else |
| 10217 | case $PKG_CONFIG in | 10209 | case $PKG_CONFIG in |
| @@ -10316,7 +10308,7 @@ if test x"$pkg_check_gtk" = xyes; then | |||
| 10316 | for ac_func in gtk_main | 10308 | for ac_func in gtk_main |
| 10317 | do : | 10309 | do : |
| 10318 | ac_fn_c_check_func "$LINENO" "gtk_main" "ac_cv_func_gtk_main" | 10310 | ac_fn_c_check_func "$LINENO" "gtk_main" "ac_cv_func_gtk_main" |
| 10319 | if test "x$ac_cv_func_gtk_main" = xyes; then : | 10311 | if test "x$ac_cv_func_gtk_main" = x""yes; then : |
| 10320 | cat >>confdefs.h <<_ACEOF | 10312 | cat >>confdefs.h <<_ACEOF |
| 10321 | #define HAVE_GTK_MAIN 1 | 10313 | #define HAVE_GTK_MAIN 1 |
| 10322 | _ACEOF | 10314 | _ACEOF |
| @@ -10326,7 +10318,7 @@ done | |||
| 10326 | 10318 | ||
| 10327 | if test "${GTK_COMPILES}" != "yes"; then | 10319 | if test "${GTK_COMPILES}" != "yes"; then |
| 10328 | if test "$USE_X_TOOLKIT" != "maybe"; then | 10320 | if test "$USE_X_TOOLKIT" != "maybe"; then |
| 10329 | as_fn_error $? "Gtk+ wanted, but it does not compile, see config.log. Maybe some x11-devel files missing?" "$LINENO" 5; | 10321 | as_fn_error $? "Gtk+ wanted, but it does not compile, see config.log. Maybe some x11-devel files missing?" "$LINENO" 5 ; |
| 10330 | fi | 10322 | fi |
| 10331 | else | 10323 | else |
| 10332 | HAVE_GTK=yes | 10324 | HAVE_GTK=yes |
| @@ -10364,7 +10356,7 @@ if test "${HAVE_GTK}" = "yes"; then | |||
| 10364 | ac_fn_c_check_decl "$LINENO" "GTK_TYPE_FILE_SELECTION" "ac_cv_have_decl_GTK_TYPE_FILE_SELECTION" "$ac_includes_default | 10356 | ac_fn_c_check_decl "$LINENO" "GTK_TYPE_FILE_SELECTION" "ac_cv_have_decl_GTK_TYPE_FILE_SELECTION" "$ac_includes_default |
| 10365 | #include <gtk/gtk.h> | 10357 | #include <gtk/gtk.h> |
| 10366 | " | 10358 | " |
| 10367 | if test "x$ac_cv_have_decl_GTK_TYPE_FILE_SELECTION" = xyes; then : | 10359 | if test "x$ac_cv_have_decl_GTK_TYPE_FILE_SELECTION" = x""yes; then : |
| 10368 | HAVE_GTK_FILE_SELECTION=yes | 10360 | HAVE_GTK_FILE_SELECTION=yes |
| 10369 | else | 10361 | else |
| 10370 | HAVE_GTK_FILE_SELECTION=no | 10362 | HAVE_GTK_FILE_SELECTION=no |
| @@ -10374,7 +10366,7 @@ fi | |||
| 10374 | for ac_func in gtk_file_selection_new | 10366 | for ac_func in gtk_file_selection_new |
| 10375 | do : | 10367 | do : |
| 10376 | ac_fn_c_check_func "$LINENO" "gtk_file_selection_new" "ac_cv_func_gtk_file_selection_new" | 10368 | ac_fn_c_check_func "$LINENO" "gtk_file_selection_new" "ac_cv_func_gtk_file_selection_new" |
| 10377 | if test "x$ac_cv_func_gtk_file_selection_new" = xyes; then : | 10369 | if test "x$ac_cv_func_gtk_file_selection_new" = x""yes; then : |
| 10378 | cat >>confdefs.h <<_ACEOF | 10370 | cat >>confdefs.h <<_ACEOF |
| 10379 | #define HAVE_GTK_FILE_SELECTION_NEW 1 | 10371 | #define HAVE_GTK_FILE_SELECTION_NEW 1 |
| 10380 | _ACEOF | 10372 | _ACEOF |
| @@ -10388,7 +10380,7 @@ done | |||
| 10388 | for ac_header in pthread.h | 10380 | for ac_header in pthread.h |
| 10389 | do : | 10381 | do : |
| 10390 | ac_fn_c_check_header_mongrel "$LINENO" "pthread.h" "ac_cv_header_pthread_h" "$ac_includes_default" | 10382 | ac_fn_c_check_header_mongrel "$LINENO" "pthread.h" "ac_cv_header_pthread_h" "$ac_includes_default" |
| 10391 | if test "x$ac_cv_header_pthread_h" = xyes; then : | 10383 | if test "x$ac_cv_header_pthread_h" = x""yes; then : |
| 10392 | cat >>confdefs.h <<_ACEOF | 10384 | cat >>confdefs.h <<_ACEOF |
| 10393 | #define HAVE_PTHREAD_H 1 | 10385 | #define HAVE_PTHREAD_H 1 |
| 10394 | _ACEOF | 10386 | _ACEOF |
| @@ -10400,7 +10392,7 @@ done | |||
| 10400 | if test "$ac_cv_header_pthread_h"; then | 10392 | if test "$ac_cv_header_pthread_h"; then |
| 10401 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for pthread_self in -lpthread" >&5 | 10393 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for pthread_self in -lpthread" >&5 |
| 10402 | $as_echo_n "checking for pthread_self in -lpthread... " >&6; } | 10394 | $as_echo_n "checking for pthread_self in -lpthread... " >&6; } |
| 10403 | if ${ac_cv_lib_pthread_pthread_self+:} false; then : | 10395 | if test "${ac_cv_lib_pthread_pthread_self+set}" = set; then : |
| 10404 | $as_echo_n "(cached) " >&6 | 10396 | $as_echo_n "(cached) " >&6 |
| 10405 | else | 10397 | else |
| 10406 | ac_check_lib_save_LIBS=$LIBS | 10398 | ac_check_lib_save_LIBS=$LIBS |
| @@ -10434,7 +10426,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 10434 | fi | 10426 | fi |
| 10435 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_pthread_pthread_self" >&5 | 10427 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_pthread_pthread_self" >&5 |
| 10436 | $as_echo "$ac_cv_lib_pthread_pthread_self" >&6; } | 10428 | $as_echo "$ac_cv_lib_pthread_pthread_self" >&6; } |
| 10437 | if test "x$ac_cv_lib_pthread_pthread_self" = xyes; then : | 10429 | if test "x$ac_cv_lib_pthread_pthread_self" = x""yes; then : |
| 10438 | HAVE_GTK_AND_PTHREAD=yes | 10430 | HAVE_GTK_AND_PTHREAD=yes |
| 10439 | fi | 10431 | fi |
| 10440 | 10432 | ||
| @@ -10477,7 +10469,7 @@ if test "${with_dbus}" = "yes"; then | |||
| 10477 | set dummy pkg-config; ac_word=$2 | 10469 | set dummy pkg-config; ac_word=$2 |
| 10478 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 10470 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 10479 | $as_echo_n "checking for $ac_word... " >&6; } | 10471 | $as_echo_n "checking for $ac_word... " >&6; } |
| 10480 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 10472 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 10481 | $as_echo_n "(cached) " >&6 | 10473 | $as_echo_n "(cached) " >&6 |
| 10482 | else | 10474 | else |
| 10483 | case $PKG_CONFIG in | 10475 | case $PKG_CONFIG in |
| @@ -10572,7 +10564,7 @@ $as_echo "#define HAVE_DBUS 1" >>confdefs.h | |||
| 10572 | for ac_func in dbus_watch_get_unix_fd | 10564 | for ac_func in dbus_watch_get_unix_fd |
| 10573 | do : | 10565 | do : |
| 10574 | ac_fn_c_check_func "$LINENO" "dbus_watch_get_unix_fd" "ac_cv_func_dbus_watch_get_unix_fd" | 10566 | ac_fn_c_check_func "$LINENO" "dbus_watch_get_unix_fd" "ac_cv_func_dbus_watch_get_unix_fd" |
| 10575 | if test "x$ac_cv_func_dbus_watch_get_unix_fd" = xyes; then : | 10567 | if test "x$ac_cv_func_dbus_watch_get_unix_fd" = x""yes; then : |
| 10576 | cat >>confdefs.h <<_ACEOF | 10568 | cat >>confdefs.h <<_ACEOF |
| 10577 | #define HAVE_DBUS_WATCH_GET_UNIX_FD 1 | 10569 | #define HAVE_DBUS_WATCH_GET_UNIX_FD 1 |
| 10578 | _ACEOF | 10570 | _ACEOF |
| @@ -10594,7 +10586,7 @@ if test "${HAVE_X11}" = "yes" && test "${with_gconf}" = "yes"; then | |||
| 10594 | set dummy pkg-config; ac_word=$2 | 10586 | set dummy pkg-config; ac_word=$2 |
| 10595 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 10587 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 10596 | $as_echo_n "checking for $ac_word... " >&6; } | 10588 | $as_echo_n "checking for $ac_word... " >&6; } |
| 10597 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 10589 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 10598 | $as_echo_n "(cached) " >&6 | 10590 | $as_echo_n "(cached) " >&6 |
| 10599 | else | 10591 | else |
| 10600 | case $PKG_CONFIG in | 10592 | case $PKG_CONFIG in |
| @@ -10688,7 +10680,7 @@ $as_echo "#define HAVE_GCONF 1" >>confdefs.h | |||
| 10688 | for ac_func in g_type_init | 10680 | for ac_func in g_type_init |
| 10689 | do : | 10681 | do : |
| 10690 | ac_fn_c_check_func "$LINENO" "g_type_init" "ac_cv_func_g_type_init" | 10682 | ac_fn_c_check_func "$LINENO" "g_type_init" "ac_cv_func_g_type_init" |
| 10691 | if test "x$ac_cv_func_g_type_init" = xyes; then : | 10683 | if test "x$ac_cv_func_g_type_init" = x""yes; then : |
| 10692 | cat >>confdefs.h <<_ACEOF | 10684 | cat >>confdefs.h <<_ACEOF |
| 10693 | #define HAVE_G_TYPE_INIT 1 | 10685 | #define HAVE_G_TYPE_INIT 1 |
| 10694 | _ACEOF | 10686 | _ACEOF |
| @@ -10704,7 +10696,7 @@ LIBSELINUX_LIBS= | |||
| 10704 | if test "${with_selinux}" = "yes"; then | 10696 | if test "${with_selinux}" = "yes"; then |
| 10705 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for lgetfilecon in -lselinux" >&5 | 10697 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for lgetfilecon in -lselinux" >&5 |
| 10706 | $as_echo_n "checking for lgetfilecon in -lselinux... " >&6; } | 10698 | $as_echo_n "checking for lgetfilecon in -lselinux... " >&6; } |
| 10707 | if ${ac_cv_lib_selinux_lgetfilecon+:} false; then : | 10699 | if test "${ac_cv_lib_selinux_lgetfilecon+set}" = set; then : |
| 10708 | $as_echo_n "(cached) " >&6 | 10700 | $as_echo_n "(cached) " >&6 |
| 10709 | else | 10701 | else |
| 10710 | ac_check_lib_save_LIBS=$LIBS | 10702 | ac_check_lib_save_LIBS=$LIBS |
| @@ -10738,7 +10730,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 10738 | fi | 10730 | fi |
| 10739 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_selinux_lgetfilecon" >&5 | 10731 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_selinux_lgetfilecon" >&5 |
| 10740 | $as_echo "$ac_cv_lib_selinux_lgetfilecon" >&6; } | 10732 | $as_echo "$ac_cv_lib_selinux_lgetfilecon" >&6; } |
| 10741 | if test "x$ac_cv_lib_selinux_lgetfilecon" = xyes; then : | 10733 | if test "x$ac_cv_lib_selinux_lgetfilecon" = x""yes; then : |
| 10742 | HAVE_LIBSELINUX=yes | 10734 | HAVE_LIBSELINUX=yes |
| 10743 | else | 10735 | else |
| 10744 | HAVE_LIBSELINUX=no | 10736 | HAVE_LIBSELINUX=no |
| @@ -10762,7 +10754,7 @@ if test "${with_gnutls}" = "yes" ; then | |||
| 10762 | set dummy pkg-config; ac_word=$2 | 10754 | set dummy pkg-config; ac_word=$2 |
| 10763 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 10755 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 10764 | $as_echo_n "checking for $ac_word... " >&6; } | 10756 | $as_echo_n "checking for $ac_word... " >&6; } |
| 10765 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 10757 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 10766 | $as_echo_n "(cached) " >&6 | 10758 | $as_echo_n "(cached) " >&6 |
| 10767 | else | 10759 | else |
| 10768 | case $PKG_CONFIG in | 10760 | case $PKG_CONFIG in |
| @@ -10864,7 +10856,7 @@ if test x"${USE_X_TOOLKIT}" = xmaybe || test x"${USE_X_TOOLKIT}" = xLUCID; then | |||
| 10864 | if test "$with_xaw3d" != no; then | 10856 | if test "$with_xaw3d" != no; then |
| 10865 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for xaw3d" >&5 | 10857 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for xaw3d" >&5 |
| 10866 | $as_echo_n "checking for xaw3d... " >&6; } | 10858 | $as_echo_n "checking for xaw3d... " >&6; } |
| 10867 | if ${emacs_cv_xaw3d+:} false; then : | 10859 | if test "${emacs_cv_xaw3d+set}" = set; then : |
| 10868 | $as_echo_n "(cached) " >&6 | 10860 | $as_echo_n "(cached) " >&6 |
| 10869 | else | 10861 | else |
| 10870 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 10862 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -10883,7 +10875,7 @@ _ACEOF | |||
| 10883 | if ac_fn_c_try_link "$LINENO"; then : | 10875 | if ac_fn_c_try_link "$LINENO"; then : |
| 10884 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XawScrollbarSetThumb in -lXaw3d" >&5 | 10876 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XawScrollbarSetThumb in -lXaw3d" >&5 |
| 10885 | $as_echo_n "checking for XawScrollbarSetThumb in -lXaw3d... " >&6; } | 10877 | $as_echo_n "checking for XawScrollbarSetThumb in -lXaw3d... " >&6; } |
| 10886 | if ${ac_cv_lib_Xaw3d_XawScrollbarSetThumb+:} false; then : | 10878 | if test "${ac_cv_lib_Xaw3d_XawScrollbarSetThumb+set}" = set; then : |
| 10887 | $as_echo_n "(cached) " >&6 | 10879 | $as_echo_n "(cached) " >&6 |
| 10888 | else | 10880 | else |
| 10889 | ac_check_lib_save_LIBS=$LIBS | 10881 | ac_check_lib_save_LIBS=$LIBS |
| @@ -10917,7 +10909,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 10917 | fi | 10909 | fi |
| 10918 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xaw3d_XawScrollbarSetThumb" >&5 | 10910 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xaw3d_XawScrollbarSetThumb" >&5 |
| 10919 | $as_echo "$ac_cv_lib_Xaw3d_XawScrollbarSetThumb" >&6; } | 10911 | $as_echo "$ac_cv_lib_Xaw3d_XawScrollbarSetThumb" >&6; } |
| 10920 | if test "x$ac_cv_lib_Xaw3d_XawScrollbarSetThumb" = xyes; then : | 10912 | if test "x$ac_cv_lib_Xaw3d_XawScrollbarSetThumb" = x""yes; then : |
| 10921 | emacs_cv_xaw3d=yes | 10913 | emacs_cv_xaw3d=yes |
| 10922 | else | 10914 | else |
| 10923 | emacs_cv_xaw3d=no | 10915 | emacs_cv_xaw3d=no |
| @@ -10947,7 +10939,7 @@ $as_echo "#define HAVE_XAW3D 1" >>confdefs.h | |||
| 10947 | $as_echo "no" >&6; } | 10939 | $as_echo "no" >&6; } |
| 10948 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for libXaw" >&5 | 10940 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for libXaw" >&5 |
| 10949 | $as_echo_n "checking for libXaw... " >&6; } | 10941 | $as_echo_n "checking for libXaw... " >&6; } |
| 10950 | if ${emacs_cv_xaw+:} false; then : | 10942 | if test "${emacs_cv_xaw+set}" = set; then : |
| 10951 | $as_echo_n "(cached) " >&6 | 10943 | $as_echo_n "(cached) " >&6 |
| 10952 | else | 10944 | else |
| 10953 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 10945 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -10993,7 +10985,7 @@ LIBXTR6= | |||
| 10993 | if test "${USE_X_TOOLKIT}" != "none"; then | 10985 | if test "${USE_X_TOOLKIT}" != "none"; then |
| 10994 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking X11 toolkit version" >&5 | 10986 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking X11 toolkit version" >&5 |
| 10995 | $as_echo_n "checking X11 toolkit version... " >&6; } | 10987 | $as_echo_n "checking X11 toolkit version... " >&6; } |
| 10996 | if ${emacs_cv_x11_toolkit_version_6+:} false; then : | 10988 | if test "${emacs_cv_x11_toolkit_version_6+set}" = set; then : |
| 10997 | $as_echo_n "(cached) " >&6 | 10989 | $as_echo_n "(cached) " >&6 |
| 10998 | else | 10990 | else |
| 10999 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 10991 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -11044,7 +11036,7 @@ $as_echo "before 6" >&6; } | |||
| 11044 | fi | 11036 | fi |
| 11045 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XmuConvertStandardSelection in -lXmu" >&5 | 11037 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XmuConvertStandardSelection in -lXmu" >&5 |
| 11046 | $as_echo_n "checking for XmuConvertStandardSelection in -lXmu... " >&6; } | 11038 | $as_echo_n "checking for XmuConvertStandardSelection in -lXmu... " >&6; } |
| 11047 | if ${ac_cv_lib_Xmu_XmuConvertStandardSelection+:} false; then : | 11039 | if test "${ac_cv_lib_Xmu_XmuConvertStandardSelection+set}" = set; then : |
| 11048 | $as_echo_n "(cached) " >&6 | 11040 | $as_echo_n "(cached) " >&6 |
| 11049 | else | 11041 | else |
| 11050 | ac_check_lib_save_LIBS=$LIBS | 11042 | ac_check_lib_save_LIBS=$LIBS |
| @@ -11078,7 +11070,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 11078 | fi | 11070 | fi |
| 11079 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xmu_XmuConvertStandardSelection" >&5 | 11071 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xmu_XmuConvertStandardSelection" >&5 |
| 11080 | $as_echo "$ac_cv_lib_Xmu_XmuConvertStandardSelection" >&6; } | 11072 | $as_echo "$ac_cv_lib_Xmu_XmuConvertStandardSelection" >&6; } |
| 11081 | if test "x$ac_cv_lib_Xmu_XmuConvertStandardSelection" = xyes; then : | 11073 | if test "x$ac_cv_lib_Xmu_XmuConvertStandardSelection" = x""yes; then : |
| 11082 | cat >>confdefs.h <<_ACEOF | 11074 | cat >>confdefs.h <<_ACEOF |
| 11083 | #define HAVE_LIBXMU 1 | 11075 | #define HAVE_LIBXMU 1 |
| 11084 | _ACEOF | 11076 | _ACEOF |
| @@ -11105,7 +11097,7 @@ if test "${HAVE_X11}" = "yes"; then | |||
| 11105 | if test "${USE_X_TOOLKIT}" != "none"; then | 11097 | if test "${USE_X_TOOLKIT}" != "none"; then |
| 11106 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XShapeQueryExtension in -lXext" >&5 | 11098 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XShapeQueryExtension in -lXext" >&5 |
| 11107 | $as_echo_n "checking for XShapeQueryExtension in -lXext... " >&6; } | 11099 | $as_echo_n "checking for XShapeQueryExtension in -lXext... " >&6; } |
| 11108 | if ${ac_cv_lib_Xext_XShapeQueryExtension+:} false; then : | 11100 | if test "${ac_cv_lib_Xext_XShapeQueryExtension+set}" = set; then : |
| 11109 | $as_echo_n "(cached) " >&6 | 11101 | $as_echo_n "(cached) " >&6 |
| 11110 | else | 11102 | else |
| 11111 | ac_check_lib_save_LIBS=$LIBS | 11103 | ac_check_lib_save_LIBS=$LIBS |
| @@ -11139,7 +11131,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 11139 | fi | 11131 | fi |
| 11140 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xext_XShapeQueryExtension" >&5 | 11132 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xext_XShapeQueryExtension" >&5 |
| 11141 | $as_echo "$ac_cv_lib_Xext_XShapeQueryExtension" >&6; } | 11133 | $as_echo "$ac_cv_lib_Xext_XShapeQueryExtension" >&6; } |
| 11142 | if test "x$ac_cv_lib_Xext_XShapeQueryExtension" = xyes; then : | 11134 | if test "x$ac_cv_lib_Xext_XShapeQueryExtension" = x""yes; then : |
| 11143 | cat >>confdefs.h <<_ACEOF | 11135 | cat >>confdefs.h <<_ACEOF |
| 11144 | #define HAVE_LIBXEXT 1 | 11136 | #define HAVE_LIBXEXT 1 |
| 11145 | _ACEOF | 11137 | _ACEOF |
| @@ -11155,7 +11147,7 @@ LIBXP= | |||
| 11155 | if test "${USE_X_TOOLKIT}" = "MOTIF"; then | 11147 | if test "${USE_X_TOOLKIT}" = "MOTIF"; then |
| 11156 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for Motif version 2.1" >&5 | 11148 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for Motif version 2.1" >&5 |
| 11157 | $as_echo_n "checking for Motif version 2.1... " >&6; } | 11149 | $as_echo_n "checking for Motif version 2.1... " >&6; } |
| 11158 | if ${emacs_cv_motif_version_2_1+:} false; then : | 11150 | if test "${emacs_cv_motif_version_2_1+set}" = set; then : |
| 11159 | $as_echo_n "(cached) " >&6 | 11151 | $as_echo_n "(cached) " >&6 |
| 11160 | else | 11152 | else |
| 11161 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 11153 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -11185,7 +11177,7 @@ $as_echo "$emacs_cv_motif_version_2_1" >&6; } | |||
| 11185 | if test $emacs_cv_motif_version_2_1 = yes; then | 11177 | if test $emacs_cv_motif_version_2_1 = yes; then |
| 11186 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XpCreateContext in -lXp" >&5 | 11178 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XpCreateContext in -lXp" >&5 |
| 11187 | $as_echo_n "checking for XpCreateContext in -lXp... " >&6; } | 11179 | $as_echo_n "checking for XpCreateContext in -lXp... " >&6; } |
| 11188 | if ${ac_cv_lib_Xp_XpCreateContext+:} false; then : | 11180 | if test "${ac_cv_lib_Xp_XpCreateContext+set}" = set; then : |
| 11189 | $as_echo_n "(cached) " >&6 | 11181 | $as_echo_n "(cached) " >&6 |
| 11190 | else | 11182 | else |
| 11191 | ac_check_lib_save_LIBS=$LIBS | 11183 | ac_check_lib_save_LIBS=$LIBS |
| @@ -11219,14 +11211,14 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 11219 | fi | 11211 | fi |
| 11220 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xp_XpCreateContext" >&5 | 11212 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xp_XpCreateContext" >&5 |
| 11221 | $as_echo "$ac_cv_lib_Xp_XpCreateContext" >&6; } | 11213 | $as_echo "$ac_cv_lib_Xp_XpCreateContext" >&6; } |
| 11222 | if test "x$ac_cv_lib_Xp_XpCreateContext" = xyes; then : | 11214 | if test "x$ac_cv_lib_Xp_XpCreateContext" = x""yes; then : |
| 11223 | LIBXP=-lXp | 11215 | LIBXP=-lXp |
| 11224 | fi | 11216 | fi |
| 11225 | 11217 | ||
| 11226 | else | 11218 | else |
| 11227 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for LessTif where some systems put it" >&5 | 11219 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for LessTif where some systems put it" >&5 |
| 11228 | $as_echo_n "checking for LessTif where some systems put it... " >&6; } | 11220 | $as_echo_n "checking for LessTif where some systems put it... " >&6; } |
| 11229 | if ${emacs_cv_lesstif+:} false; then : | 11221 | if test "${emacs_cv_lesstif+set}" = set; then : |
| 11230 | $as_echo_n "(cached) " >&6 | 11222 | $as_echo_n "(cached) " >&6 |
| 11231 | else | 11223 | else |
| 11232 | # We put this in CFLAGS temporarily to precede other -I options | 11224 | # We put this in CFLAGS temporarily to precede other -I options |
| @@ -11385,7 +11377,7 @@ if test "${HAVE_X11}" = "yes"; then | |||
| 11385 | set dummy pkg-config; ac_word=$2 | 11377 | set dummy pkg-config; ac_word=$2 |
| 11386 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 11378 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 11387 | $as_echo_n "checking for $ac_word... " >&6; } | 11379 | $as_echo_n "checking for $ac_word... " >&6; } |
| 11388 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 11380 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 11389 | $as_echo_n "(cached) " >&6 | 11381 | $as_echo_n "(cached) " >&6 |
| 11390 | else | 11382 | else |
| 11391 | case $PKG_CONFIG in | 11383 | case $PKG_CONFIG in |
| @@ -11487,7 +11479,7 @@ $as_echo "no" >&6; } | |||
| 11487 | set dummy pkg-config; ac_word=$2 | 11479 | set dummy pkg-config; ac_word=$2 |
| 11488 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 11480 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 11489 | $as_echo_n "checking for $ac_word... " >&6; } | 11481 | $as_echo_n "checking for $ac_word... " >&6; } |
| 11490 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 11482 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 11491 | $as_echo_n "(cached) " >&6 | 11483 | $as_echo_n "(cached) " >&6 |
| 11492 | else | 11484 | else |
| 11493 | case $PKG_CONFIG in | 11485 | case $PKG_CONFIG in |
| @@ -11579,7 +11571,7 @@ $as_echo "no" >&6; } | |||
| 11579 | HAVE_XRENDER=no | 11571 | HAVE_XRENDER=no |
| 11580 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XRenderQueryExtension in -lXrender" >&5 | 11572 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XRenderQueryExtension in -lXrender" >&5 |
| 11581 | $as_echo_n "checking for XRenderQueryExtension in -lXrender... " >&6; } | 11573 | $as_echo_n "checking for XRenderQueryExtension in -lXrender... " >&6; } |
| 11582 | if ${ac_cv_lib_Xrender_XRenderQueryExtension+:} false; then : | 11574 | if test "${ac_cv_lib_Xrender_XRenderQueryExtension+set}" = set; then : |
| 11583 | $as_echo_n "(cached) " >&6 | 11575 | $as_echo_n "(cached) " >&6 |
| 11584 | else | 11576 | else |
| 11585 | ac_check_lib_save_LIBS=$LIBS | 11577 | ac_check_lib_save_LIBS=$LIBS |
| @@ -11613,7 +11605,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 11613 | fi | 11605 | fi |
| 11614 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xrender_XRenderQueryExtension" >&5 | 11606 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xrender_XRenderQueryExtension" >&5 |
| 11615 | $as_echo "$ac_cv_lib_Xrender_XRenderQueryExtension" >&6; } | 11607 | $as_echo "$ac_cv_lib_Xrender_XRenderQueryExtension" >&6; } |
| 11616 | if test "x$ac_cv_lib_Xrender_XRenderQueryExtension" = xyes; then : | 11608 | if test "x$ac_cv_lib_Xrender_XRenderQueryExtension" = x""yes; then : |
| 11617 | HAVE_XRENDER=yes | 11609 | HAVE_XRENDER=yes |
| 11618 | fi | 11610 | fi |
| 11619 | 11611 | ||
| @@ -11626,10 +11618,10 @@ fi | |||
| 11626 | XFT_LIBS="-lXrender $XFT_LIBS" | 11618 | XFT_LIBS="-lXrender $XFT_LIBS" |
| 11627 | LIBS="$XFT_LIBS $LIBS" | 11619 | LIBS="$XFT_LIBS $LIBS" |
| 11628 | ac_fn_c_check_header_mongrel "$LINENO" "X11/Xft/Xft.h" "ac_cv_header_X11_Xft_Xft_h" "$ac_includes_default" | 11620 | ac_fn_c_check_header_mongrel "$LINENO" "X11/Xft/Xft.h" "ac_cv_header_X11_Xft_Xft_h" "$ac_includes_default" |
| 11629 | if test "x$ac_cv_header_X11_Xft_Xft_h" = xyes; then : | 11621 | if test "x$ac_cv_header_X11_Xft_Xft_h" = x""yes; then : |
| 11630 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XftFontOpen in -lXft" >&5 | 11622 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XftFontOpen in -lXft" >&5 |
| 11631 | $as_echo_n "checking for XftFontOpen in -lXft... " >&6; } | 11623 | $as_echo_n "checking for XftFontOpen in -lXft... " >&6; } |
| 11632 | if ${ac_cv_lib_Xft_XftFontOpen+:} false; then : | 11624 | if test "${ac_cv_lib_Xft_XftFontOpen+set}" = set; then : |
| 11633 | $as_echo_n "(cached) " >&6 | 11625 | $as_echo_n "(cached) " >&6 |
| 11634 | else | 11626 | else |
| 11635 | ac_check_lib_save_LIBS=$LIBS | 11627 | ac_check_lib_save_LIBS=$LIBS |
| @@ -11663,7 +11655,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 11663 | fi | 11655 | fi |
| 11664 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xft_XftFontOpen" >&5 | 11656 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xft_XftFontOpen" >&5 |
| 11665 | $as_echo "$ac_cv_lib_Xft_XftFontOpen" >&6; } | 11657 | $as_echo "$ac_cv_lib_Xft_XftFontOpen" >&6; } |
| 11666 | if test "x$ac_cv_lib_Xft_XftFontOpen" = xyes; then : | 11658 | if test "x$ac_cv_lib_Xft_XftFontOpen" = x""yes; then : |
| 11667 | HAVE_XFT=yes | 11659 | HAVE_XFT=yes |
| 11668 | fi | 11660 | fi |
| 11669 | 11661 | ||
| @@ -11685,13 +11677,109 @@ $as_echo "#define HAVE_XFT 1" >>confdefs.h | |||
| 11685 | fi # "$HAVE_XFT" != no | 11677 | fi # "$HAVE_XFT" != no |
| 11686 | fi # "x${with_xft}" != "xno" | 11678 | fi # "x${with_xft}" != "xno" |
| 11687 | 11679 | ||
| 11688 | if test "$HAVE_XFT" != "yes"; then | ||
| 11689 | HAVE_XFT=no | ||
| 11690 | fi | ||
| 11691 | |||
| 11692 | ## We used to allow building with FreeType and without Xft. | 11680 | ## We used to allow building with FreeType and without Xft. |
| 11693 | ## However, the ftx font backend driver is not in good shape. | 11681 | ## However, the ftx font backend driver is not in good shape. |
| 11694 | HAVE_FREETYPE=$HAVE_XFT | 11682 | if test "$HAVE_XFT" != "yes"; then |
| 11683 | HAVE_XFT=no | ||
| 11684 | HAVE_FREETYPE=no | ||
| 11685 | else | ||
| 11686 | |||
| 11687 | succeeded=no | ||
| 11688 | |||
| 11689 | # Extract the first word of "pkg-config", so it can be a program name with args. | ||
| 11690 | set dummy pkg-config; ac_word=$2 | ||
| 11691 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | ||
| 11692 | $as_echo_n "checking for $ac_word... " >&6; } | ||
| 11693 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : | ||
| 11694 | $as_echo_n "(cached) " >&6 | ||
| 11695 | else | ||
| 11696 | case $PKG_CONFIG in | ||
| 11697 | [\\/]* | ?:[\\/]*) | ||
| 11698 | ac_cv_path_PKG_CONFIG="$PKG_CONFIG" # Let the user override the test with a path. | ||
| 11699 | ;; | ||
| 11700 | *) | ||
| 11701 | as_save_IFS=$IFS; IFS=$PATH_SEPARATOR | ||
| 11702 | for as_dir in $PATH | ||
| 11703 | do | ||
| 11704 | IFS=$as_save_IFS | ||
| 11705 | test -z "$as_dir" && as_dir=. | ||
| 11706 | for ac_exec_ext in '' $ac_executable_extensions; do | ||
| 11707 | if { test -f "$as_dir/$ac_word$ac_exec_ext" && $as_test_x "$as_dir/$ac_word$ac_exec_ext"; }; then | ||
| 11708 | ac_cv_path_PKG_CONFIG="$as_dir/$ac_word$ac_exec_ext" | ||
| 11709 | $as_echo "$as_me:${as_lineno-$LINENO}: found $as_dir/$ac_word$ac_exec_ext" >&5 | ||
| 11710 | break 2 | ||
| 11711 | fi | ||
| 11712 | done | ||
| 11713 | done | ||
| 11714 | IFS=$as_save_IFS | ||
| 11715 | |||
| 11716 | test -z "$ac_cv_path_PKG_CONFIG" && ac_cv_path_PKG_CONFIG="no" | ||
| 11717 | ;; | ||
| 11718 | esac | ||
| 11719 | fi | ||
| 11720 | PKG_CONFIG=$ac_cv_path_PKG_CONFIG | ||
| 11721 | if test -n "$PKG_CONFIG"; then | ||
| 11722 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $PKG_CONFIG" >&5 | ||
| 11723 | $as_echo "$PKG_CONFIG" >&6; } | ||
| 11724 | else | ||
| 11725 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 | ||
| 11726 | $as_echo "no" >&6; } | ||
| 11727 | fi | ||
| 11728 | |||
| 11729 | |||
| 11730 | |||
| 11731 | if test "$PKG_CONFIG" = "no" ; then | ||
| 11732 | HAVE_FREETYPE=no | ||
| 11733 | else | ||
| 11734 | PKG_CONFIG_MIN_VERSION=0.9.0 | ||
| 11735 | if $PKG_CONFIG --atleast-pkgconfig-version $PKG_CONFIG_MIN_VERSION; then | ||
| 11736 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for freetype2" >&5 | ||
| 11737 | $as_echo_n "checking for freetype2... " >&6; } | ||
| 11738 | |||
| 11739 | if $PKG_CONFIG --exists "freetype2" 2>&5; then | ||
| 11740 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: yes" >&5 | ||
| 11741 | $as_echo "yes" >&6; } | ||
| 11742 | succeeded=yes | ||
| 11743 | |||
| 11744 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking FREETYPE_CFLAGS" >&5 | ||
| 11745 | $as_echo_n "checking FREETYPE_CFLAGS... " >&6; } | ||
| 11746 | FREETYPE_CFLAGS=`$PKG_CONFIG --cflags "freetype2"|sed -e 's,///*,/,g'` | ||
| 11747 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $FREETYPE_CFLAGS" >&5 | ||
| 11748 | $as_echo "$FREETYPE_CFLAGS" >&6; } | ||
| 11749 | |||
| 11750 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking FREETYPE_LIBS" >&5 | ||
| 11751 | $as_echo_n "checking FREETYPE_LIBS... " >&6; } | ||
| 11752 | FREETYPE_LIBS=`$PKG_CONFIG --libs "freetype2"|sed -e 's,///*,/,g'` | ||
| 11753 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $FREETYPE_LIBS" >&5 | ||
| 11754 | $as_echo "$FREETYPE_LIBS" >&6; } | ||
| 11755 | else | ||
| 11756 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: no" >&5 | ||
| 11757 | $as_echo "no" >&6; } | ||
| 11758 | FREETYPE_CFLAGS="" | ||
| 11759 | FREETYPE_LIBS="" | ||
| 11760 | ## If we have a custom action on failure, don't print errors, but | ||
| 11761 | ## do set a variable so people can do so. | ||
| 11762 | FREETYPE_PKG_ERRORS=`$PKG_CONFIG --errors-to-stdout --print-errors "freetype2"` | ||
| 11763 | |||
| 11764 | fi | ||
| 11765 | |||
| 11766 | |||
| 11767 | |||
| 11768 | else | ||
| 11769 | echo "*** Your version of pkg-config is too old. You need version $PKG_CONFIG_MIN_VERSION or newer." | ||
| 11770 | echo "*** See http://www.freedesktop.org/software/pkgconfig" | ||
| 11771 | fi | ||
| 11772 | fi | ||
| 11773 | |||
| 11774 | if test $succeeded = yes; then | ||
| 11775 | HAVE_FREETYPE=yes | ||
| 11776 | else | ||
| 11777 | HAVE_FREETYPE=no | ||
| 11778 | fi | ||
| 11779 | |||
| 11780 | |||
| 11781 | test "$HAVE_FREETYPE" = "no" && as_fn_error $? "libxft requires libfreetype" "$LINENO" 5 | ||
| 11782 | fi | ||
| 11695 | 11783 | ||
| 11696 | HAVE_LIBOTF=no | 11784 | HAVE_LIBOTF=no |
| 11697 | if test "${HAVE_FREETYPE}" = "yes"; then | 11785 | if test "${HAVE_FREETYPE}" = "yes"; then |
| @@ -11706,7 +11794,7 @@ $as_echo "#define HAVE_FREETYPE 1" >>confdefs.h | |||
| 11706 | set dummy pkg-config; ac_word=$2 | 11794 | set dummy pkg-config; ac_word=$2 |
| 11707 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 11795 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 11708 | $as_echo_n "checking for $ac_word... " >&6; } | 11796 | $as_echo_n "checking for $ac_word... " >&6; } |
| 11709 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 11797 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 11710 | $as_echo_n "(cached) " >&6 | 11798 | $as_echo_n "(cached) " >&6 |
| 11711 | else | 11799 | else |
| 11712 | case $PKG_CONFIG in | 11800 | case $PKG_CONFIG in |
| @@ -11799,7 +11887,7 @@ $as_echo "#define HAVE_LIBOTF 1" >>confdefs.h | |||
| 11799 | 11887 | ||
| 11800 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for OTF_get_variation_glyphs in -lotf" >&5 | 11888 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for OTF_get_variation_glyphs in -lotf" >&5 |
| 11801 | $as_echo_n "checking for OTF_get_variation_glyphs in -lotf... " >&6; } | 11889 | $as_echo_n "checking for OTF_get_variation_glyphs in -lotf... " >&6; } |
| 11802 | if ${ac_cv_lib_otf_OTF_get_variation_glyphs+:} false; then : | 11890 | if test "${ac_cv_lib_otf_OTF_get_variation_glyphs+set}" = set; then : |
| 11803 | $as_echo_n "(cached) " >&6 | 11891 | $as_echo_n "(cached) " >&6 |
| 11804 | else | 11892 | else |
| 11805 | ac_check_lib_save_LIBS=$LIBS | 11893 | ac_check_lib_save_LIBS=$LIBS |
| @@ -11833,7 +11921,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 11833 | fi | 11921 | fi |
| 11834 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_otf_OTF_get_variation_glyphs" >&5 | 11922 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_otf_OTF_get_variation_glyphs" >&5 |
| 11835 | $as_echo "$ac_cv_lib_otf_OTF_get_variation_glyphs" >&6; } | 11923 | $as_echo "$ac_cv_lib_otf_OTF_get_variation_glyphs" >&6; } |
| 11836 | if test "x$ac_cv_lib_otf_OTF_get_variation_glyphs" = xyes; then : | 11924 | if test "x$ac_cv_lib_otf_OTF_get_variation_glyphs" = x""yes; then : |
| 11837 | HAVE_OTF_GET_VARIATION_GLYPHS=yes | 11925 | HAVE_OTF_GET_VARIATION_GLYPHS=yes |
| 11838 | else | 11926 | else |
| 11839 | HAVE_OTF_GET_VARIATION_GLYPHS=no | 11927 | HAVE_OTF_GET_VARIATION_GLYPHS=no |
| @@ -11858,7 +11946,7 @@ $as_echo "#define HAVE_OTF_GET_VARIATION_GLYPHS 1" >>confdefs.h | |||
| 11858 | set dummy pkg-config; ac_word=$2 | 11946 | set dummy pkg-config; ac_word=$2 |
| 11859 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 11947 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 11860 | $as_echo_n "checking for $ac_word... " >&6; } | 11948 | $as_echo_n "checking for $ac_word... " >&6; } |
| 11861 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 11949 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 11862 | $as_echo_n "(cached) " >&6 | 11950 | $as_echo_n "(cached) " >&6 |
| 11863 | else | 11951 | else |
| 11864 | case $PKG_CONFIG in | 11952 | case $PKG_CONFIG in |
| @@ -11976,10 +12064,10 @@ LIBXPM= | |||
| 11976 | if test "${HAVE_X11}" = "yes"; then | 12064 | if test "${HAVE_X11}" = "yes"; then |
| 11977 | if test "${with_xpm}" != "no"; then | 12065 | if test "${with_xpm}" != "no"; then |
| 11978 | ac_fn_c_check_header_mongrel "$LINENO" "X11/xpm.h" "ac_cv_header_X11_xpm_h" "$ac_includes_default" | 12066 | ac_fn_c_check_header_mongrel "$LINENO" "X11/xpm.h" "ac_cv_header_X11_xpm_h" "$ac_includes_default" |
| 11979 | if test "x$ac_cv_header_X11_xpm_h" = xyes; then : | 12067 | if test "x$ac_cv_header_X11_xpm_h" = x""yes; then : |
| 11980 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XpmReadFileToPixmap in -lXpm" >&5 | 12068 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for XpmReadFileToPixmap in -lXpm" >&5 |
| 11981 | $as_echo_n "checking for XpmReadFileToPixmap in -lXpm... " >&6; } | 12069 | $as_echo_n "checking for XpmReadFileToPixmap in -lXpm... " >&6; } |
| 11982 | if ${ac_cv_lib_Xpm_XpmReadFileToPixmap+:} false; then : | 12070 | if test "${ac_cv_lib_Xpm_XpmReadFileToPixmap+set}" = set; then : |
| 11983 | $as_echo_n "(cached) " >&6 | 12071 | $as_echo_n "(cached) " >&6 |
| 11984 | else | 12072 | else |
| 11985 | ac_check_lib_save_LIBS=$LIBS | 12073 | ac_check_lib_save_LIBS=$LIBS |
| @@ -12013,7 +12101,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 12013 | fi | 12101 | fi |
| 12014 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xpm_XpmReadFileToPixmap" >&5 | 12102 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_Xpm_XpmReadFileToPixmap" >&5 |
| 12015 | $as_echo "$ac_cv_lib_Xpm_XpmReadFileToPixmap" >&6; } | 12103 | $as_echo "$ac_cv_lib_Xpm_XpmReadFileToPixmap" >&6; } |
| 12016 | if test "x$ac_cv_lib_Xpm_XpmReadFileToPixmap" = xyes; then : | 12104 | if test "x$ac_cv_lib_Xpm_XpmReadFileToPixmap" = x""yes; then : |
| 12017 | HAVE_XPM=yes | 12105 | HAVE_XPM=yes |
| 12018 | fi | 12106 | fi |
| 12019 | 12107 | ||
| @@ -12065,10 +12153,10 @@ LIBJPEG= | |||
| 12065 | if test "${HAVE_X11}" = "yes"; then | 12153 | if test "${HAVE_X11}" = "yes"; then |
| 12066 | if test "${with_jpeg}" != "no"; then | 12154 | if test "${with_jpeg}" != "no"; then |
| 12067 | ac_fn_c_check_header_mongrel "$LINENO" "jerror.h" "ac_cv_header_jerror_h" "$ac_includes_default" | 12155 | ac_fn_c_check_header_mongrel "$LINENO" "jerror.h" "ac_cv_header_jerror_h" "$ac_includes_default" |
| 12068 | if test "x$ac_cv_header_jerror_h" = xyes; then : | 12156 | if test "x$ac_cv_header_jerror_h" = x""yes; then : |
| 12069 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for jpeg_destroy_compress in -ljpeg" >&5 | 12157 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for jpeg_destroy_compress in -ljpeg" >&5 |
| 12070 | $as_echo_n "checking for jpeg_destroy_compress in -ljpeg... " >&6; } | 12158 | $as_echo_n "checking for jpeg_destroy_compress in -ljpeg... " >&6; } |
| 12071 | if ${ac_cv_lib_jpeg_jpeg_destroy_compress+:} false; then : | 12159 | if test "${ac_cv_lib_jpeg_jpeg_destroy_compress+set}" = set; then : |
| 12072 | $as_echo_n "(cached) " >&6 | 12160 | $as_echo_n "(cached) " >&6 |
| 12073 | else | 12161 | else |
| 12074 | ac_check_lib_save_LIBS=$LIBS | 12162 | ac_check_lib_save_LIBS=$LIBS |
| @@ -12102,7 +12190,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 12102 | fi | 12190 | fi |
| 12103 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_jpeg_jpeg_destroy_compress" >&5 | 12191 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_jpeg_jpeg_destroy_compress" >&5 |
| 12104 | $as_echo "$ac_cv_lib_jpeg_jpeg_destroy_compress" >&6; } | 12192 | $as_echo "$ac_cv_lib_jpeg_jpeg_destroy_compress" >&6; } |
| 12105 | if test "x$ac_cv_lib_jpeg_jpeg_destroy_compress" = xyes; then : | 12193 | if test "x$ac_cv_lib_jpeg_jpeg_destroy_compress" = x""yes; then : |
| 12106 | HAVE_JPEG=yes | 12194 | HAVE_JPEG=yes |
| 12107 | fi | 12195 | fi |
| 12108 | 12196 | ||
| @@ -12161,7 +12249,7 @@ done | |||
| 12161 | if test "$ac_cv_header_png_h" = yes || test "$ac_cv_header_libpng_png_h" = yes ; then | 12249 | if test "$ac_cv_header_png_h" = yes || test "$ac_cv_header_libpng_png_h" = yes ; then |
| 12162 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for png_get_channels in -lpng" >&5 | 12250 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for png_get_channels in -lpng" >&5 |
| 12163 | $as_echo_n "checking for png_get_channels in -lpng... " >&6; } | 12251 | $as_echo_n "checking for png_get_channels in -lpng... " >&6; } |
| 12164 | if ${ac_cv_lib_png_png_get_channels+:} false; then : | 12252 | if test "${ac_cv_lib_png_png_get_channels+set}" = set; then : |
| 12165 | $as_echo_n "(cached) " >&6 | 12253 | $as_echo_n "(cached) " >&6 |
| 12166 | else | 12254 | else |
| 12167 | ac_check_lib_save_LIBS=$LIBS | 12255 | ac_check_lib_save_LIBS=$LIBS |
| @@ -12195,7 +12283,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 12195 | fi | 12283 | fi |
| 12196 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_png_png_get_channels" >&5 | 12284 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_png_png_get_channels" >&5 |
| 12197 | $as_echo "$ac_cv_lib_png_png_get_channels" >&6; } | 12285 | $as_echo "$ac_cv_lib_png_png_get_channels" >&6; } |
| 12198 | if test "x$ac_cv_lib_png_png_get_channels" = xyes; then : | 12286 | if test "x$ac_cv_lib_png_png_get_channels" = x""yes; then : |
| 12199 | HAVE_PNG=yes | 12287 | HAVE_PNG=yes |
| 12200 | fi | 12288 | fi |
| 12201 | 12289 | ||
| @@ -12217,13 +12305,13 @@ LIBTIFF= | |||
| 12217 | if test "${HAVE_X11}" = "yes"; then | 12305 | if test "${HAVE_X11}" = "yes"; then |
| 12218 | if test "${with_tiff}" != "no"; then | 12306 | if test "${with_tiff}" != "no"; then |
| 12219 | ac_fn_c_check_header_mongrel "$LINENO" "tiffio.h" "ac_cv_header_tiffio_h" "$ac_includes_default" | 12307 | ac_fn_c_check_header_mongrel "$LINENO" "tiffio.h" "ac_cv_header_tiffio_h" "$ac_includes_default" |
| 12220 | if test "x$ac_cv_header_tiffio_h" = xyes; then : | 12308 | if test "x$ac_cv_header_tiffio_h" = x""yes; then : |
| 12221 | tifflibs="-lz -lm" | 12309 | tifflibs="-lz -lm" |
| 12222 | # At least one tiff package requires the jpeg library. | 12310 | # At least one tiff package requires the jpeg library. |
| 12223 | if test "${HAVE_JPEG}" = yes; then tifflibs="-ljpeg $tifflibs"; fi | 12311 | if test "${HAVE_JPEG}" = yes; then tifflibs="-ljpeg $tifflibs"; fi |
| 12224 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for TIFFGetVersion in -ltiff" >&5 | 12312 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for TIFFGetVersion in -ltiff" >&5 |
| 12225 | $as_echo_n "checking for TIFFGetVersion in -ltiff... " >&6; } | 12313 | $as_echo_n "checking for TIFFGetVersion in -ltiff... " >&6; } |
| 12226 | if ${ac_cv_lib_tiff_TIFFGetVersion+:} false; then : | 12314 | if test "${ac_cv_lib_tiff_TIFFGetVersion+set}" = set; then : |
| 12227 | $as_echo_n "(cached) " >&6 | 12315 | $as_echo_n "(cached) " >&6 |
| 12228 | else | 12316 | else |
| 12229 | ac_check_lib_save_LIBS=$LIBS | 12317 | ac_check_lib_save_LIBS=$LIBS |
| @@ -12257,7 +12345,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 12257 | fi | 12345 | fi |
| 12258 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_tiff_TIFFGetVersion" >&5 | 12346 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_tiff_TIFFGetVersion" >&5 |
| 12259 | $as_echo "$ac_cv_lib_tiff_TIFFGetVersion" >&6; } | 12347 | $as_echo "$ac_cv_lib_tiff_TIFFGetVersion" >&6; } |
| 12260 | if test "x$ac_cv_lib_tiff_TIFFGetVersion" = xyes; then : | 12348 | if test "x$ac_cv_lib_tiff_TIFFGetVersion" = x""yes; then : |
| 12261 | HAVE_TIFF=yes | 12349 | HAVE_TIFF=yes |
| 12262 | fi | 12350 | fi |
| 12263 | 12351 | ||
| @@ -12280,12 +12368,12 @@ HAVE_GIF=no | |||
| 12280 | LIBGIF= | 12368 | LIBGIF= |
| 12281 | if test "${HAVE_X11}" = "yes" && test "${with_gif}" != "no"; then | 12369 | if test "${HAVE_X11}" = "yes" && test "${with_gif}" != "no"; then |
| 12282 | ac_fn_c_check_header_mongrel "$LINENO" "gif_lib.h" "ac_cv_header_gif_lib_h" "$ac_includes_default" | 12370 | ac_fn_c_check_header_mongrel "$LINENO" "gif_lib.h" "ac_cv_header_gif_lib_h" "$ac_includes_default" |
| 12283 | if test "x$ac_cv_header_gif_lib_h" = xyes; then : | 12371 | if test "x$ac_cv_header_gif_lib_h" = x""yes; then : |
| 12284 | # EGifPutExtensionLast only exists from version libungif-4.1.0b1. | 12372 | # EGifPutExtensionLast only exists from version libungif-4.1.0b1. |
| 12285 | # Earlier versions can crash Emacs. | 12373 | # Earlier versions can crash Emacs. |
| 12286 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for EGifPutExtensionLast in -lgif" >&5 | 12374 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for EGifPutExtensionLast in -lgif" >&5 |
| 12287 | $as_echo_n "checking for EGifPutExtensionLast in -lgif... " >&6; } | 12375 | $as_echo_n "checking for EGifPutExtensionLast in -lgif... " >&6; } |
| 12288 | if ${ac_cv_lib_gif_EGifPutExtensionLast+:} false; then : | 12376 | if test "${ac_cv_lib_gif_EGifPutExtensionLast+set}" = set; then : |
| 12289 | $as_echo_n "(cached) " >&6 | 12377 | $as_echo_n "(cached) " >&6 |
| 12290 | else | 12378 | else |
| 12291 | ac_check_lib_save_LIBS=$LIBS | 12379 | ac_check_lib_save_LIBS=$LIBS |
| @@ -12319,7 +12407,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 12319 | fi | 12407 | fi |
| 12320 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_gif_EGifPutExtensionLast" >&5 | 12408 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_gif_EGifPutExtensionLast" >&5 |
| 12321 | $as_echo "$ac_cv_lib_gif_EGifPutExtensionLast" >&6; } | 12409 | $as_echo "$ac_cv_lib_gif_EGifPutExtensionLast" >&6; } |
| 12322 | if test "x$ac_cv_lib_gif_EGifPutExtensionLast" = xyes; then : | 12410 | if test "x$ac_cv_lib_gif_EGifPutExtensionLast" = x""yes; then : |
| 12323 | HAVE_GIF=yes | 12411 | HAVE_GIF=yes |
| 12324 | else | 12412 | else |
| 12325 | HAVE_GIF=maybe | 12413 | HAVE_GIF=maybe |
| @@ -12335,7 +12423,7 @@ fi | |||
| 12335 | # If gif_lib.h but no libgif, try libungif. | 12423 | # If gif_lib.h but no libgif, try libungif. |
| 12336 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for EGifPutExtensionLast in -lungif" >&5 | 12424 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for EGifPutExtensionLast in -lungif" >&5 |
| 12337 | $as_echo_n "checking for EGifPutExtensionLast in -lungif... " >&6; } | 12425 | $as_echo_n "checking for EGifPutExtensionLast in -lungif... " >&6; } |
| 12338 | if ${ac_cv_lib_ungif_EGifPutExtensionLast+:} false; then : | 12426 | if test "${ac_cv_lib_ungif_EGifPutExtensionLast+set}" = set; then : |
| 12339 | $as_echo_n "(cached) " >&6 | 12427 | $as_echo_n "(cached) " >&6 |
| 12340 | else | 12428 | else |
| 12341 | ac_check_lib_save_LIBS=$LIBS | 12429 | ac_check_lib_save_LIBS=$LIBS |
| @@ -12369,7 +12457,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 12369 | fi | 12457 | fi |
| 12370 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_ungif_EGifPutExtensionLast" >&5 | 12458 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_ungif_EGifPutExtensionLast" >&5 |
| 12371 | $as_echo "$ac_cv_lib_ungif_EGifPutExtensionLast" >&6; } | 12459 | $as_echo "$ac_cv_lib_ungif_EGifPutExtensionLast" >&6; } |
| 12372 | if test "x$ac_cv_lib_ungif_EGifPutExtensionLast" = xyes; then : | 12460 | if test "x$ac_cv_lib_ungif_EGifPutExtensionLast" = x""yes; then : |
| 12373 | HAVE_GIF=yes | 12461 | HAVE_GIF=yes |
| 12374 | else | 12462 | else |
| 12375 | HAVE_GIF=no | 12463 | HAVE_GIF=no |
| @@ -12416,10 +12504,10 @@ LIBGPM= | |||
| 12416 | MOUSE_SUPPORT= | 12504 | MOUSE_SUPPORT= |
| 12417 | if test "${with_gpm}" != "no"; then | 12505 | if test "${with_gpm}" != "no"; then |
| 12418 | ac_fn_c_check_header_mongrel "$LINENO" "gpm.h" "ac_cv_header_gpm_h" "$ac_includes_default" | 12506 | ac_fn_c_check_header_mongrel "$LINENO" "gpm.h" "ac_cv_header_gpm_h" "$ac_includes_default" |
| 12419 | if test "x$ac_cv_header_gpm_h" = xyes; then : | 12507 | if test "x$ac_cv_header_gpm_h" = x""yes; then : |
| 12420 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for Gpm_Open in -lgpm" >&5 | 12508 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for Gpm_Open in -lgpm" >&5 |
| 12421 | $as_echo_n "checking for Gpm_Open in -lgpm... " >&6; } | 12509 | $as_echo_n "checking for Gpm_Open in -lgpm... " >&6; } |
| 12422 | if ${ac_cv_lib_gpm_Gpm_Open+:} false; then : | 12510 | if test "${ac_cv_lib_gpm_Gpm_Open+set}" = set; then : |
| 12423 | $as_echo_n "(cached) " >&6 | 12511 | $as_echo_n "(cached) " >&6 |
| 12424 | else | 12512 | else |
| 12425 | ac_check_lib_save_LIBS=$LIBS | 12513 | ac_check_lib_save_LIBS=$LIBS |
| @@ -12453,7 +12541,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 12453 | fi | 12541 | fi |
| 12454 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_gpm_Gpm_Open" >&5 | 12542 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_gpm_Gpm_Open" >&5 |
| 12455 | $as_echo "$ac_cv_lib_gpm_Gpm_Open" >&6; } | 12543 | $as_echo "$ac_cv_lib_gpm_Gpm_Open" >&6; } |
| 12456 | if test "x$ac_cv_lib_gpm_Gpm_Open" = xyes; then : | 12544 | if test "x$ac_cv_lib_gpm_Gpm_Open" = x""yes; then : |
| 12457 | HAVE_GPM=yes | 12545 | HAVE_GPM=yes |
| 12458 | fi | 12546 | fi |
| 12459 | 12547 | ||
| @@ -12473,7 +12561,7 @@ fi | |||
| 12473 | 12561 | ||
| 12474 | 12562 | ||
| 12475 | ac_fn_c_check_header_mongrel "$LINENO" "malloc/malloc.h" "ac_cv_header_malloc_malloc_h" "$ac_includes_default" | 12563 | ac_fn_c_check_header_mongrel "$LINENO" "malloc/malloc.h" "ac_cv_header_malloc_malloc_h" "$ac_includes_default" |
| 12476 | if test "x$ac_cv_header_malloc_malloc_h" = xyes; then : | 12564 | if test "x$ac_cv_header_malloc_malloc_h" = x""yes; then : |
| 12477 | 12565 | ||
| 12478 | $as_echo "#define HAVE_MALLOC_MALLOC_H 1" >>confdefs.h | 12566 | $as_echo "#define HAVE_MALLOC_MALLOC_H 1" >>confdefs.h |
| 12479 | 12567 | ||
| @@ -12518,10 +12606,10 @@ HAVE_X_SM=no | |||
| 12518 | LIBXSM= | 12606 | LIBXSM= |
| 12519 | if test "${HAVE_X11}" = "yes"; then | 12607 | if test "${HAVE_X11}" = "yes"; then |
| 12520 | ac_fn_c_check_header_mongrel "$LINENO" "X11/SM/SMlib.h" "ac_cv_header_X11_SM_SMlib_h" "$ac_includes_default" | 12608 | ac_fn_c_check_header_mongrel "$LINENO" "X11/SM/SMlib.h" "ac_cv_header_X11_SM_SMlib_h" "$ac_includes_default" |
| 12521 | if test "x$ac_cv_header_X11_SM_SMlib_h" = xyes; then : | 12609 | if test "x$ac_cv_header_X11_SM_SMlib_h" = x""yes; then : |
| 12522 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for SmcOpenConnection in -lSM" >&5 | 12610 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for SmcOpenConnection in -lSM" >&5 |
| 12523 | $as_echo_n "checking for SmcOpenConnection in -lSM... " >&6; } | 12611 | $as_echo_n "checking for SmcOpenConnection in -lSM... " >&6; } |
| 12524 | if ${ac_cv_lib_SM_SmcOpenConnection+:} false; then : | 12612 | if test "${ac_cv_lib_SM_SmcOpenConnection+set}" = set; then : |
| 12525 | $as_echo_n "(cached) " >&6 | 12613 | $as_echo_n "(cached) " >&6 |
| 12526 | else | 12614 | else |
| 12527 | ac_check_lib_save_LIBS=$LIBS | 12615 | ac_check_lib_save_LIBS=$LIBS |
| @@ -12555,7 +12643,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 12555 | fi | 12643 | fi |
| 12556 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_SM_SmcOpenConnection" >&5 | 12644 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_SM_SmcOpenConnection" >&5 |
| 12557 | $as_echo "$ac_cv_lib_SM_SmcOpenConnection" >&6; } | 12645 | $as_echo "$ac_cv_lib_SM_SmcOpenConnection" >&6; } |
| 12558 | if test "x$ac_cv_lib_SM_SmcOpenConnection" = xyes; then : | 12646 | if test "x$ac_cv_lib_SM_SmcOpenConnection" = x""yes; then : |
| 12559 | HAVE_X_SM=yes | 12647 | HAVE_X_SM=yes |
| 12560 | fi | 12648 | fi |
| 12561 | 12649 | ||
| @@ -12586,7 +12674,7 @@ if test "${with_xml2}" != "no"; then | |||
| 12586 | set dummy pkg-config; ac_word=$2 | 12674 | set dummy pkg-config; ac_word=$2 |
| 12587 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 12675 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 12588 | $as_echo_n "checking for $ac_word... " >&6; } | 12676 | $as_echo_n "checking for $ac_word... " >&6; } |
| 12589 | if ${ac_cv_path_PKG_CONFIG+:} false; then : | 12677 | if test "${ac_cv_path_PKG_CONFIG+set}" = set; then : |
| 12590 | $as_echo_n "(cached) " >&6 | 12678 | $as_echo_n "(cached) " >&6 |
| 12591 | else | 12679 | else |
| 12592 | case $PKG_CONFIG in | 12680 | case $PKG_CONFIG in |
| @@ -12677,7 +12765,7 @@ $as_echo "no" >&6; } | |||
| 12677 | LIBS="$LIBXML2_LIBS $LIBS" | 12765 | LIBS="$LIBXML2_LIBS $LIBS" |
| 12678 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for htmlReadMemory in -lxml2" >&5 | 12766 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for htmlReadMemory in -lxml2" >&5 |
| 12679 | $as_echo_n "checking for htmlReadMemory in -lxml2... " >&6; } | 12767 | $as_echo_n "checking for htmlReadMemory in -lxml2... " >&6; } |
| 12680 | if ${ac_cv_lib_xml2_htmlReadMemory+:} false; then : | 12768 | if test "${ac_cv_lib_xml2_htmlReadMemory+set}" = set; then : |
| 12681 | $as_echo_n "(cached) " >&6 | 12769 | $as_echo_n "(cached) " >&6 |
| 12682 | else | 12770 | else |
| 12683 | ac_check_lib_save_LIBS=$LIBS | 12771 | ac_check_lib_save_LIBS=$LIBS |
| @@ -12711,7 +12799,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 12711 | fi | 12799 | fi |
| 12712 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_xml2_htmlReadMemory" >&5 | 12800 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_xml2_htmlReadMemory" >&5 |
| 12713 | $as_echo "$ac_cv_lib_xml2_htmlReadMemory" >&6; } | 12801 | $as_echo "$ac_cv_lib_xml2_htmlReadMemory" >&6; } |
| 12714 | if test "x$ac_cv_lib_xml2_htmlReadMemory" = xyes; then : | 12802 | if test "x$ac_cv_lib_xml2_htmlReadMemory" = x""yes; then : |
| 12715 | HAVE_LIBXML2=yes | 12803 | HAVE_LIBXML2=yes |
| 12716 | else | 12804 | else |
| 12717 | HAVE_LIBXML2=no | 12805 | HAVE_LIBXML2=no |
| @@ -12733,7 +12821,7 @@ fi | |||
| 12733 | # If netdb.h doesn't declare h_errno, we must declare it by hand. | 12821 | # If netdb.h doesn't declare h_errno, we must declare it by hand. |
| 12734 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether netdb declares h_errno" >&5 | 12822 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether netdb declares h_errno" >&5 |
| 12735 | $as_echo_n "checking whether netdb declares h_errno... " >&6; } | 12823 | $as_echo_n "checking whether netdb declares h_errno... " >&6; } |
| 12736 | if ${emacs_cv_netdb_declares_h_errno+:} false; then : | 12824 | if test "${emacs_cv_netdb_declares_h_errno+set}" = set; then : |
| 12737 | $as_echo_n "(cached) " >&6 | 12825 | $as_echo_n "(cached) " >&6 |
| 12738 | else | 12826 | else |
| 12739 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 12827 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -12763,22 +12851,11 @@ $as_echo "#define HAVE_H_ERRNO 1" >>confdefs.h | |||
| 12763 | 12851 | ||
| 12764 | fi | 12852 | fi |
| 12765 | 12853 | ||
| 12766 | ac_fn_c_check_type "$LINENO" "size_t" "ac_cv_type_size_t" "$ac_includes_default" | ||
| 12767 | if test "x$ac_cv_type_size_t" = xyes; then : | ||
| 12768 | |||
| 12769 | else | ||
| 12770 | |||
| 12771 | cat >>confdefs.h <<_ACEOF | ||
| 12772 | #define size_t unsigned int | ||
| 12773 | _ACEOF | ||
| 12774 | |||
| 12775 | fi | ||
| 12776 | |||
| 12777 | # The Ultrix 4.2 mips builtin alloca declared by alloca.h only works | 12854 | # The Ultrix 4.2 mips builtin alloca declared by alloca.h only works |
| 12778 | # for constant arguments. Useless! | 12855 | # for constant arguments. Useless! |
| 12779 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working alloca.h" >&5 | 12856 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working alloca.h" >&5 |
| 12780 | $as_echo_n "checking for working alloca.h... " >&6; } | 12857 | $as_echo_n "checking for working alloca.h... " >&6; } |
| 12781 | if ${ac_cv_working_alloca_h+:} false; then : | 12858 | if test "${ac_cv_working_alloca_h+set}" = set; then : |
| 12782 | $as_echo_n "(cached) " >&6 | 12859 | $as_echo_n "(cached) " >&6 |
| 12783 | else | 12860 | else |
| 12784 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 12861 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -12811,7 +12888,7 @@ fi | |||
| 12811 | 12888 | ||
| 12812 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for alloca" >&5 | 12889 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for alloca" >&5 |
| 12813 | $as_echo_n "checking for alloca... " >&6; } | 12890 | $as_echo_n "checking for alloca... " >&6; } |
| 12814 | if ${ac_cv_func_alloca_works+:} false; then : | 12891 | if test "${ac_cv_func_alloca_works+set}" = set; then : |
| 12815 | $as_echo_n "(cached) " >&6 | 12892 | $as_echo_n "(cached) " >&6 |
| 12816 | else | 12893 | else |
| 12817 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 12894 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -12830,7 +12907,7 @@ else | |||
| 12830 | #pragma alloca | 12907 | #pragma alloca |
| 12831 | # else | 12908 | # else |
| 12832 | # ifndef alloca /* predefined by HP cc +Olibcalls */ | 12909 | # ifndef alloca /* predefined by HP cc +Olibcalls */ |
| 12833 | void *alloca (size_t); | 12910 | char *alloca (); |
| 12834 | # endif | 12911 | # endif |
| 12835 | # endif | 12912 | # endif |
| 12836 | # endif | 12913 | # endif |
| @@ -12874,7 +12951,7 @@ $as_echo "#define C_ALLOCA 1" >>confdefs.h | |||
| 12874 | 12951 | ||
| 12875 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether \`alloca.c' needs Cray hooks" >&5 | 12952 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether \`alloca.c' needs Cray hooks" >&5 |
| 12876 | $as_echo_n "checking whether \`alloca.c' needs Cray hooks... " >&6; } | 12953 | $as_echo_n "checking whether \`alloca.c' needs Cray hooks... " >&6; } |
| 12877 | if ${ac_cv_os_cray+:} false; then : | 12954 | if test "${ac_cv_os_cray+set}" = set; then : |
| 12878 | $as_echo_n "(cached) " >&6 | 12955 | $as_echo_n "(cached) " >&6 |
| 12879 | else | 12956 | else |
| 12880 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 12957 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -12915,7 +12992,7 @@ fi | |||
| 12915 | 12992 | ||
| 12916 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking stack direction for C alloca" >&5 | 12993 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking stack direction for C alloca" >&5 |
| 12917 | $as_echo_n "checking stack direction for C alloca... " >&6; } | 12994 | $as_echo_n "checking stack direction for C alloca... " >&6; } |
| 12918 | if ${ac_cv_c_stack_direction+:} false; then : | 12995 | if test "${ac_cv_c_stack_direction+set}" = set; then : |
| 12919 | $as_echo_n "(cached) " >&6 | 12996 | $as_echo_n "(cached) " >&6 |
| 12920 | else | 12997 | else |
| 12921 | if test "$cross_compiling" = yes; then : | 12998 | if test "$cross_compiling" = yes; then : |
| @@ -12972,7 +13049,7 @@ fi | |||
| 12972 | # On HPUX 9.01, -lm does not contain logb, so check for sqrt. | 13049 | # On HPUX 9.01, -lm does not contain logb, so check for sqrt. |
| 12973 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for sqrt in -lm" >&5 | 13050 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for sqrt in -lm" >&5 |
| 12974 | $as_echo_n "checking for sqrt in -lm... " >&6; } | 13051 | $as_echo_n "checking for sqrt in -lm... " >&6; } |
| 12975 | if ${ac_cv_lib_m_sqrt+:} false; then : | 13052 | if test "${ac_cv_lib_m_sqrt+set}" = set; then : |
| 12976 | $as_echo_n "(cached) " >&6 | 13053 | $as_echo_n "(cached) " >&6 |
| 12977 | else | 13054 | else |
| 12978 | ac_check_lib_save_LIBS=$LIBS | 13055 | ac_check_lib_save_LIBS=$LIBS |
| @@ -13006,7 +13083,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 13006 | fi | 13083 | fi |
| 13007 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_m_sqrt" >&5 | 13084 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_m_sqrt" >&5 |
| 13008 | $as_echo "$ac_cv_lib_m_sqrt" >&6; } | 13085 | $as_echo "$ac_cv_lib_m_sqrt" >&6; } |
| 13009 | if test "x$ac_cv_lib_m_sqrt" = xyes; then : | 13086 | if test "x$ac_cv_lib_m_sqrt" = x""yes; then : |
| 13010 | cat >>confdefs.h <<_ACEOF | 13087 | cat >>confdefs.h <<_ACEOF |
| 13011 | #define HAVE_LIBM 1 | 13088 | #define HAVE_LIBM 1 |
| 13012 | _ACEOF | 13089 | _ACEOF |
| @@ -13020,7 +13097,7 @@ fi | |||
| 13020 | # have the same check as for liblockfile below. | 13097 | # have the same check as for liblockfile below. |
| 13021 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for maillock in -lmail" >&5 | 13098 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for maillock in -lmail" >&5 |
| 13022 | $as_echo_n "checking for maillock in -lmail... " >&6; } | 13099 | $as_echo_n "checking for maillock in -lmail... " >&6; } |
| 13023 | if ${ac_cv_lib_mail_maillock+:} false; then : | 13100 | if test "${ac_cv_lib_mail_maillock+set}" = set; then : |
| 13024 | $as_echo_n "(cached) " >&6 | 13101 | $as_echo_n "(cached) " >&6 |
| 13025 | else | 13102 | else |
| 13026 | ac_check_lib_save_LIBS=$LIBS | 13103 | ac_check_lib_save_LIBS=$LIBS |
| @@ -13054,7 +13131,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 13054 | fi | 13131 | fi |
| 13055 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_mail_maillock" >&5 | 13132 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_mail_maillock" >&5 |
| 13056 | $as_echo "$ac_cv_lib_mail_maillock" >&6; } | 13133 | $as_echo "$ac_cv_lib_mail_maillock" >&6; } |
| 13057 | if test "x$ac_cv_lib_mail_maillock" = xyes; then : | 13134 | if test "x$ac_cv_lib_mail_maillock" = x""yes; then : |
| 13058 | have_mail=yes | 13135 | have_mail=yes |
| 13059 | else | 13136 | else |
| 13060 | have_mail=no | 13137 | have_mail=no |
| @@ -13071,7 +13148,7 @@ else | |||
| 13071 | fi | 13148 | fi |
| 13072 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for maillock in -llockfile" >&5 | 13149 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for maillock in -llockfile" >&5 |
| 13073 | $as_echo_n "checking for maillock in -llockfile... " >&6; } | 13150 | $as_echo_n "checking for maillock in -llockfile... " >&6; } |
| 13074 | if ${ac_cv_lib_lockfile_maillock+:} false; then : | 13151 | if test "${ac_cv_lib_lockfile_maillock+set}" = set; then : |
| 13075 | $as_echo_n "(cached) " >&6 | 13152 | $as_echo_n "(cached) " >&6 |
| 13076 | else | 13153 | else |
| 13077 | ac_check_lib_save_LIBS=$LIBS | 13154 | ac_check_lib_save_LIBS=$LIBS |
| @@ -13105,7 +13182,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 13105 | fi | 13182 | fi |
| 13106 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_lockfile_maillock" >&5 | 13183 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_lockfile_maillock" >&5 |
| 13107 | $as_echo "$ac_cv_lib_lockfile_maillock" >&6; } | 13184 | $as_echo "$ac_cv_lib_lockfile_maillock" >&6; } |
| 13108 | if test "x$ac_cv_lib_lockfile_maillock" = xyes; then : | 13185 | if test "x$ac_cv_lib_lockfile_maillock" = x""yes; then : |
| 13109 | have_lockfile=yes | 13186 | have_lockfile=yes |
| 13110 | else | 13187 | else |
| 13111 | have_lockfile=no | 13188 | have_lockfile=no |
| @@ -13125,7 +13202,7 @@ else | |||
| 13125 | set dummy liblockfile.so; ac_word=$2 | 13202 | set dummy liblockfile.so; ac_word=$2 |
| 13126 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 | 13203 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $ac_word" >&5 |
| 13127 | $as_echo_n "checking for $ac_word... " >&6; } | 13204 | $as_echo_n "checking for $ac_word... " >&6; } |
| 13128 | if ${ac_cv_prog_liblockfile+:} false; then : | 13205 | if test "${ac_cv_prog_liblockfile+set}" = set; then : |
| 13129 | $as_echo_n "(cached) " >&6 | 13206 | $as_echo_n "(cached) " >&6 |
| 13130 | else | 13207 | else |
| 13131 | if test -n "$liblockfile"; then | 13208 | if test -n "$liblockfile"; then |
| @@ -13169,7 +13246,7 @@ fi | |||
| 13169 | for ac_func in touchlock | 13246 | for ac_func in touchlock |
| 13170 | do : | 13247 | do : |
| 13171 | ac_fn_c_check_func "$LINENO" "touchlock" "ac_cv_func_touchlock" | 13248 | ac_fn_c_check_func "$LINENO" "touchlock" "ac_cv_func_touchlock" |
| 13172 | if test "x$ac_cv_func_touchlock" = xyes; then : | 13249 | if test "x$ac_cv_func_touchlock" = x""yes; then : |
| 13173 | cat >>confdefs.h <<_ACEOF | 13250 | cat >>confdefs.h <<_ACEOF |
| 13174 | #define HAVE_TOUCHLOCK 1 | 13251 | #define HAVE_TOUCHLOCK 1 |
| 13175 | _ACEOF | 13252 | _ACEOF |
| @@ -13180,7 +13257,7 @@ done | |||
| 13180 | for ac_header in maillock.h | 13257 | for ac_header in maillock.h |
| 13181 | do : | 13258 | do : |
| 13182 | ac_fn_c_check_header_mongrel "$LINENO" "maillock.h" "ac_cv_header_maillock_h" "$ac_includes_default" | 13259 | ac_fn_c_check_header_mongrel "$LINENO" "maillock.h" "ac_cv_header_maillock_h" "$ac_includes_default" |
| 13183 | if test "x$ac_cv_header_maillock_h" = xyes; then : | 13260 | if test "x$ac_cv_header_maillock_h" = x""yes; then : |
| 13184 | cat >>confdefs.h <<_ACEOF | 13261 | cat >>confdefs.h <<_ACEOF |
| 13185 | #define HAVE_MAILLOCK_H 1 | 13262 | #define HAVE_MAILLOCK_H 1 |
| 13186 | _ACEOF | 13263 | _ACEOF |
| @@ -13261,7 +13338,7 @@ done | |||
| 13261 | 13338 | ||
| 13262 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for __builtin_unwind_init" >&5 | 13339 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for __builtin_unwind_init" >&5 |
| 13263 | $as_echo_n "checking for __builtin_unwind_init... " >&6; } | 13340 | $as_echo_n "checking for __builtin_unwind_init... " >&6; } |
| 13264 | if ${emacs_cv_func___builtin_unwind_init+:} false; then : | 13341 | if test "${emacs_cv_func___builtin_unwind_init+set}" = set; then : |
| 13265 | $as_echo_n "(cached) " >&6 | 13342 | $as_echo_n "(cached) " >&6 |
| 13266 | else | 13343 | else |
| 13267 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 13344 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -13294,7 +13371,7 @@ fi | |||
| 13294 | for ac_header in sys/un.h | 13371 | for ac_header in sys/un.h |
| 13295 | do : | 13372 | do : |
| 13296 | ac_fn_c_check_header_mongrel "$LINENO" "sys/un.h" "ac_cv_header_sys_un_h" "$ac_includes_default" | 13373 | ac_fn_c_check_header_mongrel "$LINENO" "sys/un.h" "ac_cv_header_sys_un_h" "$ac_includes_default" |
| 13297 | if test "x$ac_cv_header_sys_un_h" = xyes; then : | 13374 | if test "x$ac_cv_header_sys_un_h" = x""yes; then : |
| 13298 | cat >>confdefs.h <<_ACEOF | 13375 | cat >>confdefs.h <<_ACEOF |
| 13299 | #define HAVE_SYS_UN_H 1 | 13376 | #define HAVE_SYS_UN_H 1 |
| 13300 | _ACEOF | 13377 | _ACEOF |
| @@ -13306,7 +13383,7 @@ done | |||
| 13306 | 13383 | ||
| 13307 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for _LARGEFILE_SOURCE value needed for large files" >&5 | 13384 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for _LARGEFILE_SOURCE value needed for large files" >&5 |
| 13308 | $as_echo_n "checking for _LARGEFILE_SOURCE value needed for large files... " >&6; } | 13385 | $as_echo_n "checking for _LARGEFILE_SOURCE value needed for large files... " >&6; } |
| 13309 | if ${ac_cv_sys_largefile_source+:} false; then : | 13386 | if test "${ac_cv_sys_largefile_source+set}" = set; then : |
| 13310 | $as_echo_n "(cached) " >&6 | 13387 | $as_echo_n "(cached) " >&6 |
| 13311 | else | 13388 | else |
| 13312 | while :; do | 13389 | while :; do |
| @@ -13375,7 +13452,7 @@ fi | |||
| 13375 | 13452 | ||
| 13376 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether getpgrp requires zero arguments" >&5 | 13453 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether getpgrp requires zero arguments" >&5 |
| 13377 | $as_echo_n "checking whether getpgrp requires zero arguments... " >&6; } | 13454 | $as_echo_n "checking whether getpgrp requires zero arguments... " >&6; } |
| 13378 | if ${ac_cv_func_getpgrp_void+:} false; then : | 13455 | if test "${ac_cv_func_getpgrp_void+set}" = set; then : |
| 13379 | $as_echo_n "(cached) " >&6 | 13456 | $as_echo_n "(cached) " >&6 |
| 13380 | else | 13457 | else |
| 13381 | # Use it with a single arg. | 13458 | # Use it with a single arg. |
| @@ -13424,7 +13501,7 @@ fi | |||
| 13424 | 13501 | ||
| 13425 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether byte ordering is bigendian" >&5 | 13502 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether byte ordering is bigendian" >&5 |
| 13426 | $as_echo_n "checking whether byte ordering is bigendian... " >&6; } | 13503 | $as_echo_n "checking whether byte ordering is bigendian... " >&6; } |
| 13427 | if ${ac_cv_c_bigendian+:} false; then : | 13504 | if test "${ac_cv_c_bigendian+set}" = set; then : |
| 13428 | $as_echo_n "(cached) " >&6 | 13505 | $as_echo_n "(cached) " >&6 |
| 13429 | else | 13506 | else |
| 13430 | ac_cv_c_bigendian=unknown | 13507 | ac_cv_c_bigendian=unknown |
| @@ -13643,13 +13720,13 @@ $as_echo "#define AC_APPLE_UNIVERSAL_BUILD 1" >>confdefs.h | |||
| 13643 | ;; #( | 13720 | ;; #( |
| 13644 | *) | 13721 | *) |
| 13645 | as_fn_error $? "unknown endianness | 13722 | as_fn_error $? "unknown endianness |
| 13646 | presetting ac_cv_c_bigendian=no (or yes) will help" "$LINENO" 5 ;; | 13723 | presetting ac_cv_c_bigendian=no (or yes) will help" "$LINENO" 5 ;; |
| 13647 | esac | 13724 | esac |
| 13648 | 13725 | ||
| 13649 | 13726 | ||
| 13650 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for inline" >&5 | 13727 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for inline" >&5 |
| 13651 | $as_echo_n "checking for inline... " >&6; } | 13728 | $as_echo_n "checking for inline... " >&6; } |
| 13652 | if ${ac_cv_c_inline+:} false; then : | 13729 | if test "${ac_cv_c_inline+set}" = set; then : |
| 13653 | $as_echo_n "(cached) " >&6 | 13730 | $as_echo_n "(cached) " >&6 |
| 13654 | else | 13731 | else |
| 13655 | ac_cv_c_inline=no | 13732 | ac_cv_c_inline=no |
| @@ -13692,7 +13769,7 @@ esac | |||
| 13692 | 13769 | ||
| 13693 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether strtold conforms to C99" >&5 | 13770 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether strtold conforms to C99" >&5 |
| 13694 | $as_echo_n "checking whether strtold conforms to C99... " >&6; } | 13771 | $as_echo_n "checking whether strtold conforms to C99... " >&6; } |
| 13695 | if ${gl_cv_func_c99_strtold+:} false; then : | 13772 | if test "${gl_cv_func_c99_strtold+set}" = set; then : |
| 13696 | $as_echo_n "(cached) " >&6 | 13773 | $as_echo_n "(cached) " >&6 |
| 13697 | else | 13774 | else |
| 13698 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 13775 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -13735,7 +13812,7 @@ $as_echo "#define HAVE_C99_STRTOLD 1" >>confdefs.h | |||
| 13735 | 13812 | ||
| 13736 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for st_dm_mode in struct stat" >&5 | 13813 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for st_dm_mode in struct stat" >&5 |
| 13737 | $as_echo_n "checking for st_dm_mode in struct stat... " >&6; } | 13814 | $as_echo_n "checking for st_dm_mode in struct stat... " >&6; } |
| 13738 | if ${ac_cv_struct_st_dm_mode+:} false; then : | 13815 | if test "${ac_cv_struct_st_dm_mode+set}" = set; then : |
| 13739 | $as_echo_n "(cached) " >&6 | 13816 | $as_echo_n "(cached) " >&6 |
| 13740 | else | 13817 | else |
| 13741 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 13818 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -13769,7 +13846,7 @@ $as_echo "#define HAVE_ST_DM_MODE 1" >>confdefs.h | |||
| 13769 | 13846 | ||
| 13770 | 13847 | ||
| 13771 | ac_fn_c_check_decl "$LINENO" "strmode" "ac_cv_have_decl_strmode" "$ac_includes_default" | 13848 | ac_fn_c_check_decl "$LINENO" "strmode" "ac_cv_have_decl_strmode" "$ac_includes_default" |
| 13772 | if test "x$ac_cv_have_decl_strmode" = xyes; then : | 13849 | if test "x$ac_cv_have_decl_strmode" = x""yes; then : |
| 13773 | ac_have_decl=1 | 13850 | ac_have_decl=1 |
| 13774 | else | 13851 | else |
| 13775 | ac_have_decl=0 | 13852 | ac_have_decl=0 |
| @@ -13958,7 +14035,7 @@ _ACEOF | |||
| 13958 | 14035 | ||
| 13959 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether the preprocessor supports include_next" >&5 | 14036 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether the preprocessor supports include_next" >&5 |
| 13960 | $as_echo_n "checking whether the preprocessor supports include_next... " >&6; } | 14037 | $as_echo_n "checking whether the preprocessor supports include_next... " >&6; } |
| 13961 | if ${gl_cv_have_include_next+:} false; then : | 14038 | if test "${gl_cv_have_include_next+set}" = set; then : |
| 13962 | $as_echo_n "(cached) " >&6 | 14039 | $as_echo_n "(cached) " >&6 |
| 13963 | else | 14040 | else |
| 13964 | rm -rf conftestd1a conftestd1b conftestd2 | 14041 | rm -rf conftestd1a conftestd1b conftestd2 |
| @@ -14038,7 +14115,7 @@ $as_echo "$gl_cv_have_include_next" >&6; } | |||
| 14038 | 14115 | ||
| 14039 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether system header files limit the line length" >&5 | 14116 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether system header files limit the line length" >&5 |
| 14040 | $as_echo_n "checking whether system header files limit the line length... " >&6; } | 14117 | $as_echo_n "checking whether system header files limit the line length... " >&6; } |
| 14041 | if ${gl_cv_pragma_columns+:} false; then : | 14118 | if test "${gl_cv_pragma_columns+set}" = set; then : |
| 14042 | $as_echo_n "(cached) " >&6 | 14119 | $as_echo_n "(cached) " >&6 |
| 14043 | else | 14120 | else |
| 14044 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 14121 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -14088,7 +14165,7 @@ $as_echo "$gl_cv_pragma_columns" >&6; } | |||
| 14088 | else | 14165 | else |
| 14089 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <getopt.h>" >&5 | 14166 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <getopt.h>" >&5 |
| 14090 | $as_echo_n "checking absolute name of <getopt.h>... " >&6; } | 14167 | $as_echo_n "checking absolute name of <getopt.h>... " >&6; } |
| 14091 | if ${gl_cv_next_getopt_h+:} false; then : | 14168 | if test "${gl_cv_next_getopt_h+set}" = set; then : |
| 14092 | $as_echo_n "(cached) " >&6 | 14169 | $as_echo_n "(cached) " >&6 |
| 14093 | else | 14170 | else |
| 14094 | 14171 | ||
| @@ -14147,7 +14224,7 @@ $as_echo "$gl_cv_next_getopt_h" >&6; } | |||
| 14147 | for ac_header in getopt.h | 14224 | for ac_header in getopt.h |
| 14148 | do : | 14225 | do : |
| 14149 | ac_fn_c_check_header_mongrel "$LINENO" "getopt.h" "ac_cv_header_getopt_h" "$ac_includes_default" | 14226 | ac_fn_c_check_header_mongrel "$LINENO" "getopt.h" "ac_cv_header_getopt_h" "$ac_includes_default" |
| 14150 | if test "x$ac_cv_header_getopt_h" = xyes; then : | 14227 | if test "x$ac_cv_header_getopt_h" = x""yes; then : |
| 14151 | cat >>confdefs.h <<_ACEOF | 14228 | cat >>confdefs.h <<_ACEOF |
| 14152 | #define HAVE_GETOPT_H 1 | 14229 | #define HAVE_GETOPT_H 1 |
| 14153 | _ACEOF | 14230 | _ACEOF |
| @@ -14164,7 +14241,7 @@ done | |||
| 14164 | for ac_func in getopt_long_only | 14241 | for ac_func in getopt_long_only |
| 14165 | do : | 14242 | do : |
| 14166 | ac_fn_c_check_func "$LINENO" "getopt_long_only" "ac_cv_func_getopt_long_only" | 14243 | ac_fn_c_check_func "$LINENO" "getopt_long_only" "ac_cv_func_getopt_long_only" |
| 14167 | if test "x$ac_cv_func_getopt_long_only" = xyes; then : | 14244 | if test "x$ac_cv_func_getopt_long_only" = x""yes; then : |
| 14168 | cat >>confdefs.h <<_ACEOF | 14245 | cat >>confdefs.h <<_ACEOF |
| 14169 | #define HAVE_GETOPT_LONG_ONLY 1 | 14246 | #define HAVE_GETOPT_LONG_ONLY 1 |
| 14170 | _ACEOF | 14247 | _ACEOF |
| @@ -14179,7 +14256,7 @@ done | |||
| 14179 | if test -z "$gl_replace_getopt"; then | 14256 | if test -z "$gl_replace_getopt"; then |
| 14180 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether getopt is POSIX compatible" >&5 | 14257 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether getopt is POSIX compatible" >&5 |
| 14181 | $as_echo_n "checking whether getopt is POSIX compatible... " >&6; } | 14258 | $as_echo_n "checking whether getopt is POSIX compatible... " >&6; } |
| 14182 | if ${gl_cv_func_getopt_posix+:} false; then : | 14259 | if test "${gl_cv_func_getopt_posix+set}" = set; then : |
| 14183 | $as_echo_n "(cached) " >&6 | 14260 | $as_echo_n "(cached) " >&6 |
| 14184 | else | 14261 | else |
| 14185 | 14262 | ||
| @@ -14337,7 +14414,7 @@ $as_echo "$gl_cv_func_getopt_posix" >&6; } | |||
| 14337 | if test -z "$gl_replace_getopt" && test $gl_getopt_required = GNU; then | 14414 | if test -z "$gl_replace_getopt" && test $gl_getopt_required = GNU; then |
| 14338 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working GNU getopt function" >&5 | 14415 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working GNU getopt function" >&5 |
| 14339 | $as_echo_n "checking for working GNU getopt function... " >&6; } | 14416 | $as_echo_n "checking for working GNU getopt function... " >&6; } |
| 14340 | if ${gl_cv_func_getopt_gnu+:} false; then : | 14417 | if test "${gl_cv_func_getopt_gnu+set}" = set; then : |
| 14341 | $as_echo_n "(cached) " >&6 | 14418 | $as_echo_n "(cached) " >&6 |
| 14342 | else | 14419 | else |
| 14343 | # Even with POSIXLY_CORRECT, the GNU extension of leading '-' in the | 14420 | # Even with POSIXLY_CORRECT, the GNU extension of leading '-' in the |
| @@ -14449,7 +14526,7 @@ $as_echo "$gl_cv_func_getopt_gnu" >&6; } | |||
| 14449 | fi | 14526 | fi |
| 14450 | 14527 | ||
| 14451 | ac_fn_c_check_decl "$LINENO" "getenv" "ac_cv_have_decl_getenv" "$ac_includes_default" | 14528 | ac_fn_c_check_decl "$LINENO" "getenv" "ac_cv_have_decl_getenv" "$ac_includes_default" |
| 14452 | if test "x$ac_cv_have_decl_getenv" = xyes; then : | 14529 | if test "x$ac_cv_have_decl_getenv" = x""yes; then : |
| 14453 | ac_have_decl=1 | 14530 | ac_have_decl=1 |
| 14454 | else | 14531 | else |
| 14455 | ac_have_decl=0 | 14532 | ac_have_decl=0 |
| @@ -14557,7 +14634,7 @@ done | |||
| 14557 | 14634 | ||
| 14558 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether lstat correctly handles trailing slash" >&5 | 14635 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether lstat correctly handles trailing slash" >&5 |
| 14559 | $as_echo_n "checking whether lstat correctly handles trailing slash... " >&6; } | 14636 | $as_echo_n "checking whether lstat correctly handles trailing slash... " >&6; } |
| 14560 | if ${ac_cv_func_lstat_dereferences_slashed_symlink+:} false; then : | 14637 | if test "${ac_cv_func_lstat_dereferences_slashed_symlink+set}" = set; then : |
| 14561 | $as_echo_n "(cached) " >&6 | 14638 | $as_echo_n "(cached) " >&6 |
| 14562 | else | 14639 | else |
| 14563 | rm -f conftest.sym conftest.file | 14640 | rm -f conftest.sym conftest.file |
| @@ -14687,7 +14764,7 @@ rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext | |||
| 14687 | 14764 | ||
| 14688 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for stdbool.h that conforms to C99" >&5 | 14765 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for stdbool.h that conforms to C99" >&5 |
| 14689 | $as_echo_n "checking for stdbool.h that conforms to C99... " >&6; } | 14766 | $as_echo_n "checking for stdbool.h that conforms to C99... " >&6; } |
| 14690 | if ${ac_cv_header_stdbool_h+:} false; then : | 14767 | if test "${ac_cv_header_stdbool_h+set}" = set; then : |
| 14691 | $as_echo_n "(cached) " >&6 | 14768 | $as_echo_n "(cached) " >&6 |
| 14692 | else | 14769 | else |
| 14693 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 14770 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -14762,7 +14839,7 @@ fi | |||
| 14762 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_header_stdbool_h" >&5 | 14839 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_header_stdbool_h" >&5 |
| 14763 | $as_echo "$ac_cv_header_stdbool_h" >&6; } | 14840 | $as_echo "$ac_cv_header_stdbool_h" >&6; } |
| 14764 | ac_fn_c_check_type "$LINENO" "_Bool" "ac_cv_type__Bool" "$ac_includes_default" | 14841 | ac_fn_c_check_type "$LINENO" "_Bool" "ac_cv_type__Bool" "$ac_includes_default" |
| 14765 | if test "x$ac_cv_type__Bool" = xyes; then : | 14842 | if test "x$ac_cv_type__Bool" = x""yes; then : |
| 14766 | 14843 | ||
| 14767 | cat >>confdefs.h <<_ACEOF | 14844 | cat >>confdefs.h <<_ACEOF |
| 14768 | #define HAVE__BOOL 1 | 14845 | #define HAVE__BOOL 1 |
| @@ -14780,7 +14857,7 @@ fi | |||
| 14780 | 14857 | ||
| 14781 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for wchar_t" >&5 | 14858 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for wchar_t" >&5 |
| 14782 | $as_echo_n "checking for wchar_t... " >&6; } | 14859 | $as_echo_n "checking for wchar_t... " >&6; } |
| 14783 | if ${gt_cv_c_wchar_t+:} false; then : | 14860 | if test "${gt_cv_c_wchar_t+set}" = set; then : |
| 14784 | $as_echo_n "(cached) " >&6 | 14861 | $as_echo_n "(cached) " >&6 |
| 14785 | else | 14862 | else |
| 14786 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 14863 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -14813,7 +14890,7 @@ $as_echo "#define HAVE_WCHAR_T 1" >>confdefs.h | |||
| 14813 | 14890 | ||
| 14814 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for unsigned long long int" >&5 | 14891 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for unsigned long long int" >&5 |
| 14815 | $as_echo_n "checking for unsigned long long int... " >&6; } | 14892 | $as_echo_n "checking for unsigned long long int... " >&6; } |
| 14816 | if ${ac_cv_type_unsigned_long_long_int+:} false; then : | 14893 | if test "${ac_cv_type_unsigned_long_long_int+set}" = set; then : |
| 14817 | $as_echo_n "(cached) " >&6 | 14894 | $as_echo_n "(cached) " >&6 |
| 14818 | else | 14895 | else |
| 14819 | ac_cv_type_unsigned_long_long_int=yes | 14896 | ac_cv_type_unsigned_long_long_int=yes |
| @@ -14871,7 +14948,7 @@ $as_echo "#define HAVE_UNSIGNED_LONG_LONG_INT 1" >>confdefs.h | |||
| 14871 | 14948 | ||
| 14872 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for long long int" >&5 | 14949 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for long long int" >&5 |
| 14873 | $as_echo_n "checking for long long int... " >&6; } | 14950 | $as_echo_n "checking for long long int... " >&6; } |
| 14874 | if ${ac_cv_type_long_long_int+:} false; then : | 14951 | if test "${ac_cv_type_long_long_int+set}" = set; then : |
| 14875 | $as_echo_n "(cached) " >&6 | 14952 | $as_echo_n "(cached) " >&6 |
| 14876 | else | 14953 | else |
| 14877 | ac_cv_type_long_long_int=yes | 14954 | ac_cv_type_long_long_int=yes |
| @@ -14934,7 +15011,7 @@ $as_echo "#define HAVE_LONG_LONG_INT 1" >>confdefs.h | |||
| 14934 | 15011 | ||
| 14935 | ac_fn_c_check_member "$LINENO" "struct tm" "tm_gmtoff" "ac_cv_member_struct_tm_tm_gmtoff" "#include <time.h> | 15012 | ac_fn_c_check_member "$LINENO" "struct tm" "tm_gmtoff" "ac_cv_member_struct_tm_tm_gmtoff" "#include <time.h> |
| 14936 | " | 15013 | " |
| 14937 | if test "x$ac_cv_member_struct_tm_tm_gmtoff" = xyes; then : | 15014 | if test "x$ac_cv_member_struct_tm_tm_gmtoff" = x""yes; then : |
| 14938 | 15015 | ||
| 14939 | $as_echo "#define HAVE_TM_GMTOFF 1" >>confdefs.h | 15016 | $as_echo "#define HAVE_TM_GMTOFF 1" >>confdefs.h |
| 14940 | 15017 | ||
| @@ -14947,7 +15024,7 @@ fi | |||
| 14947 | 15024 | ||
| 14948 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether stat file-mode macros are broken" >&5 | 15025 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether stat file-mode macros are broken" >&5 |
| 14949 | $as_echo_n "checking whether stat file-mode macros are broken... " >&6; } | 15026 | $as_echo_n "checking whether stat file-mode macros are broken... " >&6; } |
| 14950 | if ${ac_cv_header_stat_broken+:} false; then : | 15027 | if test "${ac_cv_header_stat_broken+set}" = set; then : |
| 14951 | $as_echo_n "(cached) " >&6 | 15028 | $as_echo_n "(cached) " >&6 |
| 14952 | else | 15029 | else |
| 14953 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 15030 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -14991,7 +15068,7 @@ fi | |||
| 14991 | 15068 | ||
| 14992 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for C/C++ restrict keyword" >&5 | 15069 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for C/C++ restrict keyword" >&5 |
| 14993 | $as_echo_n "checking for C/C++ restrict keyword... " >&6; } | 15070 | $as_echo_n "checking for C/C++ restrict keyword... " >&6; } |
| 14994 | if ${ac_cv_c_restrict+:} false; then : | 15071 | if test "${ac_cv_c_restrict+set}" = set; then : |
| 14995 | $as_echo_n "(cached) " >&6 | 15072 | $as_echo_n "(cached) " >&6 |
| 14996 | else | 15073 | else |
| 14997 | ac_cv_c_restrict=no | 15074 | ac_cv_c_restrict=no |
| @@ -15041,7 +15118,7 @@ _ACEOF | |||
| 15041 | 15118 | ||
| 15042 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for struct timespec in <time.h>" >&5 | 15119 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for struct timespec in <time.h>" >&5 |
| 15043 | $as_echo_n "checking for struct timespec in <time.h>... " >&6; } | 15120 | $as_echo_n "checking for struct timespec in <time.h>... " >&6; } |
| 15044 | if ${gl_cv_sys_struct_timespec_in_time_h+:} false; then : | 15121 | if test "${gl_cv_sys_struct_timespec_in_time_h+set}" = set; then : |
| 15045 | $as_echo_n "(cached) " >&6 | 15122 | $as_echo_n "(cached) " >&6 |
| 15046 | else | 15123 | else |
| 15047 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 15124 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -15074,7 +15151,7 @@ $as_echo "$gl_cv_sys_struct_timespec_in_time_h" >&6; } | |||
| 15074 | else | 15151 | else |
| 15075 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for struct timespec in <sys/time.h>" >&5 | 15152 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for struct timespec in <sys/time.h>" >&5 |
| 15076 | $as_echo_n "checking for struct timespec in <sys/time.h>... " >&6; } | 15153 | $as_echo_n "checking for struct timespec in <sys/time.h>... " >&6; } |
| 15077 | if ${gl_cv_sys_struct_timespec_in_sys_time_h+:} false; then : | 15154 | if test "${gl_cv_sys_struct_timespec_in_sys_time_h+set}" = set; then : |
| 15078 | $as_echo_n "(cached) " >&6 | 15155 | $as_echo_n "(cached) " >&6 |
| 15079 | else | 15156 | else |
| 15080 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 15157 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -15103,7 +15180,7 @@ $as_echo "$gl_cv_sys_struct_timespec_in_sys_time_h" >&6; } | |||
| 15103 | else | 15180 | else |
| 15104 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for struct timespec in <pthread.h>" >&5 | 15181 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for struct timespec in <pthread.h>" >&5 |
| 15105 | $as_echo_n "checking for struct timespec in <pthread.h>... " >&6; } | 15182 | $as_echo_n "checking for struct timespec in <pthread.h>... " >&6; } |
| 15106 | if ${gl_cv_sys_struct_timespec_in_pthread_h+:} false; then : | 15183 | if test "${gl_cv_sys_struct_timespec_in_pthread_h+set}" = set; then : |
| 15107 | $as_echo_n "(cached) " >&6 | 15184 | $as_echo_n "(cached) " >&6 |
| 15108 | else | 15185 | else |
| 15109 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 15186 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -15152,7 +15229,7 @@ $as_echo "$gl_cv_sys_struct_timespec_in_pthread_h" >&6; } | |||
| 15152 | else | 15229 | else |
| 15153 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <time.h>" >&5 | 15230 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <time.h>" >&5 |
| 15154 | $as_echo_n "checking absolute name of <time.h>... " >&6; } | 15231 | $as_echo_n "checking absolute name of <time.h>... " >&6; } |
| 15155 | if ${gl_cv_next_time_h+:} false; then : | 15232 | if test "${gl_cv_next_time_h+set}" = set; then : |
| 15156 | $as_echo_n "(cached) " >&6 | 15233 | $as_echo_n "(cached) " >&6 |
| 15157 | else | 15234 | else |
| 15158 | 15235 | ||
| @@ -15195,7 +15272,7 @@ $as_echo "$gl_cv_next_time_h" >&6; } | |||
| 15195 | 15272 | ||
| 15196 | 15273 | ||
| 15197 | ac_fn_c_check_decl "$LINENO" "localtime_r" "ac_cv_have_decl_localtime_r" "$ac_includes_default" | 15274 | ac_fn_c_check_decl "$LINENO" "localtime_r" "ac_cv_have_decl_localtime_r" "$ac_includes_default" |
| 15198 | if test "x$ac_cv_have_decl_localtime_r" = xyes; then : | 15275 | if test "x$ac_cv_have_decl_localtime_r" = x""yes; then : |
| 15199 | ac_have_decl=1 | 15276 | ac_have_decl=1 |
| 15200 | else | 15277 | else |
| 15201 | ac_have_decl=0 | 15278 | ac_have_decl=0 |
| @@ -15283,7 +15360,7 @@ gl_save_LIBS=$LIBS | |||
| 15283 | # getloadvg is present in libc on glibc >= 2.2, MacOS X, FreeBSD >= 2.0, | 15360 | # getloadvg is present in libc on glibc >= 2.2, MacOS X, FreeBSD >= 2.0, |
| 15284 | # NetBSD >= 0.9, OpenBSD >= 2.0, Solaris >= 7. | 15361 | # NetBSD >= 0.9, OpenBSD >= 2.0, Solaris >= 7. |
| 15285 | ac_fn_c_check_func "$LINENO" "getloadavg" "ac_cv_func_getloadavg" | 15362 | ac_fn_c_check_func "$LINENO" "getloadavg" "ac_cv_func_getloadavg" |
| 15286 | if test "x$ac_cv_func_getloadavg" = xyes; then : | 15363 | if test "x$ac_cv_func_getloadavg" = x""yes; then : |
| 15287 | 15364 | ||
| 15288 | else | 15365 | else |
| 15289 | gl_have_func=no | 15366 | gl_have_func=no |
| @@ -15296,7 +15373,7 @@ else | |||
| 15296 | if test $gl_have_func = no; then | 15373 | if test $gl_have_func = no; then |
| 15297 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for elf_begin in -lelf" >&5 | 15374 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for elf_begin in -lelf" >&5 |
| 15298 | $as_echo_n "checking for elf_begin in -lelf... " >&6; } | 15375 | $as_echo_n "checking for elf_begin in -lelf... " >&6; } |
| 15299 | if ${ac_cv_lib_elf_elf_begin+:} false; then : | 15376 | if test "${ac_cv_lib_elf_elf_begin+set}" = set; then : |
| 15300 | $as_echo_n "(cached) " >&6 | 15377 | $as_echo_n "(cached) " >&6 |
| 15301 | else | 15378 | else |
| 15302 | ac_check_lib_save_LIBS=$LIBS | 15379 | ac_check_lib_save_LIBS=$LIBS |
| @@ -15330,13 +15407,13 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 15330 | fi | 15407 | fi |
| 15331 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_elf_elf_begin" >&5 | 15408 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_elf_elf_begin" >&5 |
| 15332 | $as_echo "$ac_cv_lib_elf_elf_begin" >&6; } | 15409 | $as_echo "$ac_cv_lib_elf_elf_begin" >&6; } |
| 15333 | if test "x$ac_cv_lib_elf_elf_begin" = xyes; then : | 15410 | if test "x$ac_cv_lib_elf_elf_begin" = x""yes; then : |
| 15334 | LIBS="-lelf $LIBS" | 15411 | LIBS="-lelf $LIBS" |
| 15335 | fi | 15412 | fi |
| 15336 | 15413 | ||
| 15337 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for kvm_open in -lkvm" >&5 | 15414 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for kvm_open in -lkvm" >&5 |
| 15338 | $as_echo_n "checking for kvm_open in -lkvm... " >&6; } | 15415 | $as_echo_n "checking for kvm_open in -lkvm... " >&6; } |
| 15339 | if ${ac_cv_lib_kvm_kvm_open+:} false; then : | 15416 | if test "${ac_cv_lib_kvm_kvm_open+set}" = set; then : |
| 15340 | $as_echo_n "(cached) " >&6 | 15417 | $as_echo_n "(cached) " >&6 |
| 15341 | else | 15418 | else |
| 15342 | ac_check_lib_save_LIBS=$LIBS | 15419 | ac_check_lib_save_LIBS=$LIBS |
| @@ -15370,14 +15447,14 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 15370 | fi | 15447 | fi |
| 15371 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_kvm_kvm_open" >&5 | 15448 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_kvm_kvm_open" >&5 |
| 15372 | $as_echo "$ac_cv_lib_kvm_kvm_open" >&6; } | 15449 | $as_echo "$ac_cv_lib_kvm_kvm_open" >&6; } |
| 15373 | if test "x$ac_cv_lib_kvm_kvm_open" = xyes; then : | 15450 | if test "x$ac_cv_lib_kvm_kvm_open" = x""yes; then : |
| 15374 | LIBS="-lkvm $LIBS" | 15451 | LIBS="-lkvm $LIBS" |
| 15375 | fi | 15452 | fi |
| 15376 | 15453 | ||
| 15377 | # Check for the 4.4BSD definition of getloadavg. | 15454 | # Check for the 4.4BSD definition of getloadavg. |
| 15378 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for getloadavg in -lutil" >&5 | 15455 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for getloadavg in -lutil" >&5 |
| 15379 | $as_echo_n "checking for getloadavg in -lutil... " >&6; } | 15456 | $as_echo_n "checking for getloadavg in -lutil... " >&6; } |
| 15380 | if ${ac_cv_lib_util_getloadavg+:} false; then : | 15457 | if test "${ac_cv_lib_util_getloadavg+set}" = set; then : |
| 15381 | $as_echo_n "(cached) " >&6 | 15458 | $as_echo_n "(cached) " >&6 |
| 15382 | else | 15459 | else |
| 15383 | ac_check_lib_save_LIBS=$LIBS | 15460 | ac_check_lib_save_LIBS=$LIBS |
| @@ -15411,7 +15488,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 15411 | fi | 15488 | fi |
| 15412 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_util_getloadavg" >&5 | 15489 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_util_getloadavg" >&5 |
| 15413 | $as_echo "$ac_cv_lib_util_getloadavg" >&6; } | 15490 | $as_echo "$ac_cv_lib_util_getloadavg" >&6; } |
| 15414 | if test "x$ac_cv_lib_util_getloadavg" = xyes; then : | 15491 | if test "x$ac_cv_lib_util_getloadavg" = x""yes; then : |
| 15415 | LIBS="-lutil $LIBS" gl_have_func=yes | 15492 | LIBS="-lutil $LIBS" gl_have_func=yes |
| 15416 | fi | 15493 | fi |
| 15417 | 15494 | ||
| @@ -15424,7 +15501,7 @@ fi | |||
| 15424 | LIBS="-L/usr/local/lib $LIBS" | 15501 | LIBS="-L/usr/local/lib $LIBS" |
| 15425 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for getloadavg in -lgetloadavg" >&5 | 15502 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for getloadavg in -lgetloadavg" >&5 |
| 15426 | $as_echo_n "checking for getloadavg in -lgetloadavg... " >&6; } | 15503 | $as_echo_n "checking for getloadavg in -lgetloadavg... " >&6; } |
| 15427 | if ${ac_cv_lib_getloadavg_getloadavg+:} false; then : | 15504 | if test "${ac_cv_lib_getloadavg_getloadavg+set}" = set; then : |
| 15428 | $as_echo_n "(cached) " >&6 | 15505 | $as_echo_n "(cached) " >&6 |
| 15429 | else | 15506 | else |
| 15430 | ac_check_lib_save_LIBS=$LIBS | 15507 | ac_check_lib_save_LIBS=$LIBS |
| @@ -15458,7 +15535,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 15458 | fi | 15535 | fi |
| 15459 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_getloadavg_getloadavg" >&5 | 15536 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_getloadavg_getloadavg" >&5 |
| 15460 | $as_echo "$ac_cv_lib_getloadavg_getloadavg" >&6; } | 15537 | $as_echo "$ac_cv_lib_getloadavg_getloadavg" >&6; } |
| 15461 | if test "x$ac_cv_lib_getloadavg_getloadavg" = xyes; then : | 15538 | if test "x$ac_cv_lib_getloadavg_getloadavg" = x""yes; then : |
| 15462 | LIBS="-lgetloadavg $LIBS" gl_have_func=yes | 15539 | LIBS="-lgetloadavg $LIBS" gl_have_func=yes |
| 15463 | else | 15540 | else |
| 15464 | LIBS=$gl_getloadavg_LIBS | 15541 | LIBS=$gl_getloadavg_LIBS |
| @@ -15484,7 +15561,7 @@ fi | |||
| 15484 | # Solaris has libkstat which does not require root. | 15561 | # Solaris has libkstat which does not require root. |
| 15485 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for kstat_open in -lkstat" >&5 | 15562 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for kstat_open in -lkstat" >&5 |
| 15486 | $as_echo_n "checking for kstat_open in -lkstat... " >&6; } | 15563 | $as_echo_n "checking for kstat_open in -lkstat... " >&6; } |
| 15487 | if ${ac_cv_lib_kstat_kstat_open+:} false; then : | 15564 | if test "${ac_cv_lib_kstat_kstat_open+set}" = set; then : |
| 15488 | $as_echo_n "(cached) " >&6 | 15565 | $as_echo_n "(cached) " >&6 |
| 15489 | else | 15566 | else |
| 15490 | ac_check_lib_save_LIBS=$LIBS | 15567 | ac_check_lib_save_LIBS=$LIBS |
| @@ -15518,7 +15595,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 15518 | fi | 15595 | fi |
| 15519 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_kstat_kstat_open" >&5 | 15596 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_kstat_kstat_open" >&5 |
| 15520 | $as_echo "$ac_cv_lib_kstat_kstat_open" >&6; } | 15597 | $as_echo "$ac_cv_lib_kstat_kstat_open" >&6; } |
| 15521 | if test "x$ac_cv_lib_kstat_kstat_open" = xyes; then : | 15598 | if test "x$ac_cv_lib_kstat_kstat_open" = x""yes; then : |
| 15522 | cat >>confdefs.h <<_ACEOF | 15599 | cat >>confdefs.h <<_ACEOF |
| 15523 | #define HAVE_LIBKSTAT 1 | 15600 | #define HAVE_LIBKSTAT 1 |
| 15524 | _ACEOF | 15601 | _ACEOF |
| @@ -15534,7 +15611,7 @@ if test $gl_have_func = no; then | |||
| 15534 | for ac_func in pstat_getdynamic | 15611 | for ac_func in pstat_getdynamic |
| 15535 | do : | 15612 | do : |
| 15536 | ac_fn_c_check_func "$LINENO" "pstat_getdynamic" "ac_cv_func_pstat_getdynamic" | 15613 | ac_fn_c_check_func "$LINENO" "pstat_getdynamic" "ac_cv_func_pstat_getdynamic" |
| 15537 | if test "x$ac_cv_func_pstat_getdynamic" = xyes; then : | 15614 | if test "x$ac_cv_func_pstat_getdynamic" = x""yes; then : |
| 15538 | cat >>confdefs.h <<_ACEOF | 15615 | cat >>confdefs.h <<_ACEOF |
| 15539 | #define HAVE_PSTAT_GETDYNAMIC 1 | 15616 | #define HAVE_PSTAT_GETDYNAMIC 1 |
| 15540 | _ACEOF | 15617 | _ACEOF |
| @@ -15548,7 +15625,7 @@ fi | |||
| 15548 | if test $gl_have_func = no; then | 15625 | if test $gl_have_func = no; then |
| 15549 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for perfstat_cpu_total in -lperfstat" >&5 | 15626 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for perfstat_cpu_total in -lperfstat" >&5 |
| 15550 | $as_echo_n "checking for perfstat_cpu_total in -lperfstat... " >&6; } | 15627 | $as_echo_n "checking for perfstat_cpu_total in -lperfstat... " >&6; } |
| 15551 | if ${ac_cv_lib_perfstat_perfstat_cpu_total+:} false; then : | 15628 | if test "${ac_cv_lib_perfstat_perfstat_cpu_total+set}" = set; then : |
| 15552 | $as_echo_n "(cached) " >&6 | 15629 | $as_echo_n "(cached) " >&6 |
| 15553 | else | 15630 | else |
| 15554 | ac_check_lib_save_LIBS=$LIBS | 15631 | ac_check_lib_save_LIBS=$LIBS |
| @@ -15582,7 +15659,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 15582 | fi | 15659 | fi |
| 15583 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_perfstat_perfstat_cpu_total" >&5 | 15660 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_perfstat_perfstat_cpu_total" >&5 |
| 15584 | $as_echo "$ac_cv_lib_perfstat_perfstat_cpu_total" >&6; } | 15661 | $as_echo "$ac_cv_lib_perfstat_perfstat_cpu_total" >&6; } |
| 15585 | if test "x$ac_cv_lib_perfstat_perfstat_cpu_total" = xyes; then : | 15662 | if test "x$ac_cv_lib_perfstat_perfstat_cpu_total" = x""yes; then : |
| 15586 | cat >>confdefs.h <<_ACEOF | 15663 | cat >>confdefs.h <<_ACEOF |
| 15587 | #define HAVE_LIBPERFSTAT 1 | 15664 | #define HAVE_LIBPERFSTAT 1 |
| 15588 | _ACEOF | 15665 | _ACEOF |
| @@ -15596,14 +15673,14 @@ fi | |||
| 15596 | 15673 | ||
| 15597 | if test $gl_have_func = no; then | 15674 | if test $gl_have_func = no; then |
| 15598 | ac_fn_c_check_header_mongrel "$LINENO" "sys/dg_sys_info.h" "ac_cv_header_sys_dg_sys_info_h" "$ac_includes_default" | 15675 | ac_fn_c_check_header_mongrel "$LINENO" "sys/dg_sys_info.h" "ac_cv_header_sys_dg_sys_info_h" "$ac_includes_default" |
| 15599 | if test "x$ac_cv_header_sys_dg_sys_info_h" = xyes; then : | 15676 | if test "x$ac_cv_header_sys_dg_sys_info_h" = x""yes; then : |
| 15600 | gl_have_func=yes | 15677 | gl_have_func=yes |
| 15601 | 15678 | ||
| 15602 | $as_echo "#define DGUX 1" >>confdefs.h | 15679 | $as_echo "#define DGUX 1" >>confdefs.h |
| 15603 | 15680 | ||
| 15604 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for dg_sys_info in -ldgc" >&5 | 15681 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for dg_sys_info in -ldgc" >&5 |
| 15605 | $as_echo_n "checking for dg_sys_info in -ldgc... " >&6; } | 15682 | $as_echo_n "checking for dg_sys_info in -ldgc... " >&6; } |
| 15606 | if ${ac_cv_lib_dgc_dg_sys_info+:} false; then : | 15683 | if test "${ac_cv_lib_dgc_dg_sys_info+set}" = set; then : |
| 15607 | $as_echo_n "(cached) " >&6 | 15684 | $as_echo_n "(cached) " >&6 |
| 15608 | else | 15685 | else |
| 15609 | ac_check_lib_save_LIBS=$LIBS | 15686 | ac_check_lib_save_LIBS=$LIBS |
| @@ -15637,7 +15714,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 15637 | fi | 15714 | fi |
| 15638 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_dgc_dg_sys_info" >&5 | 15715 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_dgc_dg_sys_info" >&5 |
| 15639 | $as_echo "$ac_cv_lib_dgc_dg_sys_info" >&6; } | 15716 | $as_echo "$ac_cv_lib_dgc_dg_sys_info" >&6; } |
| 15640 | if test "x$ac_cv_lib_dgc_dg_sys_info" = xyes; then : | 15717 | if test "x$ac_cv_lib_dgc_dg_sys_info" = x""yes; then : |
| 15641 | cat >>confdefs.h <<_ACEOF | 15718 | cat >>confdefs.h <<_ACEOF |
| 15642 | #define HAVE_LIBDGC 1 | 15719 | #define HAVE_LIBDGC 1 |
| 15643 | _ACEOF | 15720 | _ACEOF |
| @@ -15664,7 +15741,7 @@ fi | |||
| 15664 | 15741 | ||
| 15665 | if test $gl_have_func = no; then | 15742 | if test $gl_have_func = no; then |
| 15666 | ac_fn_c_check_header_mongrel "$LINENO" "inq_stats/cpustats.h" "ac_cv_header_inq_stats_cpustats_h" "$ac_includes_default" | 15743 | ac_fn_c_check_header_mongrel "$LINENO" "inq_stats/cpustats.h" "ac_cv_header_inq_stats_cpustats_h" "$ac_includes_default" |
| 15667 | if test "x$ac_cv_header_inq_stats_cpustats_h" = xyes; then : | 15744 | if test "x$ac_cv_header_inq_stats_cpustats_h" = x""yes; then : |
| 15668 | gl_have_func=yes | 15745 | gl_have_func=yes |
| 15669 | 15746 | ||
| 15670 | $as_echo "#define UMAX 1" >>confdefs.h | 15747 | $as_echo "#define UMAX 1" >>confdefs.h |
| @@ -15679,7 +15756,7 @@ fi | |||
| 15679 | 15756 | ||
| 15680 | if test $gl_have_func = no; then | 15757 | if test $gl_have_func = no; then |
| 15681 | ac_fn_c_check_header_mongrel "$LINENO" "sys/cpustats.h" "ac_cv_header_sys_cpustats_h" "$ac_includes_default" | 15758 | ac_fn_c_check_header_mongrel "$LINENO" "sys/cpustats.h" "ac_cv_header_sys_cpustats_h" "$ac_includes_default" |
| 15682 | if test "x$ac_cv_header_sys_cpustats_h" = xyes; then : | 15759 | if test "x$ac_cv_header_sys_cpustats_h" = x""yes; then : |
| 15683 | gl_have_func=yes; $as_echo "#define UMAX 1" >>confdefs.h | 15760 | gl_have_func=yes; $as_echo "#define UMAX 1" >>confdefs.h |
| 15684 | 15761 | ||
| 15685 | fi | 15762 | fi |
| @@ -15691,7 +15768,7 @@ if test $gl_have_func = no; then | |||
| 15691 | for ac_header in mach/mach.h | 15768 | for ac_header in mach/mach.h |
| 15692 | do : | 15769 | do : |
| 15693 | ac_fn_c_check_header_mongrel "$LINENO" "mach/mach.h" "ac_cv_header_mach_mach_h" "$ac_includes_default" | 15770 | ac_fn_c_check_header_mongrel "$LINENO" "mach/mach.h" "ac_cv_header_mach_mach_h" "$ac_includes_default" |
| 15694 | if test "x$ac_cv_header_mach_mach_h" = xyes; then : | 15771 | if test "x$ac_cv_header_mach_mach_h" = x""yes; then : |
| 15695 | cat >>confdefs.h <<_ACEOF | 15772 | cat >>confdefs.h <<_ACEOF |
| 15696 | #define HAVE_MACH_MACH_H 1 | 15773 | #define HAVE_MACH_MACH_H 1 |
| 15697 | _ACEOF | 15774 | _ACEOF |
| @@ -15705,13 +15782,13 @@ fi | |||
| 15705 | for ac_header in nlist.h | 15782 | for ac_header in nlist.h |
| 15706 | do : | 15783 | do : |
| 15707 | ac_fn_c_check_header_mongrel "$LINENO" "nlist.h" "ac_cv_header_nlist_h" "$ac_includes_default" | 15784 | ac_fn_c_check_header_mongrel "$LINENO" "nlist.h" "ac_cv_header_nlist_h" "$ac_includes_default" |
| 15708 | if test "x$ac_cv_header_nlist_h" = xyes; then : | 15785 | if test "x$ac_cv_header_nlist_h" = x""yes; then : |
| 15709 | cat >>confdefs.h <<_ACEOF | 15786 | cat >>confdefs.h <<_ACEOF |
| 15710 | #define HAVE_NLIST_H 1 | 15787 | #define HAVE_NLIST_H 1 |
| 15711 | _ACEOF | 15788 | _ACEOF |
| 15712 | ac_fn_c_check_member "$LINENO" "struct nlist" "n_un.n_name" "ac_cv_member_struct_nlist_n_un_n_name" "#include <nlist.h> | 15789 | ac_fn_c_check_member "$LINENO" "struct nlist" "n_un.n_name" "ac_cv_member_struct_nlist_n_un_n_name" "#include <nlist.h> |
| 15713 | " | 15790 | " |
| 15714 | if test "x$ac_cv_member_struct_nlist_n_un_n_name" = xyes; then : | 15791 | if test "x$ac_cv_member_struct_nlist_n_un_n_name" = x""yes; then : |
| 15715 | 15792 | ||
| 15716 | cat >>confdefs.h <<_ACEOF | 15793 | cat >>confdefs.h <<_ACEOF |
| 15717 | #define HAVE_STRUCT_NLIST_N_UN_N_NAME 1 | 15794 | #define HAVE_STRUCT_NLIST_N_UN_N_NAME 1 |
| @@ -15765,7 +15842,7 @@ LIBS=$gl_save_LIBS | |||
| 15765 | for ac_header in sys/loadavg.h | 15842 | for ac_header in sys/loadavg.h |
| 15766 | do : | 15843 | do : |
| 15767 | ac_fn_c_check_header_mongrel "$LINENO" "sys/loadavg.h" "ac_cv_header_sys_loadavg_h" "$ac_includes_default" | 15844 | ac_fn_c_check_header_mongrel "$LINENO" "sys/loadavg.h" "ac_cv_header_sys_loadavg_h" "$ac_includes_default" |
| 15768 | if test "x$ac_cv_header_sys_loadavg_h" = xyes; then : | 15845 | if test "x$ac_cv_header_sys_loadavg_h" = x""yes; then : |
| 15769 | cat >>confdefs.h <<_ACEOF | 15846 | cat >>confdefs.h <<_ACEOF |
| 15770 | #define HAVE_SYS_LOADAVG_H 1 | 15847 | #define HAVE_SYS_LOADAVG_H 1 |
| 15771 | _ACEOF | 15848 | _ACEOF |
| @@ -15784,7 +15861,7 @@ ac_fn_c_check_decl "$LINENO" "getloadavg" "ac_cv_have_decl_getloadavg" "#if HAVE | |||
| 15784 | #endif | 15861 | #endif |
| 15785 | #include <stdlib.h> | 15862 | #include <stdlib.h> |
| 15786 | " | 15863 | " |
| 15787 | if test "x$ac_cv_have_decl_getloadavg" = xyes; then : | 15864 | if test "x$ac_cv_have_decl_getloadavg" = x""yes; then : |
| 15788 | 15865 | ||
| 15789 | else | 15866 | else |
| 15790 | HAVE_DECL_GETLOADAVG=0 | 15867 | HAVE_DECL_GETLOADAVG=0 |
| @@ -15893,7 +15970,7 @@ if test $APPLE_UNIVERSAL_BUILD = 1; then | |||
| 15893 | fi | 15970 | fi |
| 15894 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working mktime" >&5 | 15971 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working mktime" >&5 |
| 15895 | $as_echo_n "checking for working mktime... " >&6; } | 15972 | $as_echo_n "checking for working mktime... " >&6; } |
| 15896 | if ${ac_cv_func_working_mktime+:} false; then : | 15973 | if test "${ac_cv_func_working_mktime+set}" = set; then : |
| 15897 | $as_echo_n "(cached) " >&6 | 15974 | $as_echo_n "(cached) " >&6 |
| 15898 | else | 15975 | else |
| 15899 | if test "$cross_compiling" = yes; then : | 15976 | if test "$cross_compiling" = yes; then : |
| @@ -16158,7 +16235,7 @@ fi | |||
| 16158 | else | 16235 | else |
| 16159 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether readlink signature is correct" >&5 | 16236 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether readlink signature is correct" >&5 |
| 16160 | $as_echo_n "checking whether readlink signature is correct... " >&6; } | 16237 | $as_echo_n "checking whether readlink signature is correct... " >&6; } |
| 16161 | if ${gl_cv_decl_readlink_works+:} false; then : | 16238 | if test "${gl_cv_decl_readlink_works+set}" = set; then : |
| 16162 | $as_echo_n "(cached) " >&6 | 16239 | $as_echo_n "(cached) " >&6 |
| 16163 | else | 16240 | else |
| 16164 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 16241 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -16185,7 +16262,7 @@ fi | |||
| 16185 | $as_echo "$gl_cv_decl_readlink_works" >&6; } | 16262 | $as_echo "$gl_cv_decl_readlink_works" >&6; } |
| 16186 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether readlink handles trailing slash correctly" >&5 | 16263 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether readlink handles trailing slash correctly" >&5 |
| 16187 | $as_echo_n "checking whether readlink handles trailing slash correctly... " >&6; } | 16264 | $as_echo_n "checking whether readlink handles trailing slash correctly... " >&6; } |
| 16188 | if ${gl_cv_func_readlink_works+:} false; then : | 16265 | if test "${gl_cv_func_readlink_works+set}" = set; then : |
| 16189 | $as_echo_n "(cached) " >&6 | 16266 | $as_echo_n "(cached) " >&6 |
| 16190 | else | 16267 | else |
| 16191 | # We have readlink, so assume ln -s works. | 16268 | # We have readlink, so assume ln -s works. |
| @@ -16263,7 +16340,7 @@ $as_echo "#define READLINK_TRAILING_SLASH_BUG 1" >>confdefs.h | |||
| 16263 | 16340 | ||
| 16264 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether stat handles trailing slashes on directories" >&5 | 16341 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether stat handles trailing slashes on directories" >&5 |
| 16265 | $as_echo_n "checking whether stat handles trailing slashes on directories... " >&6; } | 16342 | $as_echo_n "checking whether stat handles trailing slashes on directories... " >&6; } |
| 16266 | if ${gl_cv_func_stat_dir_slash+:} false; then : | 16343 | if test "${gl_cv_func_stat_dir_slash+set}" = set; then : |
| 16267 | $as_echo_n "(cached) " >&6 | 16344 | $as_echo_n "(cached) " >&6 |
| 16268 | else | 16345 | else |
| 16269 | if test "$cross_compiling" = yes; then : | 16346 | if test "$cross_compiling" = yes; then : |
| @@ -16298,7 +16375,7 @@ fi | |||
| 16298 | $as_echo "$gl_cv_func_stat_dir_slash" >&6; } | 16375 | $as_echo "$gl_cv_func_stat_dir_slash" >&6; } |
| 16299 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether stat handles trailing slashes on files" >&5 | 16376 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether stat handles trailing slashes on files" >&5 |
| 16300 | $as_echo_n "checking whether stat handles trailing slashes on files... " >&6; } | 16377 | $as_echo_n "checking whether stat handles trailing slashes on files... " >&6; } |
| 16301 | if ${gl_cv_func_stat_file_slash+:} false; then : | 16378 | if test "${gl_cv_func_stat_file_slash+set}" = set; then : |
| 16302 | $as_echo_n "(cached) " >&6 | 16379 | $as_echo_n "(cached) " >&6 |
| 16303 | else | 16380 | else |
| 16304 | touch conftest.tmp | 16381 | touch conftest.tmp |
| @@ -16406,7 +16483,7 @@ $as_echo "#define REPLACE_FUNC_STAT_FILE 1" >>confdefs.h | |||
| 16406 | fi | 16483 | fi |
| 16407 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether NULL can be used in arbitrary expressions" >&5 | 16484 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether NULL can be used in arbitrary expressions" >&5 |
| 16408 | $as_echo_n "checking whether NULL can be used in arbitrary expressions... " >&6; } | 16485 | $as_echo_n "checking whether NULL can be used in arbitrary expressions... " >&6; } |
| 16409 | if ${gl_cv_decl_null_works+:} false; then : | 16486 | if test "${gl_cv_decl_null_works+set}" = set; then : |
| 16410 | $as_echo_n "(cached) " >&6 | 16487 | $as_echo_n "(cached) " >&6 |
| 16411 | else | 16488 | else |
| 16412 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 16489 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -16449,7 +16526,7 @@ $as_echo "$gl_cv_decl_null_works" >&6; } | |||
| 16449 | else | 16526 | else |
| 16450 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <stddef.h>" >&5 | 16527 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <stddef.h>" >&5 |
| 16451 | $as_echo_n "checking absolute name of <stddef.h>... " >&6; } | 16528 | $as_echo_n "checking absolute name of <stddef.h>... " >&6; } |
| 16452 | if ${gl_cv_next_stddef_h+:} false; then : | 16529 | if test "${gl_cv_next_stddef_h+set}" = set; then : |
| 16453 | $as_echo_n "(cached) " >&6 | 16530 | $as_echo_n "(cached) " >&6 |
| 16454 | else | 16531 | else |
| 16455 | 16532 | ||
| @@ -16545,7 +16622,7 @@ $as_echo "$gl_cv_next_stddef_h" >&6; } | |||
| 16545 | else | 16622 | else |
| 16546 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <stdint.h>" >&5 | 16623 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <stdint.h>" >&5 |
| 16547 | $as_echo_n "checking absolute name of <stdint.h>... " >&6; } | 16624 | $as_echo_n "checking absolute name of <stdint.h>... " >&6; } |
| 16548 | if ${gl_cv_next_stdint_h+:} false; then : | 16625 | if test "${gl_cv_next_stdint_h+set}" = set; then : |
| 16549 | $as_echo_n "(cached) " >&6 | 16626 | $as_echo_n "(cached) " >&6 |
| 16550 | else | 16627 | else |
| 16551 | 16628 | ||
| @@ -16601,7 +16678,7 @@ $as_echo "$gl_cv_next_stdint_h" >&6; } | |||
| 16601 | if test $ac_cv_header_stdint_h = yes; then | 16678 | if test $ac_cv_header_stdint_h = yes; then |
| 16602 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether stdint.h conforms to C99" >&5 | 16679 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether stdint.h conforms to C99" >&5 |
| 16603 | $as_echo_n "checking whether stdint.h conforms to C99... " >&6; } | 16680 | $as_echo_n "checking whether stdint.h conforms to C99... " >&6; } |
| 16604 | if ${gl_cv_header_working_stdint_h+:} false; then : | 16681 | if test "${gl_cv_header_working_stdint_h+set}" = set; then : |
| 16605 | $as_echo_n "(cached) " >&6 | 16682 | $as_echo_n "(cached) " >&6 |
| 16606 | else | 16683 | else |
| 16607 | gl_cv_header_working_stdint_h=no | 16684 | gl_cv_header_working_stdint_h=no |
| @@ -16904,7 +16981,7 @@ done | |||
| 16904 | for gltype in ptrdiff_t size_t ; do | 16981 | for gltype in ptrdiff_t size_t ; do |
| 16905 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for bit size of $gltype" >&5 | 16982 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for bit size of $gltype" >&5 |
| 16906 | $as_echo_n "checking for bit size of $gltype... " >&6; } | 16983 | $as_echo_n "checking for bit size of $gltype... " >&6; } |
| 16907 | if eval \${gl_cv_bitsizeof_${gltype}+:} false; then : | 16984 | if eval "test \"\${gl_cv_bitsizeof_${gltype}+set}\"" = set; then : |
| 16908 | $as_echo_n "(cached) " >&6 | 16985 | $as_echo_n "(cached) " >&6 |
| 16909 | else | 16986 | else |
| 16910 | if ac_fn_c_compute_int "$LINENO" "sizeof ($gltype) * CHAR_BIT" "result" " | 16987 | if ac_fn_c_compute_int "$LINENO" "sizeof ($gltype) * CHAR_BIT" "result" " |
| @@ -16949,7 +17026,7 @@ _ACEOF | |||
| 16949 | for gltype in sig_atomic_t wchar_t wint_t ; do | 17026 | for gltype in sig_atomic_t wchar_t wint_t ; do |
| 16950 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for bit size of $gltype" >&5 | 17027 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for bit size of $gltype" >&5 |
| 16951 | $as_echo_n "checking for bit size of $gltype... " >&6; } | 17028 | $as_echo_n "checking for bit size of $gltype... " >&6; } |
| 16952 | if eval \${gl_cv_bitsizeof_${gltype}+:} false; then : | 17029 | if eval "test \"\${gl_cv_bitsizeof_${gltype}+set}\"" = set; then : |
| 16953 | $as_echo_n "(cached) " >&6 | 17030 | $as_echo_n "(cached) " >&6 |
| 16954 | else | 17031 | else |
| 16955 | if ac_fn_c_compute_int "$LINENO" "sizeof ($gltype) * CHAR_BIT" "result" " | 17032 | if ac_fn_c_compute_int "$LINENO" "sizeof ($gltype) * CHAR_BIT" "result" " |
| @@ -16993,7 +17070,7 @@ _ACEOF | |||
| 16993 | for gltype in sig_atomic_t wchar_t wint_t ; do | 17070 | for gltype in sig_atomic_t wchar_t wint_t ; do |
| 16994 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $gltype is signed" >&5 | 17071 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether $gltype is signed" >&5 |
| 16995 | $as_echo_n "checking whether $gltype is signed... " >&6; } | 17072 | $as_echo_n "checking whether $gltype is signed... " >&6; } |
| 16996 | if eval \${gl_cv_type_${gltype}_signed+:} false; then : | 17073 | if eval "test \"\${gl_cv_type_${gltype}_signed+set}\"" = set; then : |
| 16997 | $as_echo_n "(cached) " >&6 | 17074 | $as_echo_n "(cached) " >&6 |
| 16998 | else | 17075 | else |
| 16999 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 17076 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -17052,7 +17129,7 @@ _ACEOF | |||
| 17052 | for gltype in ptrdiff_t size_t ; do | 17129 | for gltype in ptrdiff_t size_t ; do |
| 17053 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $gltype integer literal suffix" >&5 | 17130 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $gltype integer literal suffix" >&5 |
| 17054 | $as_echo_n "checking for $gltype integer literal suffix... " >&6; } | 17131 | $as_echo_n "checking for $gltype integer literal suffix... " >&6; } |
| 17055 | if eval \${gl_cv_type_${gltype}_suffix+:} false; then : | 17132 | if eval "test \"\${gl_cv_type_${gltype}_suffix+set}\"" = set; then : |
| 17056 | $as_echo_n "(cached) " >&6 | 17133 | $as_echo_n "(cached) " >&6 |
| 17057 | else | 17134 | else |
| 17058 | eval gl_cv_type_${gltype}_suffix=no | 17135 | eval gl_cv_type_${gltype}_suffix=no |
| @@ -17124,7 +17201,7 @@ _ACEOF | |||
| 17124 | for gltype in sig_atomic_t wchar_t wint_t ; do | 17201 | for gltype in sig_atomic_t wchar_t wint_t ; do |
| 17125 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $gltype integer literal suffix" >&5 | 17202 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for $gltype integer literal suffix" >&5 |
| 17126 | $as_echo_n "checking for $gltype integer literal suffix... " >&6; } | 17203 | $as_echo_n "checking for $gltype integer literal suffix... " >&6; } |
| 17127 | if eval \${gl_cv_type_${gltype}_suffix+:} false; then : | 17204 | if eval "test \"\${gl_cv_type_${gltype}_suffix+set}\"" = set; then : |
| 17128 | $as_echo_n "(cached) " >&6 | 17205 | $as_echo_n "(cached) " >&6 |
| 17129 | else | 17206 | else |
| 17130 | eval gl_cv_type_${gltype}_suffix=no | 17207 | eval gl_cv_type_${gltype}_suffix=no |
| @@ -17211,7 +17288,7 @@ _ACEOF | |||
| 17211 | else | 17288 | else |
| 17212 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <stdlib.h>" >&5 | 17289 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <stdlib.h>" >&5 |
| 17213 | $as_echo_n "checking absolute name of <stdlib.h>... " >&6; } | 17290 | $as_echo_n "checking absolute name of <stdlib.h>... " >&6; } |
| 17214 | if ${gl_cv_next_stdlib_h+:} false; then : | 17291 | if test "${gl_cv_next_stdlib_h+set}" = set; then : |
| 17215 | $as_echo_n "(cached) " >&6 | 17292 | $as_echo_n "(cached) " >&6 |
| 17216 | else | 17293 | else |
| 17217 | 17294 | ||
| @@ -17299,7 +17376,7 @@ $as_echo "#define my_strftime nstrftime" >>confdefs.h | |||
| 17299 | else | 17376 | else |
| 17300 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether symlink handles trailing slash correctly" >&5 | 17377 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether symlink handles trailing slash correctly" >&5 |
| 17301 | $as_echo_n "checking whether symlink handles trailing slash correctly... " >&6; } | 17378 | $as_echo_n "checking whether symlink handles trailing slash correctly... " >&6; } |
| 17302 | if ${gl_cv_func_symlink_works+:} false; then : | 17379 | if test "${gl_cv_func_symlink_works+set}" = set; then : |
| 17303 | $as_echo_n "(cached) " >&6 | 17380 | $as_echo_n "(cached) " >&6 |
| 17304 | else | 17381 | else |
| 17305 | if test "$cross_compiling" = yes; then : | 17382 | if test "$cross_compiling" = yes; then : |
| @@ -17382,7 +17459,7 @@ $as_echo "$gl_cv_func_symlink_works" >&6; } | |||
| 17382 | else | 17459 | else |
| 17383 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <sys/stat.h>" >&5 | 17460 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <sys/stat.h>" >&5 |
| 17384 | $as_echo_n "checking absolute name of <sys/stat.h>... " >&6; } | 17461 | $as_echo_n "checking absolute name of <sys/stat.h>... " >&6; } |
| 17385 | if ${gl_cv_next_sys_stat_h+:} false; then : | 17462 | if test "${gl_cv_next_sys_stat_h+set}" = set; then : |
| 17386 | $as_echo_n "(cached) " >&6 | 17463 | $as_echo_n "(cached) " >&6 |
| 17387 | else | 17464 | else |
| 17388 | 17465 | ||
| @@ -17432,7 +17509,7 @@ $as_echo "$gl_cv_next_sys_stat_h" >&6; } | |||
| 17432 | ac_fn_c_check_type "$LINENO" "nlink_t" "ac_cv_type_nlink_t" "#include <sys/types.h> | 17509 | ac_fn_c_check_type "$LINENO" "nlink_t" "ac_cv_type_nlink_t" "#include <sys/types.h> |
| 17433 | #include <sys/stat.h> | 17510 | #include <sys/stat.h> |
| 17434 | " | 17511 | " |
| 17435 | if test "x$ac_cv_type_nlink_t" = xyes; then : | 17512 | if test "x$ac_cv_type_nlink_t" = x""yes; then : |
| 17436 | 17513 | ||
| 17437 | else | 17514 | else |
| 17438 | 17515 | ||
| @@ -17465,7 +17542,7 @@ fi | |||
| 17465 | HAVE_LOCALTIME_R=1 | 17542 | HAVE_LOCALTIME_R=1 |
| 17466 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether localtime_r is compatible with its POSIX signature" >&5 | 17543 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether localtime_r is compatible with its POSIX signature" >&5 |
| 17467 | $as_echo_n "checking whether localtime_r is compatible with its POSIX signature... " >&6; } | 17544 | $as_echo_n "checking whether localtime_r is compatible with its POSIX signature... " >&6; } |
| 17468 | if ${gl_cv_time_r_posix+:} false; then : | 17545 | if test "${gl_cv_time_r_posix+set}" = set; then : |
| 17469 | $as_echo_n "(cached) " >&6 | 17546 | $as_echo_n "(cached) " >&6 |
| 17470 | else | 17547 | else |
| 17471 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 17548 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -17547,7 +17624,7 @@ $as_echo "$gl_cv_time_r_posix" >&6; } | |||
| 17547 | else | 17624 | else |
| 17548 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <unistd.h>" >&5 | 17625 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking absolute name of <unistd.h>" >&5 |
| 17549 | $as_echo_n "checking absolute name of <unistd.h>... " >&6; } | 17626 | $as_echo_n "checking absolute name of <unistd.h>... " >&6; } |
| 17550 | if ${gl_cv_next_unistd_h+:} false; then : | 17627 | if test "${gl_cv_next_unistd_h+set}" = set; then : |
| 17551 | $as_echo_n "(cached) " >&6 | 17628 | $as_echo_n "(cached) " >&6 |
| 17552 | else | 17629 | else |
| 17553 | 17630 | ||
| @@ -17647,7 +17724,7 @@ $as_echo "$gl_cv_next_unistd_h" >&6; } | |||
| 17647 | for ac_func in grantpt | 17724 | for ac_func in grantpt |
| 17648 | do : | 17725 | do : |
| 17649 | ac_fn_c_check_func "$LINENO" "grantpt" "ac_cv_func_grantpt" | 17726 | ac_fn_c_check_func "$LINENO" "grantpt" "ac_cv_func_grantpt" |
| 17650 | if test "x$ac_cv_func_grantpt" = xyes; then : | 17727 | if test "x$ac_cv_func_grantpt" = x""yes; then : |
| 17651 | cat >>confdefs.h <<_ACEOF | 17728 | cat >>confdefs.h <<_ACEOF |
| 17652 | #define HAVE_GRANTPT 1 | 17729 | #define HAVE_GRANTPT 1 |
| 17653 | _ACEOF | 17730 | _ACEOF |
| @@ -17660,7 +17737,7 @@ done | |||
| 17660 | for ac_func in getpt | 17737 | for ac_func in getpt |
| 17661 | do : | 17738 | do : |
| 17662 | ac_fn_c_check_func "$LINENO" "getpt" "ac_cv_func_getpt" | 17739 | ac_fn_c_check_func "$LINENO" "getpt" "ac_cv_func_getpt" |
| 17663 | if test "x$ac_cv_func_getpt" = xyes; then : | 17740 | if test "x$ac_cv_func_getpt" = x""yes; then : |
| 17664 | cat >>confdefs.h <<_ACEOF | 17741 | cat >>confdefs.h <<_ACEOF |
| 17665 | #define HAVE_GETPT 1 | 17742 | #define HAVE_GETPT 1 |
| 17666 | _ACEOF | 17743 | _ACEOF |
| @@ -17677,7 +17754,7 @@ done | |||
| 17677 | have_tputs_et_al=true | 17754 | have_tputs_et_al=true |
| 17678 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for library containing tputs" >&5 | 17755 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for library containing tputs" >&5 |
| 17679 | $as_echo_n "checking for library containing tputs... " >&6; } | 17756 | $as_echo_n "checking for library containing tputs... " >&6; } |
| 17680 | if ${ac_cv_search_tputs+:} false; then : | 17757 | if test "${ac_cv_search_tputs+set}" = set; then : |
| 17681 | $as_echo_n "(cached) " >&6 | 17758 | $as_echo_n "(cached) " >&6 |
| 17682 | else | 17759 | else |
| 17683 | ac_func_search_save_LIBS=$LIBS | 17760 | ac_func_search_save_LIBS=$LIBS |
| @@ -17711,11 +17788,11 @@ for ac_lib in '' ncurses terminfo termcap; do | |||
| 17711 | fi | 17788 | fi |
| 17712 | rm -f core conftest.err conftest.$ac_objext \ | 17789 | rm -f core conftest.err conftest.$ac_objext \ |
| 17713 | conftest$ac_exeext | 17790 | conftest$ac_exeext |
| 17714 | if ${ac_cv_search_tputs+:} false; then : | 17791 | if test "${ac_cv_search_tputs+set}" = set; then : |
| 17715 | break | 17792 | break |
| 17716 | fi | 17793 | fi |
| 17717 | done | 17794 | done |
| 17718 | if ${ac_cv_search_tputs+:} false; then : | 17795 | if test "${ac_cv_search_tputs+set}" = set; then : |
| 17719 | 17796 | ||
| 17720 | else | 17797 | else |
| 17721 | ac_cv_search_tputs=no | 17798 | ac_cv_search_tputs=no |
| @@ -17774,7 +17851,7 @@ case "$opsys" in | |||
| 17774 | freebsd) | 17851 | freebsd) |
| 17775 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether FreeBSD is new enough to use terminfo" >&5 | 17852 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether FreeBSD is new enough to use terminfo" >&5 |
| 17776 | $as_echo_n "checking whether FreeBSD is new enough to use terminfo... " >&6; } | 17853 | $as_echo_n "checking whether FreeBSD is new enough to use terminfo... " >&6; } |
| 17777 | if ${emacs_cv_freebsd_terminfo+:} false; then : | 17854 | if test "${emacs_cv_freebsd_terminfo+set}" = set; then : |
| 17778 | $as_echo_n "(cached) " >&6 | 17855 | $as_echo_n "(cached) " >&6 |
| 17779 | else | 17856 | else |
| 17780 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 17857 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -17916,16 +17993,16 @@ LIBHESIOD= | |||
| 17916 | if test "$with_hesiod" != no ; then | 17993 | if test "$with_hesiod" != no ; then |
| 17917 | # Don't set $LIBS here -- see comments above. FIXME which comments? | 17994 | # Don't set $LIBS here -- see comments above. FIXME which comments? |
| 17918 | ac_fn_c_check_func "$LINENO" "res_send" "ac_cv_func_res_send" | 17995 | ac_fn_c_check_func "$LINENO" "res_send" "ac_cv_func_res_send" |
| 17919 | if test "x$ac_cv_func_res_send" = xyes; then : | 17996 | if test "x$ac_cv_func_res_send" = x""yes; then : |
| 17920 | 17997 | ||
| 17921 | else | 17998 | else |
| 17922 | ac_fn_c_check_func "$LINENO" "__res_send" "ac_cv_func___res_send" | 17999 | ac_fn_c_check_func "$LINENO" "__res_send" "ac_cv_func___res_send" |
| 17923 | if test "x$ac_cv_func___res_send" = xyes; then : | 18000 | if test "x$ac_cv_func___res_send" = x""yes; then : |
| 17924 | 18001 | ||
| 17925 | else | 18002 | else |
| 17926 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for res_send in -lresolv" >&5 | 18003 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for res_send in -lresolv" >&5 |
| 17927 | $as_echo_n "checking for res_send in -lresolv... " >&6; } | 18004 | $as_echo_n "checking for res_send in -lresolv... " >&6; } |
| 17928 | if ${ac_cv_lib_resolv_res_send+:} false; then : | 18005 | if test "${ac_cv_lib_resolv_res_send+set}" = set; then : |
| 17929 | $as_echo_n "(cached) " >&6 | 18006 | $as_echo_n "(cached) " >&6 |
| 17930 | else | 18007 | else |
| 17931 | ac_check_lib_save_LIBS=$LIBS | 18008 | ac_check_lib_save_LIBS=$LIBS |
| @@ -17959,12 +18036,12 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 17959 | fi | 18036 | fi |
| 17960 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_resolv_res_send" >&5 | 18037 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_resolv_res_send" >&5 |
| 17961 | $as_echo "$ac_cv_lib_resolv_res_send" >&6; } | 18038 | $as_echo "$ac_cv_lib_resolv_res_send" >&6; } |
| 17962 | if test "x$ac_cv_lib_resolv_res_send" = xyes; then : | 18039 | if test "x$ac_cv_lib_resolv_res_send" = x""yes; then : |
| 17963 | resolv=yes | 18040 | resolv=yes |
| 17964 | else | 18041 | else |
| 17965 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for __res_send in -lresolv" >&5 | 18042 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for __res_send in -lresolv" >&5 |
| 17966 | $as_echo_n "checking for __res_send in -lresolv... " >&6; } | 18043 | $as_echo_n "checking for __res_send in -lresolv... " >&6; } |
| 17967 | if ${ac_cv_lib_resolv___res_send+:} false; then : | 18044 | if test "${ac_cv_lib_resolv___res_send+set}" = set; then : |
| 17968 | $as_echo_n "(cached) " >&6 | 18045 | $as_echo_n "(cached) " >&6 |
| 17969 | else | 18046 | else |
| 17970 | ac_check_lib_save_LIBS=$LIBS | 18047 | ac_check_lib_save_LIBS=$LIBS |
| @@ -17998,7 +18075,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 17998 | fi | 18075 | fi |
| 17999 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_resolv___res_send" >&5 | 18076 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_resolv___res_send" >&5 |
| 18000 | $as_echo "$ac_cv_lib_resolv___res_send" >&6; } | 18077 | $as_echo "$ac_cv_lib_resolv___res_send" >&6; } |
| 18001 | if test "x$ac_cv_lib_resolv___res_send" = xyes; then : | 18078 | if test "x$ac_cv_lib_resolv___res_send" = x""yes; then : |
| 18002 | resolv=yes | 18079 | resolv=yes |
| 18003 | fi | 18080 | fi |
| 18004 | 18081 | ||
| @@ -18014,12 +18091,12 @@ fi | |||
| 18014 | RESOLVLIB= | 18091 | RESOLVLIB= |
| 18015 | fi | 18092 | fi |
| 18016 | ac_fn_c_check_func "$LINENO" "hes_getmailhost" "ac_cv_func_hes_getmailhost" | 18093 | ac_fn_c_check_func "$LINENO" "hes_getmailhost" "ac_cv_func_hes_getmailhost" |
| 18017 | if test "x$ac_cv_func_hes_getmailhost" = xyes; then : | 18094 | if test "x$ac_cv_func_hes_getmailhost" = x""yes; then : |
| 18018 | 18095 | ||
| 18019 | else | 18096 | else |
| 18020 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for hes_getmailhost in -lhesiod" >&5 | 18097 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for hes_getmailhost in -lhesiod" >&5 |
| 18021 | $as_echo_n "checking for hes_getmailhost in -lhesiod... " >&6; } | 18098 | $as_echo_n "checking for hes_getmailhost in -lhesiod... " >&6; } |
| 18022 | if ${ac_cv_lib_hesiod_hes_getmailhost+:} false; then : | 18099 | if test "${ac_cv_lib_hesiod_hes_getmailhost+set}" = set; then : |
| 18023 | $as_echo_n "(cached) " >&6 | 18100 | $as_echo_n "(cached) " >&6 |
| 18024 | else | 18101 | else |
| 18025 | ac_check_lib_save_LIBS=$LIBS | 18102 | ac_check_lib_save_LIBS=$LIBS |
| @@ -18053,7 +18130,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 18053 | fi | 18130 | fi |
| 18054 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_hesiod_hes_getmailhost" >&5 | 18131 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_hesiod_hes_getmailhost" >&5 |
| 18055 | $as_echo "$ac_cv_lib_hesiod_hes_getmailhost" >&6; } | 18132 | $as_echo "$ac_cv_lib_hesiod_hes_getmailhost" >&6; } |
| 18056 | if test "x$ac_cv_lib_hesiod_hes_getmailhost" = xyes; then : | 18133 | if test "x$ac_cv_lib_hesiod_hes_getmailhost" = x""yes; then : |
| 18057 | hesiod=yes | 18134 | hesiod=yes |
| 18058 | else | 18135 | else |
| 18059 | : | 18136 | : |
| @@ -18092,7 +18169,7 @@ KRB4LIB= | |||
| 18092 | if test "${with_kerberos}" != no; then | 18169 | if test "${with_kerberos}" != no; then |
| 18093 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for com_err in -lcom_err" >&5 | 18170 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for com_err in -lcom_err" >&5 |
| 18094 | $as_echo_n "checking for com_err in -lcom_err... " >&6; } | 18171 | $as_echo_n "checking for com_err in -lcom_err... " >&6; } |
| 18095 | if ${ac_cv_lib_com_err_com_err+:} false; then : | 18172 | if test "${ac_cv_lib_com_err_com_err+set}" = set; then : |
| 18096 | $as_echo_n "(cached) " >&6 | 18173 | $as_echo_n "(cached) " >&6 |
| 18097 | else | 18174 | else |
| 18098 | ac_check_lib_save_LIBS=$LIBS | 18175 | ac_check_lib_save_LIBS=$LIBS |
| @@ -18126,7 +18203,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 18126 | fi | 18203 | fi |
| 18127 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_com_err_com_err" >&5 | 18204 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_com_err_com_err" >&5 |
| 18128 | $as_echo "$ac_cv_lib_com_err_com_err" >&6; } | 18205 | $as_echo "$ac_cv_lib_com_err_com_err" >&6; } |
| 18129 | if test "x$ac_cv_lib_com_err_com_err" = xyes; then : | 18206 | if test "x$ac_cv_lib_com_err_com_err" = x""yes; then : |
| 18130 | have_com_err=yes | 18207 | have_com_err=yes |
| 18131 | else | 18208 | else |
| 18132 | have_com_err=no | 18209 | have_com_err=no |
| @@ -18141,7 +18218,7 @@ $as_echo "#define HAVE_LIBCOM_ERR 1" >>confdefs.h | |||
| 18141 | fi | 18218 | fi |
| 18142 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for mit_des_cbc_encrypt in -lcrypto" >&5 | 18219 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for mit_des_cbc_encrypt in -lcrypto" >&5 |
| 18143 | $as_echo_n "checking for mit_des_cbc_encrypt in -lcrypto... " >&6; } | 18220 | $as_echo_n "checking for mit_des_cbc_encrypt in -lcrypto... " >&6; } |
| 18144 | if ${ac_cv_lib_crypto_mit_des_cbc_encrypt+:} false; then : | 18221 | if test "${ac_cv_lib_crypto_mit_des_cbc_encrypt+set}" = set; then : |
| 18145 | $as_echo_n "(cached) " >&6 | 18222 | $as_echo_n "(cached) " >&6 |
| 18146 | else | 18223 | else |
| 18147 | ac_check_lib_save_LIBS=$LIBS | 18224 | ac_check_lib_save_LIBS=$LIBS |
| @@ -18175,7 +18252,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 18175 | fi | 18252 | fi |
| 18176 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_crypto_mit_des_cbc_encrypt" >&5 | 18253 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_crypto_mit_des_cbc_encrypt" >&5 |
| 18177 | $as_echo "$ac_cv_lib_crypto_mit_des_cbc_encrypt" >&6; } | 18254 | $as_echo "$ac_cv_lib_crypto_mit_des_cbc_encrypt" >&6; } |
| 18178 | if test "x$ac_cv_lib_crypto_mit_des_cbc_encrypt" = xyes; then : | 18255 | if test "x$ac_cv_lib_crypto_mit_des_cbc_encrypt" = x""yes; then : |
| 18179 | have_crypto=yes | 18256 | have_crypto=yes |
| 18180 | else | 18257 | else |
| 18181 | have_crypto=no | 18258 | have_crypto=no |
| @@ -18190,7 +18267,7 @@ $as_echo "#define HAVE_LIBCRYPTO 1" >>confdefs.h | |||
| 18190 | fi | 18267 | fi |
| 18191 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for mit_des_cbc_encrypt in -lk5crypto" >&5 | 18268 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for mit_des_cbc_encrypt in -lk5crypto" >&5 |
| 18192 | $as_echo_n "checking for mit_des_cbc_encrypt in -lk5crypto... " >&6; } | 18269 | $as_echo_n "checking for mit_des_cbc_encrypt in -lk5crypto... " >&6; } |
| 18193 | if ${ac_cv_lib_k5crypto_mit_des_cbc_encrypt+:} false; then : | 18270 | if test "${ac_cv_lib_k5crypto_mit_des_cbc_encrypt+set}" = set; then : |
| 18194 | $as_echo_n "(cached) " >&6 | 18271 | $as_echo_n "(cached) " >&6 |
| 18195 | else | 18272 | else |
| 18196 | ac_check_lib_save_LIBS=$LIBS | 18273 | ac_check_lib_save_LIBS=$LIBS |
| @@ -18224,7 +18301,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 18224 | fi | 18301 | fi |
| 18225 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_k5crypto_mit_des_cbc_encrypt" >&5 | 18302 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_k5crypto_mit_des_cbc_encrypt" >&5 |
| 18226 | $as_echo "$ac_cv_lib_k5crypto_mit_des_cbc_encrypt" >&6; } | 18303 | $as_echo "$ac_cv_lib_k5crypto_mit_des_cbc_encrypt" >&6; } |
| 18227 | if test "x$ac_cv_lib_k5crypto_mit_des_cbc_encrypt" = xyes; then : | 18304 | if test "x$ac_cv_lib_k5crypto_mit_des_cbc_encrypt" = x""yes; then : |
| 18228 | have_k5crypto=yes | 18305 | have_k5crypto=yes |
| 18229 | else | 18306 | else |
| 18230 | have_k5crypto=no | 18307 | have_k5crypto=no |
| @@ -18239,7 +18316,7 @@ $as_echo "#define HAVE_LIBK5CRYPTO 1" >>confdefs.h | |||
| 18239 | fi | 18316 | fi |
| 18240 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for krb5_init_context in -lkrb5" >&5 | 18317 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for krb5_init_context in -lkrb5" >&5 |
| 18241 | $as_echo_n "checking for krb5_init_context in -lkrb5... " >&6; } | 18318 | $as_echo_n "checking for krb5_init_context in -lkrb5... " >&6; } |
| 18242 | if ${ac_cv_lib_krb5_krb5_init_context+:} false; then : | 18319 | if test "${ac_cv_lib_krb5_krb5_init_context+set}" = set; then : |
| 18243 | $as_echo_n "(cached) " >&6 | 18320 | $as_echo_n "(cached) " >&6 |
| 18244 | else | 18321 | else |
| 18245 | ac_check_lib_save_LIBS=$LIBS | 18322 | ac_check_lib_save_LIBS=$LIBS |
| @@ -18273,7 +18350,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 18273 | fi | 18350 | fi |
| 18274 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_krb5_krb5_init_context" >&5 | 18351 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_krb5_krb5_init_context" >&5 |
| 18275 | $as_echo "$ac_cv_lib_krb5_krb5_init_context" >&6; } | 18352 | $as_echo "$ac_cv_lib_krb5_krb5_init_context" >&6; } |
| 18276 | if test "x$ac_cv_lib_krb5_krb5_init_context" = xyes; then : | 18353 | if test "x$ac_cv_lib_krb5_krb5_init_context" = x""yes; then : |
| 18277 | have_krb5=yes | 18354 | have_krb5=yes |
| 18278 | else | 18355 | else |
| 18279 | have_krb5=no | 18356 | have_krb5=no |
| @@ -18289,7 +18366,7 @@ $as_echo "#define HAVE_LIBKRB5 1" >>confdefs.h | |||
| 18289 | if test "${with_kerberos5}" = no; then | 18366 | if test "${with_kerberos5}" = no; then |
| 18290 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for des_cbc_encrypt in -ldes425" >&5 | 18367 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for des_cbc_encrypt in -ldes425" >&5 |
| 18291 | $as_echo_n "checking for des_cbc_encrypt in -ldes425... " >&6; } | 18368 | $as_echo_n "checking for des_cbc_encrypt in -ldes425... " >&6; } |
| 18292 | if ${ac_cv_lib_des425_des_cbc_encrypt+:} false; then : | 18369 | if test "${ac_cv_lib_des425_des_cbc_encrypt+set}" = set; then : |
| 18293 | $as_echo_n "(cached) " >&6 | 18370 | $as_echo_n "(cached) " >&6 |
| 18294 | else | 18371 | else |
| 18295 | ac_check_lib_save_LIBS=$LIBS | 18372 | ac_check_lib_save_LIBS=$LIBS |
| @@ -18323,7 +18400,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 18323 | fi | 18400 | fi |
| 18324 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_des425_des_cbc_encrypt" >&5 | 18401 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_des425_des_cbc_encrypt" >&5 |
| 18325 | $as_echo "$ac_cv_lib_des425_des_cbc_encrypt" >&6; } | 18402 | $as_echo "$ac_cv_lib_des425_des_cbc_encrypt" >&6; } |
| 18326 | if test "x$ac_cv_lib_des425_des_cbc_encrypt" = xyes; then : | 18403 | if test "x$ac_cv_lib_des425_des_cbc_encrypt" = x""yes; then : |
| 18327 | have_des425=yes | 18404 | have_des425=yes |
| 18328 | else | 18405 | else |
| 18329 | have_des425=no | 18406 | have_des425=no |
| @@ -18338,7 +18415,7 @@ $as_echo "#define HAVE_LIBDES425 1" >>confdefs.h | |||
| 18338 | else | 18415 | else |
| 18339 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for des_cbc_encrypt in -ldes" >&5 | 18416 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for des_cbc_encrypt in -ldes" >&5 |
| 18340 | $as_echo_n "checking for des_cbc_encrypt in -ldes... " >&6; } | 18417 | $as_echo_n "checking for des_cbc_encrypt in -ldes... " >&6; } |
| 18341 | if ${ac_cv_lib_des_des_cbc_encrypt+:} false; then : | 18418 | if test "${ac_cv_lib_des_des_cbc_encrypt+set}" = set; then : |
| 18342 | $as_echo_n "(cached) " >&6 | 18419 | $as_echo_n "(cached) " >&6 |
| 18343 | else | 18420 | else |
| 18344 | ac_check_lib_save_LIBS=$LIBS | 18421 | ac_check_lib_save_LIBS=$LIBS |
| @@ -18372,7 +18449,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 18372 | fi | 18449 | fi |
| 18373 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_des_des_cbc_encrypt" >&5 | 18450 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_des_des_cbc_encrypt" >&5 |
| 18374 | $as_echo "$ac_cv_lib_des_des_cbc_encrypt" >&6; } | 18451 | $as_echo "$ac_cv_lib_des_des_cbc_encrypt" >&6; } |
| 18375 | if test "x$ac_cv_lib_des_des_cbc_encrypt" = xyes; then : | 18452 | if test "x$ac_cv_lib_des_des_cbc_encrypt" = x""yes; then : |
| 18376 | have_des=yes | 18453 | have_des=yes |
| 18377 | else | 18454 | else |
| 18378 | have_des=no | 18455 | have_des=no |
| @@ -18388,7 +18465,7 @@ $as_echo "#define HAVE_LIBDES 1" >>confdefs.h | |||
| 18388 | fi | 18465 | fi |
| 18389 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for krb_get_cred in -lkrb4" >&5 | 18466 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for krb_get_cred in -lkrb4" >&5 |
| 18390 | $as_echo_n "checking for krb_get_cred in -lkrb4... " >&6; } | 18467 | $as_echo_n "checking for krb_get_cred in -lkrb4... " >&6; } |
| 18391 | if ${ac_cv_lib_krb4_krb_get_cred+:} false; then : | 18468 | if test "${ac_cv_lib_krb4_krb_get_cred+set}" = set; then : |
| 18392 | $as_echo_n "(cached) " >&6 | 18469 | $as_echo_n "(cached) " >&6 |
| 18393 | else | 18470 | else |
| 18394 | ac_check_lib_save_LIBS=$LIBS | 18471 | ac_check_lib_save_LIBS=$LIBS |
| @@ -18422,7 +18499,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 18422 | fi | 18499 | fi |
| 18423 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_krb4_krb_get_cred" >&5 | 18500 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_krb4_krb_get_cred" >&5 |
| 18424 | $as_echo "$ac_cv_lib_krb4_krb_get_cred" >&6; } | 18501 | $as_echo "$ac_cv_lib_krb4_krb_get_cred" >&6; } |
| 18425 | if test "x$ac_cv_lib_krb4_krb_get_cred" = xyes; then : | 18502 | if test "x$ac_cv_lib_krb4_krb_get_cred" = x""yes; then : |
| 18426 | have_krb4=yes | 18503 | have_krb4=yes |
| 18427 | else | 18504 | else |
| 18428 | have_krb4=no | 18505 | have_krb4=no |
| @@ -18437,7 +18514,7 @@ $as_echo "#define HAVE_LIBKRB4 1" >>confdefs.h | |||
| 18437 | else | 18514 | else |
| 18438 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for krb_get_cred in -lkrb" >&5 | 18515 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for krb_get_cred in -lkrb" >&5 |
| 18439 | $as_echo_n "checking for krb_get_cred in -lkrb... " >&6; } | 18516 | $as_echo_n "checking for krb_get_cred in -lkrb... " >&6; } |
| 18440 | if ${ac_cv_lib_krb_krb_get_cred+:} false; then : | 18517 | if test "${ac_cv_lib_krb_krb_get_cred+set}" = set; then : |
| 18441 | $as_echo_n "(cached) " >&6 | 18518 | $as_echo_n "(cached) " >&6 |
| 18442 | else | 18519 | else |
| 18443 | ac_check_lib_save_LIBS=$LIBS | 18520 | ac_check_lib_save_LIBS=$LIBS |
| @@ -18471,7 +18548,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 18471 | fi | 18548 | fi |
| 18472 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_krb_krb_get_cred" >&5 | 18549 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_krb_krb_get_cred" >&5 |
| 18473 | $as_echo "$ac_cv_lib_krb_krb_get_cred" >&6; } | 18550 | $as_echo "$ac_cv_lib_krb_krb_get_cred" >&6; } |
| 18474 | if test "x$ac_cv_lib_krb_krb_get_cred" = xyes; then : | 18551 | if test "x$ac_cv_lib_krb_krb_get_cred" = x""yes; then : |
| 18475 | have_krb=yes | 18552 | have_krb=yes |
| 18476 | else | 18553 | else |
| 18477 | have_krb=no | 18554 | have_krb=no |
| @@ -18491,13 +18568,13 @@ $as_echo "#define HAVE_LIBKRB 1" >>confdefs.h | |||
| 18491 | for ac_header in krb5.h | 18568 | for ac_header in krb5.h |
| 18492 | do : | 18569 | do : |
| 18493 | ac_fn_c_check_header_mongrel "$LINENO" "krb5.h" "ac_cv_header_krb5_h" "$ac_includes_default" | 18570 | ac_fn_c_check_header_mongrel "$LINENO" "krb5.h" "ac_cv_header_krb5_h" "$ac_includes_default" |
| 18494 | if test "x$ac_cv_header_krb5_h" = xyes; then : | 18571 | if test "x$ac_cv_header_krb5_h" = x""yes; then : |
| 18495 | cat >>confdefs.h <<_ACEOF | 18572 | cat >>confdefs.h <<_ACEOF |
| 18496 | #define HAVE_KRB5_H 1 | 18573 | #define HAVE_KRB5_H 1 |
| 18497 | _ACEOF | 18574 | _ACEOF |
| 18498 | ac_fn_c_check_member "$LINENO" "krb5_error" "text" "ac_cv_member_krb5_error_text" "#include <krb5.h> | 18575 | ac_fn_c_check_member "$LINENO" "krb5_error" "text" "ac_cv_member_krb5_error_text" "#include <krb5.h> |
| 18499 | " | 18576 | " |
| 18500 | if test "x$ac_cv_member_krb5_error_text" = xyes; then : | 18577 | if test "x$ac_cv_member_krb5_error_text" = x""yes; then : |
| 18501 | 18578 | ||
| 18502 | cat >>confdefs.h <<_ACEOF | 18579 | cat >>confdefs.h <<_ACEOF |
| 18503 | #define HAVE_KRB5_ERROR_TEXT 1 | 18580 | #define HAVE_KRB5_ERROR_TEXT 1 |
| @@ -18507,7 +18584,7 @@ _ACEOF | |||
| 18507 | fi | 18584 | fi |
| 18508 | ac_fn_c_check_member "$LINENO" "krb5_error" "e_text" "ac_cv_member_krb5_error_e_text" "#include <krb5.h> | 18585 | ac_fn_c_check_member "$LINENO" "krb5_error" "e_text" "ac_cv_member_krb5_error_e_text" "#include <krb5.h> |
| 18509 | " | 18586 | " |
| 18510 | if test "x$ac_cv_member_krb5_error_e_text" = xyes; then : | 18587 | if test "x$ac_cv_member_krb5_error_e_text" = x""yes; then : |
| 18511 | 18588 | ||
| 18512 | cat >>confdefs.h <<_ACEOF | 18589 | cat >>confdefs.h <<_ACEOF |
| 18513 | #define HAVE_KRB5_ERROR_E_TEXT 1 | 18590 | #define HAVE_KRB5_ERROR_E_TEXT 1 |
| @@ -18524,7 +18601,7 @@ done | |||
| 18524 | for ac_header in des.h | 18601 | for ac_header in des.h |
| 18525 | do : | 18602 | do : |
| 18526 | ac_fn_c_check_header_mongrel "$LINENO" "des.h" "ac_cv_header_des_h" "$ac_includes_default" | 18603 | ac_fn_c_check_header_mongrel "$LINENO" "des.h" "ac_cv_header_des_h" "$ac_includes_default" |
| 18527 | if test "x$ac_cv_header_des_h" = xyes; then : | 18604 | if test "x$ac_cv_header_des_h" = x""yes; then : |
| 18528 | cat >>confdefs.h <<_ACEOF | 18605 | cat >>confdefs.h <<_ACEOF |
| 18529 | #define HAVE_DES_H 1 | 18606 | #define HAVE_DES_H 1 |
| 18530 | _ACEOF | 18607 | _ACEOF |
| @@ -18533,7 +18610,7 @@ else | |||
| 18533 | for ac_header in kerberosIV/des.h | 18610 | for ac_header in kerberosIV/des.h |
| 18534 | do : | 18611 | do : |
| 18535 | ac_fn_c_check_header_mongrel "$LINENO" "kerberosIV/des.h" "ac_cv_header_kerberosIV_des_h" "$ac_includes_default" | 18612 | ac_fn_c_check_header_mongrel "$LINENO" "kerberosIV/des.h" "ac_cv_header_kerberosIV_des_h" "$ac_includes_default" |
| 18536 | if test "x$ac_cv_header_kerberosIV_des_h" = xyes; then : | 18613 | if test "x$ac_cv_header_kerberosIV_des_h" = x""yes; then : |
| 18537 | cat >>confdefs.h <<_ACEOF | 18614 | cat >>confdefs.h <<_ACEOF |
| 18538 | #define HAVE_KERBEROSIV_DES_H 1 | 18615 | #define HAVE_KERBEROSIV_DES_H 1 |
| 18539 | _ACEOF | 18616 | _ACEOF |
| @@ -18542,7 +18619,7 @@ else | |||
| 18542 | for ac_header in kerberos/des.h | 18619 | for ac_header in kerberos/des.h |
| 18543 | do : | 18620 | do : |
| 18544 | ac_fn_c_check_header_mongrel "$LINENO" "kerberos/des.h" "ac_cv_header_kerberos_des_h" "$ac_includes_default" | 18621 | ac_fn_c_check_header_mongrel "$LINENO" "kerberos/des.h" "ac_cv_header_kerberos_des_h" "$ac_includes_default" |
| 18545 | if test "x$ac_cv_header_kerberos_des_h" = xyes; then : | 18622 | if test "x$ac_cv_header_kerberos_des_h" = x""yes; then : |
| 18546 | cat >>confdefs.h <<_ACEOF | 18623 | cat >>confdefs.h <<_ACEOF |
| 18547 | #define HAVE_KERBEROS_DES_H 1 | 18624 | #define HAVE_KERBEROS_DES_H 1 |
| 18548 | _ACEOF | 18625 | _ACEOF |
| @@ -18562,7 +18639,7 @@ done | |||
| 18562 | for ac_header in krb.h | 18639 | for ac_header in krb.h |
| 18563 | do : | 18640 | do : |
| 18564 | ac_fn_c_check_header_mongrel "$LINENO" "krb.h" "ac_cv_header_krb_h" "$ac_includes_default" | 18641 | ac_fn_c_check_header_mongrel "$LINENO" "krb.h" "ac_cv_header_krb_h" "$ac_includes_default" |
| 18565 | if test "x$ac_cv_header_krb_h" = xyes; then : | 18642 | if test "x$ac_cv_header_krb_h" = x""yes; then : |
| 18566 | cat >>confdefs.h <<_ACEOF | 18643 | cat >>confdefs.h <<_ACEOF |
| 18567 | #define HAVE_KRB_H 1 | 18644 | #define HAVE_KRB_H 1 |
| 18568 | _ACEOF | 18645 | _ACEOF |
| @@ -18571,7 +18648,7 @@ else | |||
| 18571 | for ac_header in kerberosIV/krb.h | 18648 | for ac_header in kerberosIV/krb.h |
| 18572 | do : | 18649 | do : |
| 18573 | ac_fn_c_check_header_mongrel "$LINENO" "kerberosIV/krb.h" "ac_cv_header_kerberosIV_krb_h" "$ac_includes_default" | 18650 | ac_fn_c_check_header_mongrel "$LINENO" "kerberosIV/krb.h" "ac_cv_header_kerberosIV_krb_h" "$ac_includes_default" |
| 18574 | if test "x$ac_cv_header_kerberosIV_krb_h" = xyes; then : | 18651 | if test "x$ac_cv_header_kerberosIV_krb_h" = x""yes; then : |
| 18575 | cat >>confdefs.h <<_ACEOF | 18652 | cat >>confdefs.h <<_ACEOF |
| 18576 | #define HAVE_KERBEROSIV_KRB_H 1 | 18653 | #define HAVE_KERBEROSIV_KRB_H 1 |
| 18577 | _ACEOF | 18654 | _ACEOF |
| @@ -18580,7 +18657,7 @@ else | |||
| 18580 | for ac_header in kerberos/krb.h | 18657 | for ac_header in kerberos/krb.h |
| 18581 | do : | 18658 | do : |
| 18582 | ac_fn_c_check_header_mongrel "$LINENO" "kerberos/krb.h" "ac_cv_header_kerberos_krb_h" "$ac_includes_default" | 18659 | ac_fn_c_check_header_mongrel "$LINENO" "kerberos/krb.h" "ac_cv_header_kerberos_krb_h" "$ac_includes_default" |
| 18583 | if test "x$ac_cv_header_kerberos_krb_h" = xyes; then : | 18660 | if test "x$ac_cv_header_kerberos_krb_h" = x""yes; then : |
| 18584 | cat >>confdefs.h <<_ACEOF | 18661 | cat >>confdefs.h <<_ACEOF |
| 18585 | #define HAVE_KERBEROS_KRB_H 1 | 18662 | #define HAVE_KERBEROS_KRB_H 1 |
| 18586 | _ACEOF | 18663 | _ACEOF |
| @@ -18601,7 +18678,7 @@ done | |||
| 18601 | for ac_header in com_err.h | 18678 | for ac_header in com_err.h |
| 18602 | do : | 18679 | do : |
| 18603 | ac_fn_c_check_header_mongrel "$LINENO" "com_err.h" "ac_cv_header_com_err_h" "$ac_includes_default" | 18680 | ac_fn_c_check_header_mongrel "$LINENO" "com_err.h" "ac_cv_header_com_err_h" "$ac_includes_default" |
| 18604 | if test "x$ac_cv_header_com_err_h" = xyes; then : | 18681 | if test "x$ac_cv_header_com_err_h" = x""yes; then : |
| 18605 | cat >>confdefs.h <<_ACEOF | 18682 | cat >>confdefs.h <<_ACEOF |
| 18606 | #define HAVE_COM_ERR_H 1 | 18683 | #define HAVE_COM_ERR_H 1 |
| 18607 | _ACEOF | 18684 | _ACEOF |
| @@ -18622,7 +18699,7 @@ fi | |||
| 18622 | # to return localized messages. | 18699 | # to return localized messages. |
| 18623 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for dgettext in -lintl" >&5 | 18700 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for dgettext in -lintl" >&5 |
| 18624 | $as_echo_n "checking for dgettext in -lintl... " >&6; } | 18701 | $as_echo_n "checking for dgettext in -lintl... " >&6; } |
| 18625 | if ${ac_cv_lib_intl_dgettext+:} false; then : | 18702 | if test "${ac_cv_lib_intl_dgettext+set}" = set; then : |
| 18626 | $as_echo_n "(cached) " >&6 | 18703 | $as_echo_n "(cached) " >&6 |
| 18627 | else | 18704 | else |
| 18628 | ac_check_lib_save_LIBS=$LIBS | 18705 | ac_check_lib_save_LIBS=$LIBS |
| @@ -18656,7 +18733,7 @@ LIBS=$ac_check_lib_save_LIBS | |||
| 18656 | fi | 18733 | fi |
| 18657 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_intl_dgettext" >&5 | 18734 | { $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_lib_intl_dgettext" >&5 |
| 18658 | $as_echo "$ac_cv_lib_intl_dgettext" >&6; } | 18735 | $as_echo "$ac_cv_lib_intl_dgettext" >&6; } |
| 18659 | if test "x$ac_cv_lib_intl_dgettext" = xyes; then : | 18736 | if test "x$ac_cv_lib_intl_dgettext" = x""yes; then : |
| 18660 | cat >>confdefs.h <<_ACEOF | 18737 | cat >>confdefs.h <<_ACEOF |
| 18661 | #define HAVE_LIBINTL 1 | 18738 | #define HAVE_LIBINTL 1 |
| 18662 | _ACEOF | 18739 | _ACEOF |
| @@ -18668,7 +18745,7 @@ fi | |||
| 18668 | 18745 | ||
| 18669 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether localtime caches TZ" >&5 | 18746 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether localtime caches TZ" >&5 |
| 18670 | $as_echo_n "checking whether localtime caches TZ... " >&6; } | 18747 | $as_echo_n "checking whether localtime caches TZ... " >&6; } |
| 18671 | if ${emacs_cv_localtime_cache+:} false; then : | 18748 | if test "${emacs_cv_localtime_cache+set}" = set; then : |
| 18672 | $as_echo_n "(cached) " >&6 | 18749 | $as_echo_n "(cached) " >&6 |
| 18673 | else | 18750 | else |
| 18674 | if test x$ac_cv_func_tzset = xyes; then | 18751 | if test x$ac_cv_func_tzset = xyes; then |
| @@ -18727,7 +18804,7 @@ if test "x$HAVE_TIMEVAL" = xyes; then | |||
| 18727 | for ac_func in gettimeofday | 18804 | for ac_func in gettimeofday |
| 18728 | do : | 18805 | do : |
| 18729 | ac_fn_c_check_func "$LINENO" "gettimeofday" "ac_cv_func_gettimeofday" | 18806 | ac_fn_c_check_func "$LINENO" "gettimeofday" "ac_cv_func_gettimeofday" |
| 18730 | if test "x$ac_cv_func_gettimeofday" = xyes; then : | 18807 | if test "x$ac_cv_func_gettimeofday" = x""yes; then : |
| 18731 | cat >>confdefs.h <<_ACEOF | 18808 | cat >>confdefs.h <<_ACEOF |
| 18732 | #define HAVE_GETTIMEOFDAY 1 | 18809 | #define HAVE_GETTIMEOFDAY 1 |
| 18733 | _ACEOF | 18810 | _ACEOF |
| @@ -18738,7 +18815,7 @@ done | |||
| 18738 | if test $ac_cv_func_gettimeofday = yes; then | 18815 | if test $ac_cv_func_gettimeofday = yes; then |
| 18739 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether gettimeofday can accept two arguments" >&5 | 18816 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking whether gettimeofday can accept two arguments" >&5 |
| 18740 | $as_echo_n "checking whether gettimeofday can accept two arguments... " >&6; } | 18817 | $as_echo_n "checking whether gettimeofday can accept two arguments... " >&6; } |
| 18741 | if ${emacs_cv_gettimeofday_two_arguments+:} false; then : | 18818 | if test "${emacs_cv_gettimeofday_two_arguments+set}" = set; then : |
| 18742 | $as_echo_n "(cached) " >&6 | 18819 | $as_echo_n "(cached) " >&6 |
| 18743 | else | 18820 | else |
| 18744 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 18821 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -18782,7 +18859,7 @@ fi | |||
| 18782 | 18859 | ||
| 18783 | ok_so_far=yes | 18860 | ok_so_far=yes |
| 18784 | ac_fn_c_check_func "$LINENO" "socket" "ac_cv_func_socket" | 18861 | ac_fn_c_check_func "$LINENO" "socket" "ac_cv_func_socket" |
| 18785 | if test "x$ac_cv_func_socket" = xyes; then : | 18862 | if test "x$ac_cv_func_socket" = x""yes; then : |
| 18786 | 18863 | ||
| 18787 | else | 18864 | else |
| 18788 | ok_so_far=no | 18865 | ok_so_far=no |
| @@ -18790,7 +18867,7 @@ fi | |||
| 18790 | 18867 | ||
| 18791 | if test $ok_so_far = yes; then | 18868 | if test $ok_so_far = yes; then |
| 18792 | ac_fn_c_check_header_mongrel "$LINENO" "netinet/in.h" "ac_cv_header_netinet_in_h" "$ac_includes_default" | 18869 | ac_fn_c_check_header_mongrel "$LINENO" "netinet/in.h" "ac_cv_header_netinet_in_h" "$ac_includes_default" |
| 18793 | if test "x$ac_cv_header_netinet_in_h" = xyes; then : | 18870 | if test "x$ac_cv_header_netinet_in_h" = x""yes; then : |
| 18794 | 18871 | ||
| 18795 | else | 18872 | else |
| 18796 | ok_so_far=no | 18873 | ok_so_far=no |
| @@ -18800,7 +18877,7 @@ fi | |||
| 18800 | fi | 18877 | fi |
| 18801 | if test $ok_so_far = yes; then | 18878 | if test $ok_so_far = yes; then |
| 18802 | ac_fn_c_check_header_mongrel "$LINENO" "arpa/inet.h" "ac_cv_header_arpa_inet_h" "$ac_includes_default" | 18879 | ac_fn_c_check_header_mongrel "$LINENO" "arpa/inet.h" "ac_cv_header_arpa_inet_h" "$ac_includes_default" |
| 18803 | if test "x$ac_cv_header_arpa_inet_h" = xyes; then : | 18880 | if test "x$ac_cv_header_arpa_inet_h" = x""yes; then : |
| 18804 | 18881 | ||
| 18805 | else | 18882 | else |
| 18806 | ok_so_far=no | 18883 | ok_so_far=no |
| @@ -18834,7 +18911,7 @@ $as_echo "no" >&6; } | |||
| 18834 | fi | 18911 | fi |
| 18835 | 18912 | ||
| 18836 | ac_fn_c_check_type "$LINENO" "pid_t" "ac_cv_type_pid_t" "$ac_includes_default" | 18913 | ac_fn_c_check_type "$LINENO" "pid_t" "ac_cv_type_pid_t" "$ac_includes_default" |
| 18837 | if test "x$ac_cv_type_pid_t" = xyes; then : | 18914 | if test "x$ac_cv_type_pid_t" = x""yes; then : |
| 18838 | 18915 | ||
| 18839 | else | 18916 | else |
| 18840 | 18917 | ||
| @@ -18847,7 +18924,7 @@ fi | |||
| 18847 | for ac_header in vfork.h | 18924 | for ac_header in vfork.h |
| 18848 | do : | 18925 | do : |
| 18849 | ac_fn_c_check_header_mongrel "$LINENO" "vfork.h" "ac_cv_header_vfork_h" "$ac_includes_default" | 18926 | ac_fn_c_check_header_mongrel "$LINENO" "vfork.h" "ac_cv_header_vfork_h" "$ac_includes_default" |
| 18850 | if test "x$ac_cv_header_vfork_h" = xyes; then : | 18927 | if test "x$ac_cv_header_vfork_h" = x""yes; then : |
| 18851 | cat >>confdefs.h <<_ACEOF | 18928 | cat >>confdefs.h <<_ACEOF |
| 18852 | #define HAVE_VFORK_H 1 | 18929 | #define HAVE_VFORK_H 1 |
| 18853 | _ACEOF | 18930 | _ACEOF |
| @@ -18871,7 +18948,7 @@ done | |||
| 18871 | if test "x$ac_cv_func_fork" = xyes; then | 18948 | if test "x$ac_cv_func_fork" = xyes; then |
| 18872 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working fork" >&5 | 18949 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working fork" >&5 |
| 18873 | $as_echo_n "checking for working fork... " >&6; } | 18950 | $as_echo_n "checking for working fork... " >&6; } |
| 18874 | if ${ac_cv_func_fork_works+:} false; then : | 18951 | if test "${ac_cv_func_fork_works+set}" = set; then : |
| 18875 | $as_echo_n "(cached) " >&6 | 18952 | $as_echo_n "(cached) " >&6 |
| 18876 | else | 18953 | else |
| 18877 | if test "$cross_compiling" = yes; then : | 18954 | if test "$cross_compiling" = yes; then : |
| @@ -18924,7 +19001,7 @@ ac_cv_func_vfork_works=$ac_cv_func_vfork | |||
| 18924 | if test "x$ac_cv_func_vfork" = xyes; then | 19001 | if test "x$ac_cv_func_vfork" = xyes; then |
| 18925 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working vfork" >&5 | 19002 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for working vfork" >&5 |
| 18926 | $as_echo_n "checking for working vfork... " >&6; } | 19003 | $as_echo_n "checking for working vfork... " >&6; } |
| 18927 | if ${ac_cv_func_vfork_works+:} false; then : | 19004 | if test "${ac_cv_func_vfork_works+set}" = set; then : |
| 18928 | $as_echo_n "(cached) " >&6 | 19005 | $as_echo_n "(cached) " >&6 |
| 18929 | else | 19006 | else |
| 18930 | if test "$cross_compiling" = yes; then : | 19007 | if test "$cross_compiling" = yes; then : |
| @@ -19060,7 +19137,7 @@ fi | |||
| 19060 | 19137 | ||
| 19061 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for nl_langinfo and CODESET" >&5 | 19138 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for nl_langinfo and CODESET" >&5 |
| 19062 | $as_echo_n "checking for nl_langinfo and CODESET... " >&6; } | 19139 | $as_echo_n "checking for nl_langinfo and CODESET... " >&6; } |
| 19063 | if ${emacs_cv_langinfo_codeset+:} false; then : | 19140 | if test "${emacs_cv_langinfo_codeset+set}" = set; then : |
| 19064 | $as_echo_n "(cached) " >&6 | 19141 | $as_echo_n "(cached) " >&6 |
| 19065 | else | 19142 | else |
| 19066 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 19143 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -19092,7 +19169,7 @@ $as_echo "#define HAVE_LANGINFO_CODESET 1" >>confdefs.h | |||
| 19092 | fi | 19169 | fi |
| 19093 | 19170 | ||
| 19094 | ac_fn_c_check_type "$LINENO" "size_t" "ac_cv_type_size_t" "$ac_includes_default" | 19171 | ac_fn_c_check_type "$LINENO" "size_t" "ac_cv_type_size_t" "$ac_includes_default" |
| 19095 | if test "x$ac_cv_type_size_t" = xyes; then : | 19172 | if test "x$ac_cv_type_size_t" = x""yes; then : |
| 19096 | 19173 | ||
| 19097 | cat >>confdefs.h <<_ACEOF | 19174 | cat >>confdefs.h <<_ACEOF |
| 19098 | #define HAVE_SIZE_T 1 | 19175 | #define HAVE_SIZE_T 1 |
| @@ -19104,7 +19181,7 @@ fi | |||
| 19104 | 19181 | ||
| 19105 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for mbstate_t" >&5 | 19182 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for mbstate_t" >&5 |
| 19106 | $as_echo_n "checking for mbstate_t... " >&6; } | 19183 | $as_echo_n "checking for mbstate_t... " >&6; } |
| 19107 | if ${ac_cv_type_mbstate_t+:} false; then : | 19184 | if test "${ac_cv_type_mbstate_t+set}" = set; then : |
| 19108 | $as_echo_n "(cached) " >&6 | 19185 | $as_echo_n "(cached) " >&6 |
| 19109 | else | 19186 | else |
| 19110 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 19187 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -19140,7 +19217,7 @@ $as_echo "#define mbstate_t int" >>confdefs.h | |||
| 19140 | 19217 | ||
| 19141 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for C restricted array declarations" >&5 | 19218 | { $as_echo "$as_me:${as_lineno-$LINENO}: checking for C restricted array declarations" >&5 |
| 19142 | $as_echo_n "checking for C restricted array declarations... " >&6; } | 19219 | $as_echo_n "checking for C restricted array declarations... " >&6; } |
| 19143 | if ${emacs_cv_c_restrict_arr+:} false; then : | 19220 | if test "${emacs_cv_c_restrict_arr+set}" = set; then : |
| 19144 | $as_echo_n "(cached) " >&6 | 19221 | $as_echo_n "(cached) " >&6 |
| 19145 | else | 19222 | else |
| 19146 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext | 19223 | cat confdefs.h - <<_ACEOF >conftest.$ac_ext |
| @@ -19737,21 +19814,10 @@ $as_echo "$as_me: WARNING: cache variable $ac_var contains a newline" >&2;} ;; | |||
| 19737 | :end' >>confcache | 19814 | :end' >>confcache |
| 19738 | if diff "$cache_file" confcache >/dev/null 2>&1; then :; else | 19815 | if diff "$cache_file" confcache >/dev/null 2>&1; then :; else |
| 19739 | if test -w "$cache_file"; then | 19816 | if test -w "$cache_file"; then |
| 19740 | if test "x$cache_file" != "x/dev/null"; then | 19817 | test "x$cache_file" != "x/dev/null" && |
| 19741 | { $as_echo "$as_me:${as_lineno-$LINENO}: updating cache $cache_file" >&5 | 19818 | { $as_echo "$as_me:${as_lineno-$LINENO}: updating cache $cache_file" >&5 |
| 19742 | $as_echo "$as_me: updating cache $cache_file" >&6;} | 19819 | $as_echo "$as_me: updating cache $cache_file" >&6;} |
| 19743 | if test ! -f "$cache_file" || test -h "$cache_file"; then | 19820 | cat confcache >$cache_file |
| 19744 | cat confcache >"$cache_file" | ||
| 19745 | else | ||
| 19746 | case $cache_file in #( | ||
| 19747 | */* | ?:*) | ||
| 19748 | mv -f confcache "$cache_file"$$ && | ||
| 19749 | mv -f "$cache_file"$$ "$cache_file" ;; #( | ||
| 19750 | *) | ||
| 19751 | mv -f confcache "$cache_file" ;; | ||
| 19752 | esac | ||
| 19753 | fi | ||
| 19754 | fi | ||
| 19755 | else | 19821 | else |
| 19756 | { $as_echo "$as_me:${as_lineno-$LINENO}: not updating unwritable cache $cache_file" >&5 | 19822 | { $as_echo "$as_me:${as_lineno-$LINENO}: not updating unwritable cache $cache_file" >&5 |
| 19757 | $as_echo "$as_me: not updating unwritable cache $cache_file" >&6;} | 19823 | $as_echo "$as_me: not updating unwritable cache $cache_file" >&6;} |
| @@ -19837,7 +19903,7 @@ fi | |||
| 19837 | 19903 | ||
| 19838 | 19904 | ||
| 19839 | 19905 | ||
| 19840 | : "${CONFIG_STATUS=./config.status}" | 19906 | : ${CONFIG_STATUS=./config.status} |
| 19841 | ac_write_fail=0 | 19907 | ac_write_fail=0 |
| 19842 | ac_clean_files_save=$ac_clean_files | 19908 | ac_clean_files_save=$ac_clean_files |
| 19843 | ac_clean_files="$ac_clean_files $CONFIG_STATUS" | 19909 | ac_clean_files="$ac_clean_files $CONFIG_STATUS" |
| @@ -19938,7 +20004,6 @@ fi | |||
| 19938 | IFS=" "" $as_nl" | 20004 | IFS=" "" $as_nl" |
| 19939 | 20005 | ||
| 19940 | # Find who we are. Look in the path if we contain no directory separator. | 20006 | # Find who we are. Look in the path if we contain no directory separator. |
| 19941 | as_myself= | ||
| 19942 | case $0 in #(( | 20007 | case $0 in #(( |
| 19943 | *[\\/]* ) as_myself=$0 ;; | 20008 | *[\\/]* ) as_myself=$0 ;; |
| 19944 | *) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR | 20009 | *) as_save_IFS=$IFS; IFS=$PATH_SEPARATOR |
| @@ -20246,7 +20311,7 @@ cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 | |||
| 20246 | # values after options handling. | 20311 | # values after options handling. |
| 20247 | ac_log=" | 20312 | ac_log=" |
| 20248 | This file was extended by emacs $as_me 24.0.50, which was | 20313 | This file was extended by emacs $as_me 24.0.50, which was |
| 20249 | generated by GNU Autoconf 2.68. Invocation command line was | 20314 | generated by GNU Autoconf 2.67. Invocation command line was |
| 20250 | 20315 | ||
| 20251 | CONFIG_FILES = $CONFIG_FILES | 20316 | CONFIG_FILES = $CONFIG_FILES |
| 20252 | CONFIG_HEADERS = $CONFIG_HEADERS | 20317 | CONFIG_HEADERS = $CONFIG_HEADERS |
| @@ -20312,7 +20377,7 @@ cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 | |||
| 20312 | ac_cs_config="`$as_echo "$ac_configure_args" | sed 's/^ //; s/[\\""\`\$]/\\\\&/g'`" | 20377 | ac_cs_config="`$as_echo "$ac_configure_args" | sed 's/^ //; s/[\\""\`\$]/\\\\&/g'`" |
| 20313 | ac_cs_version="\\ | 20378 | ac_cs_version="\\ |
| 20314 | emacs config.status 24.0.50 | 20379 | emacs config.status 24.0.50 |
| 20315 | configured by $0, generated by GNU Autoconf 2.68, | 20380 | configured by $0, generated by GNU Autoconf 2.67, |
| 20316 | with options \\"\$ac_cs_config\\" | 20381 | with options \\"\$ac_cs_config\\" |
| 20317 | 20382 | ||
| 20318 | Copyright (C) 2010 Free Software Foundation, Inc. | 20383 | Copyright (C) 2010 Free Software Foundation, Inc. |
| @@ -20460,7 +20525,7 @@ do | |||
| 20460 | "epaths") CONFIG_COMMANDS="$CONFIG_COMMANDS epaths" ;; | 20525 | "epaths") CONFIG_COMMANDS="$CONFIG_COMMANDS epaths" ;; |
| 20461 | "gdbinit") CONFIG_COMMANDS="$CONFIG_COMMANDS gdbinit" ;; | 20526 | "gdbinit") CONFIG_COMMANDS="$CONFIG_COMMANDS gdbinit" ;; |
| 20462 | 20527 | ||
| 20463 | *) as_fn_error $? "invalid argument: \`$ac_config_target'" "$LINENO" 5;; | 20528 | *) as_fn_error $? "invalid argument: \`$ac_config_target'" "$LINENO" 5 ;; |
| 20464 | esac | 20529 | esac |
| 20465 | done | 20530 | done |
| 20466 | 20531 | ||
| @@ -20483,10 +20548,9 @@ fi | |||
| 20483 | # after its creation but before its name has been assigned to `$tmp'. | 20548 | # after its creation but before its name has been assigned to `$tmp'. |
| 20484 | $debug || | 20549 | $debug || |
| 20485 | { | 20550 | { |
| 20486 | tmp= ac_tmp= | 20551 | tmp= |
| 20487 | trap 'exit_status=$? | 20552 | trap 'exit_status=$? |
| 20488 | : "${ac_tmp:=$tmp}" | 20553 | { test -z "$tmp" || test ! -d "$tmp" || rm -fr "$tmp"; } && exit $exit_status |
| 20489 | { test ! -d "$ac_tmp" || rm -fr "$ac_tmp"; } && exit $exit_status | ||
| 20490 | ' 0 | 20554 | ' 0 |
| 20491 | trap 'as_fn_exit 1' 1 2 13 15 | 20555 | trap 'as_fn_exit 1' 1 2 13 15 |
| 20492 | } | 20556 | } |
| @@ -20494,13 +20558,12 @@ $debug || | |||
| 20494 | 20558 | ||
| 20495 | { | 20559 | { |
| 20496 | tmp=`(umask 077 && mktemp -d "./confXXXXXX") 2>/dev/null` && | 20560 | tmp=`(umask 077 && mktemp -d "./confXXXXXX") 2>/dev/null` && |
| 20497 | test -d "$tmp" | 20561 | test -n "$tmp" && test -d "$tmp" |
| 20498 | } || | 20562 | } || |
| 20499 | { | 20563 | { |
| 20500 | tmp=./conf$$-$RANDOM | 20564 | tmp=./conf$$-$RANDOM |
| 20501 | (umask 077 && mkdir "$tmp") | 20565 | (umask 077 && mkdir "$tmp") |
| 20502 | } || as_fn_error $? "cannot create a temporary directory in ." "$LINENO" 5 | 20566 | } || as_fn_error $? "cannot create a temporary directory in ." "$LINENO" 5 |
| 20503 | ac_tmp=$tmp | ||
| 20504 | 20567 | ||
| 20505 | # Set up the scripts for CONFIG_FILES section. | 20568 | # Set up the scripts for CONFIG_FILES section. |
| 20506 | # No need to generate them if there are no CONFIG_FILES. | 20569 | # No need to generate them if there are no CONFIG_FILES. |
| @@ -20539,13 +20602,13 @@ else | |||
| 20539 | ac_cs_awk_cr=$ac_cr | 20602 | ac_cs_awk_cr=$ac_cr |
| 20540 | fi | 20603 | fi |
| 20541 | 20604 | ||
| 20542 | echo 'BEGIN {' >"$ac_tmp/subs1.awk" && | 20605 | echo 'BEGIN {' >"$tmp/subs1.awk" && |
| 20543 | _ACEOF | 20606 | _ACEOF |
| 20544 | 20607 | ||
| 20545 | # Create commands to substitute file output variables. | 20608 | # Create commands to substitute file output variables. |
| 20546 | { | 20609 | { |
| 20547 | echo "cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1" && | 20610 | echo "cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1" && |
| 20548 | echo 'cat >>"\$ac_tmp/subs1.awk" <<\\_ACAWK &&' && | 20611 | echo 'cat >>"\$tmp/subs1.awk" <<\\_ACAWK &&' && |
| 20549 | echo "$ac_subst_files" | sed 's/.*/F["&"]="$&"/' && | 20612 | echo "$ac_subst_files" | sed 's/.*/F["&"]="$&"/' && |
| 20550 | echo "_ACAWK" && | 20613 | echo "_ACAWK" && |
| 20551 | echo "_ACEOF" | 20614 | echo "_ACEOF" |
| @@ -20578,7 +20641,7 @@ done | |||
| 20578 | rm -f conf$$subs.sh | 20641 | rm -f conf$$subs.sh |
| 20579 | 20642 | ||
| 20580 | cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 | 20643 | cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 |
| 20581 | cat >>"\$ac_tmp/subs1.awk" <<\\_ACAWK && | 20644 | cat >>"\$tmp/subs1.awk" <<\\_ACAWK && |
| 20582 | _ACEOF | 20645 | _ACEOF |
| 20583 | sed -n ' | 20646 | sed -n ' |
| 20584 | h | 20647 | h |
| @@ -20626,7 +20689,7 @@ t delim | |||
| 20626 | rm -f conf$$subs.awk | 20689 | rm -f conf$$subs.awk |
| 20627 | cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 | 20690 | cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 |
| 20628 | _ACAWK | 20691 | _ACAWK |
| 20629 | cat >>"\$ac_tmp/subs1.awk" <<_ACAWK && | 20692 | cat >>"\$tmp/subs1.awk" <<_ACAWK && |
| 20630 | for (key in S) S_is_set[key] = 1 | 20693 | for (key in S) S_is_set[key] = 1 |
| 20631 | FS = "" | 20694 | FS = "" |
| 20632 | \$ac_cs_awk_pipe_init | 20695 | \$ac_cs_awk_pipe_init |
| @@ -20664,7 +20727,7 @@ if sed "s/$ac_cr//" < /dev/null > /dev/null 2>&1; then | |||
| 20664 | sed "s/$ac_cr\$//; s/$ac_cr/$ac_cs_awk_cr/g" | 20727 | sed "s/$ac_cr\$//; s/$ac_cr/$ac_cs_awk_cr/g" |
| 20665 | else | 20728 | else |
| 20666 | cat | 20729 | cat |
| 20667 | fi < "$ac_tmp/subs1.awk" > "$ac_tmp/subs.awk" \ | 20730 | fi < "$tmp/subs1.awk" > "$tmp/subs.awk" \ |
| 20668 | || as_fn_error $? "could not setup config files machinery" "$LINENO" 5 | 20731 | || as_fn_error $? "could not setup config files machinery" "$LINENO" 5 |
| 20669 | _ACEOF | 20732 | _ACEOF |
| 20670 | 20733 | ||
| @@ -20698,7 +20761,7 @@ fi # test -n "$CONFIG_FILES" | |||
| 20698 | # No need to generate them if there are no CONFIG_HEADERS. | 20761 | # No need to generate them if there are no CONFIG_HEADERS. |
| 20699 | # This happens for instance with `./config.status Makefile'. | 20762 | # This happens for instance with `./config.status Makefile'. |
| 20700 | if test -n "$CONFIG_HEADERS"; then | 20763 | if test -n "$CONFIG_HEADERS"; then |
| 20701 | cat >"$ac_tmp/defines.awk" <<\_ACAWK || | 20764 | cat >"$tmp/defines.awk" <<\_ACAWK || |
| 20702 | BEGIN { | 20765 | BEGIN { |
| 20703 | _ACEOF | 20766 | _ACEOF |
| 20704 | 20767 | ||
| @@ -20710,8 +20773,8 @@ _ACEOF | |||
| 20710 | # handling of long lines. | 20773 | # handling of long lines. |
| 20711 | ac_delim='%!_!# ' | 20774 | ac_delim='%!_!# ' |
| 20712 | for ac_last_try in false false :; do | 20775 | for ac_last_try in false false :; do |
| 20713 | ac_tt=`sed -n "/$ac_delim/p" confdefs.h` | 20776 | ac_t=`sed -n "/$ac_delim/p" confdefs.h` |
| 20714 | if test -z "$ac_tt"; then | 20777 | if test -z "$ac_t"; then |
| 20715 | break | 20778 | break |
| 20716 | elif $ac_last_try; then | 20779 | elif $ac_last_try; then |
| 20717 | as_fn_error $? "could not make $CONFIG_HEADERS" "$LINENO" 5 | 20780 | as_fn_error $? "could not make $CONFIG_HEADERS" "$LINENO" 5 |
| @@ -20812,7 +20875,7 @@ do | |||
| 20812 | esac | 20875 | esac |
| 20813 | case $ac_mode$ac_tag in | 20876 | case $ac_mode$ac_tag in |
| 20814 | :[FHL]*:*);; | 20877 | :[FHL]*:*);; |
| 20815 | :L* | :C*:*) as_fn_error $? "invalid tag \`$ac_tag'" "$LINENO" 5;; | 20878 | :L* | :C*:*) as_fn_error $? "invalid tag \`$ac_tag'" "$LINENO" 5 ;; |
| 20816 | :[FH]-) ac_tag=-:-;; | 20879 | :[FH]-) ac_tag=-:-;; |
| 20817 | :[FH]*) ac_tag=$ac_tag:$ac_tag.in;; | 20880 | :[FH]*) ac_tag=$ac_tag:$ac_tag.in;; |
| 20818 | esac | 20881 | esac |
| @@ -20831,7 +20894,7 @@ do | |||
| 20831 | for ac_f | 20894 | for ac_f |
| 20832 | do | 20895 | do |
| 20833 | case $ac_f in | 20896 | case $ac_f in |
| 20834 | -) ac_f="$ac_tmp/stdin";; | 20897 | -) ac_f="$tmp/stdin";; |
| 20835 | *) # Look for the file first in the build tree, then in the source tree | 20898 | *) # Look for the file first in the build tree, then in the source tree |
| 20836 | # (if the path is not absolute). The absolute path cannot be DOS-style, | 20899 | # (if the path is not absolute). The absolute path cannot be DOS-style, |
| 20837 | # because $ac_f cannot contain `:'. | 20900 | # because $ac_f cannot contain `:'. |
| @@ -20840,7 +20903,7 @@ do | |||
| 20840 | [\\/$]*) false;; | 20903 | [\\/$]*) false;; |
| 20841 | *) test -f "$srcdir/$ac_f" && ac_f="$srcdir/$ac_f";; | 20904 | *) test -f "$srcdir/$ac_f" && ac_f="$srcdir/$ac_f";; |
| 20842 | esac || | 20905 | esac || |
| 20843 | as_fn_error 1 "cannot find input file: \`$ac_f'" "$LINENO" 5;; | 20906 | as_fn_error 1 "cannot find input file: \`$ac_f'" "$LINENO" 5 ;; |
| 20844 | esac | 20907 | esac |
| 20845 | case $ac_f in *\'*) ac_f=`$as_echo "$ac_f" | sed "s/'/'\\\\\\\\''/g"`;; esac | 20908 | case $ac_f in *\'*) ac_f=`$as_echo "$ac_f" | sed "s/'/'\\\\\\\\''/g"`;; esac |
| 20846 | as_fn_append ac_file_inputs " '$ac_f'" | 20909 | as_fn_append ac_file_inputs " '$ac_f'" |
| @@ -20866,8 +20929,8 @@ $as_echo "$as_me: creating $ac_file" >&6;} | |||
| 20866 | esac | 20929 | esac |
| 20867 | 20930 | ||
| 20868 | case $ac_tag in | 20931 | case $ac_tag in |
| 20869 | *:-:* | *:-) cat >"$ac_tmp/stdin" \ | 20932 | *:-:* | *:-) cat >"$tmp/stdin" \ |
| 20870 | || as_fn_error $? "could not create $ac_file" "$LINENO" 5 ;; | 20933 | || as_fn_error $? "could not create $ac_file" "$LINENO" 5 ;; |
| 20871 | esac | 20934 | esac |
| 20872 | ;; | 20935 | ;; |
| 20873 | esac | 20936 | esac |
| @@ -21005,25 +21068,24 @@ $ac_datarootdir_hack | |||
| 21005 | " | 21068 | " |
| 21006 | eval sed \"\$ac_sed_extra\" "$ac_file_inputs" | | 21069 | eval sed \"\$ac_sed_extra\" "$ac_file_inputs" | |
| 21007 | if $ac_cs_awk_getline; then | 21070 | if $ac_cs_awk_getline; then |
| 21008 | $AWK -f "$ac_tmp/subs.awk" | 21071 | $AWK -f "$tmp/subs.awk" |
| 21009 | else | 21072 | else |
| 21010 | $AWK -f "$ac_tmp/subs.awk" | $SHELL | 21073 | $AWK -f "$tmp/subs.awk" | $SHELL |
| 21011 | fi \ | 21074 | fi >$tmp/out \ |
| 21012 | >$ac_tmp/out || as_fn_error $? "could not create $ac_file" "$LINENO" 5 | 21075 | || as_fn_error $? "could not create $ac_file" "$LINENO" 5 |
| 21013 | 21076 | ||
| 21014 | test -z "$ac_datarootdir_hack$ac_datarootdir_seen" && | 21077 | test -z "$ac_datarootdir_hack$ac_datarootdir_seen" && |
| 21015 | { ac_out=`sed -n '/\${datarootdir}/p' "$ac_tmp/out"`; test -n "$ac_out"; } && | 21078 | { ac_out=`sed -n '/\${datarootdir}/p' "$tmp/out"`; test -n "$ac_out"; } && |
| 21016 | { ac_out=`sed -n '/^[ ]*datarootdir[ ]*:*=/p' \ | 21079 | { ac_out=`sed -n '/^[ ]*datarootdir[ ]*:*=/p' "$tmp/out"`; test -z "$ac_out"; } && |
| 21017 | "$ac_tmp/out"`; test -z "$ac_out"; } && | ||
| 21018 | { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $ac_file contains a reference to the variable \`datarootdir' | 21080 | { $as_echo "$as_me:${as_lineno-$LINENO}: WARNING: $ac_file contains a reference to the variable \`datarootdir' |
| 21019 | which seems to be undefined. Please make sure it is defined" >&5 | 21081 | which seems to be undefined. Please make sure it is defined" >&5 |
| 21020 | $as_echo "$as_me: WARNING: $ac_file contains a reference to the variable \`datarootdir' | 21082 | $as_echo "$as_me: WARNING: $ac_file contains a reference to the variable \`datarootdir' |
| 21021 | which seems to be undefined. Please make sure it is defined" >&2;} | 21083 | which seems to be undefined. Please make sure it is defined" >&2;} |
| 21022 | 21084 | ||
| 21023 | rm -f "$ac_tmp/stdin" | 21085 | rm -f "$tmp/stdin" |
| 21024 | case $ac_file in | 21086 | case $ac_file in |
| 21025 | -) cat "$ac_tmp/out" && rm -f "$ac_tmp/out";; | 21087 | -) cat "$tmp/out" && rm -f "$tmp/out";; |
| 21026 | *) rm -f "$ac_file" && mv "$ac_tmp/out" "$ac_file";; | 21088 | *) rm -f "$ac_file" && mv "$tmp/out" "$ac_file";; |
| 21027 | esac \ | 21089 | esac \ |
| 21028 | || as_fn_error $? "could not create $ac_file" "$LINENO" 5 | 21090 | || as_fn_error $? "could not create $ac_file" "$LINENO" 5 |
| 21029 | ;; | 21091 | ;; |
| @@ -21034,20 +21096,20 @@ which seems to be undefined. Please make sure it is defined" >&2;} | |||
| 21034 | if test x"$ac_file" != x-; then | 21096 | if test x"$ac_file" != x-; then |
| 21035 | { | 21097 | { |
| 21036 | $as_echo "/* $configure_input */" \ | 21098 | $as_echo "/* $configure_input */" \ |
| 21037 | && eval '$AWK -f "$ac_tmp/defines.awk"' "$ac_file_inputs" | 21099 | && eval '$AWK -f "$tmp/defines.awk"' "$ac_file_inputs" |
| 21038 | } >"$ac_tmp/config.h" \ | 21100 | } >"$tmp/config.h" \ |
| 21039 | || as_fn_error $? "could not create $ac_file" "$LINENO" 5 | 21101 | || as_fn_error $? "could not create $ac_file" "$LINENO" 5 |
| 21040 | if diff "$ac_file" "$ac_tmp/config.h" >/dev/null 2>&1; then | 21102 | if diff "$ac_file" "$tmp/config.h" >/dev/null 2>&1; then |
| 21041 | { $as_echo "$as_me:${as_lineno-$LINENO}: $ac_file is unchanged" >&5 | 21103 | { $as_echo "$as_me:${as_lineno-$LINENO}: $ac_file is unchanged" >&5 |
| 21042 | $as_echo "$as_me: $ac_file is unchanged" >&6;} | 21104 | $as_echo "$as_me: $ac_file is unchanged" >&6;} |
| 21043 | else | 21105 | else |
| 21044 | rm -f "$ac_file" | 21106 | rm -f "$ac_file" |
| 21045 | mv "$ac_tmp/config.h" "$ac_file" \ | 21107 | mv "$tmp/config.h" "$ac_file" \ |
| 21046 | || as_fn_error $? "could not create $ac_file" "$LINENO" 5 | 21108 | || as_fn_error $? "could not create $ac_file" "$LINENO" 5 |
| 21047 | fi | 21109 | fi |
| 21048 | else | 21110 | else |
| 21049 | $as_echo "/* $configure_input */" \ | 21111 | $as_echo "/* $configure_input */" \ |
| 21050 | && eval '$AWK -f "$ac_tmp/defines.awk"' "$ac_file_inputs" \ | 21112 | && eval '$AWK -f "$tmp/defines.awk"' "$ac_file_inputs" \ |
| 21051 | || as_fn_error $? "could not create -" "$LINENO" 5 | 21113 | || as_fn_error $? "could not create -" "$LINENO" 5 |
| 21052 | fi | 21114 | fi |
| 21053 | # Compute "$ac_file"'s index in $config_headers. | 21115 | # Compute "$ac_file"'s index in $config_headers. |
diff --git a/configure.in b/configure.in index 710f0945066..69d1a1e5bd3 100644 --- a/configure.in +++ b/configure.in | |||
| @@ -162,7 +162,7 @@ OPTION_DEFAULT_ON([m17n-flt],[don't use m17n-flt for text shaping]) | |||
| 162 | OPTION_DEFAULT_ON([toolkit-scroll-bars],[don't use Motif or Xaw3d scroll bars]) | 162 | OPTION_DEFAULT_ON([toolkit-scroll-bars],[don't use Motif or Xaw3d scroll bars]) |
| 163 | OPTION_DEFAULT_ON([xaw3d],[don't use Xaw3d]) | 163 | OPTION_DEFAULT_ON([xaw3d],[don't use Xaw3d]) |
| 164 | OPTION_DEFAULT_ON([xim],[don't use X11 XIM]) | 164 | OPTION_DEFAULT_ON([xim],[don't use X11 XIM]) |
| 165 | OPTION_DEFAULT_OFF([ns],[use nextstep (Cocoa or GNUstep) windowing system]) | 165 | OPTION_DEFAULT_OFF([ns],[use NeXTstep (Cocoa or GNUstep) windowing system]) |
| 166 | 166 | ||
| 167 | OPTION_DEFAULT_ON([gpm],[don't use -lgpm for mouse support on a GNU/Linux console]) | 167 | OPTION_DEFAULT_ON([gpm],[don't use -lgpm for mouse support on a GNU/Linux console]) |
| 168 | OPTION_DEFAULT_ON([dbus],[don't compile with D-Bus support]) | 168 | OPTION_DEFAULT_ON([dbus],[don't compile with D-Bus support]) |
| @@ -2244,15 +2244,23 @@ if test "${HAVE_X11}" = "yes"; then | |||
| 2244 | fi # "$HAVE_XFT" != no | 2244 | fi # "$HAVE_XFT" != no |
| 2245 | fi # "x${with_xft}" != "xno" | 2245 | fi # "x${with_xft}" != "xno" |
| 2246 | 2246 | ||
| 2247 | dnl For the "Does Emacs use" message at the end. | 2247 | ## We used to allow building with FreeType and without Xft. |
| 2248 | ## However, the ftx font backend driver is not in good shape. | ||
| 2248 | if test "$HAVE_XFT" != "yes"; then | 2249 | if test "$HAVE_XFT" != "yes"; then |
| 2250 | dnl For the "Does Emacs use" message at the end. | ||
| 2249 | HAVE_XFT=no | 2251 | HAVE_XFT=no |
| 2252 | HAVE_FREETYPE=no | ||
| 2253 | else | ||
| 2254 | dnl Strict linkers fail with | ||
| 2255 | dnl ftfont.o: undefined reference to symbol 'FT_New_Face' | ||
| 2256 | dnl if -lfreetype is not specified. | ||
| 2257 | dnl The following is needed to set FREETYPE_LIBS. | ||
| 2258 | PKG_CHECK_MODULES(FREETYPE, freetype2, HAVE_FREETYPE=yes, | ||
| 2259 | HAVE_FREETYPE=no) | ||
| 2260 | |||
| 2261 | test "$HAVE_FREETYPE" = "no" && AC_MSG_ERROR(libxft requires libfreetype) | ||
| 2250 | fi | 2262 | fi |
| 2251 | 2263 | ||
| 2252 | ## We used to allow building with FreeType and without Xft. | ||
| 2253 | ## However, the ftx font backend driver is not in good shape. | ||
| 2254 | HAVE_FREETYPE=$HAVE_XFT | ||
| 2255 | |||
| 2256 | HAVE_LIBOTF=no | 2264 | HAVE_LIBOTF=no |
| 2257 | if test "${HAVE_FREETYPE}" = "yes"; then | 2265 | if test "${HAVE_FREETYPE}" = "yes"; then |
| 2258 | AC_DEFINE(HAVE_FREETYPE, 1, | 2266 | AC_DEFINE(HAVE_FREETYPE, 1, |
diff --git a/doc/emacs/ChangeLog b/doc/emacs/ChangeLog index 8438fa4952c..dc43450110f 100644 --- a/doc/emacs/ChangeLog +++ b/doc/emacs/ChangeLog | |||
| @@ -1,3 +1,12 @@ | |||
| 1 | 2011-03-03 Drake Wilson <drake@begriffli.ch> (tiny change) | ||
| 2 | |||
| 3 | * misc.texi (emacsclient Options): Add q/quiet. | ||
| 4 | |||
| 5 | 2011-03-02 Glenn Morris <rgm@gnu.org> | ||
| 6 | |||
| 7 | * mule.texi (Communication Coding) <x-select-request-type>: | ||
| 8 | Remove duplicate (essentially) paragraph. (Bug#8148) | ||
| 9 | |||
| 1 | 2011-03-01 Christoph Scholtes <cschol2112@googlemail.com> | 10 | 2011-03-01 Christoph Scholtes <cschol2112@googlemail.com> |
| 2 | 11 | ||
| 3 | * maintaining.texi (Format of ChangeLog): Add reference to | 12 | * maintaining.texi (Format of ChangeLog): Add reference to |
diff --git a/doc/emacs/misc.texi b/doc/emacs/misc.texi index d7143d1498a..1299895a06e 100644 --- a/doc/emacs/misc.texi +++ b/doc/emacs/misc.texi | |||
| @@ -1672,6 +1672,11 @@ all server buffers are finished. You can take as long as you like to | |||
| 1672 | edit the server buffers within Emacs, and they are @emph{not} killed | 1672 | edit the server buffers within Emacs, and they are @emph{not} killed |
| 1673 | when you type @kbd{C-x #} in them. | 1673 | when you type @kbd{C-x #} in them. |
| 1674 | 1674 | ||
| 1675 | @item -q | ||
| 1676 | @itemx --quiet | ||
| 1677 | Do not let @command{emacsclient} display messages about waiting for | ||
| 1678 | Emacs or connecting to remote server sockets. | ||
| 1679 | |||
| 1675 | @item -s @var{server-name} | 1680 | @item -s @var{server-name} |
| 1676 | @itemx --socket-name=@var{server-name} | 1681 | @itemx --socket-name=@var{server-name} |
| 1677 | Connect to the Emacs server named @var{server-name}. The server name | 1682 | Connect to the Emacs server named @var{server-name}. The server name |
diff --git a/doc/emacs/mule.texi b/doc/emacs/mule.texi index f0facec86c1..22c155d26de 100644 --- a/doc/emacs/mule.texi +++ b/doc/emacs/mule.texi | |||
| @@ -1153,15 +1153,6 @@ specified by one of the environment variables @env{LC_ALL}, | |||
| 1153 | specified above, whose value is nonempty is the one that determines | 1153 | specified above, whose value is nonempty is the one that determines |
| 1154 | the text representation.) | 1154 | the text representation.) |
| 1155 | 1155 | ||
| 1156 | @vindex x-select-request-type | ||
| 1157 | The variable @code{x-select-request-type} specifies a selection data | ||
| 1158 | type of selection to request from the X server. The default value is | ||
| 1159 | @code{nil}, which means Emacs tries @code{COMPOUND_TEXT} and | ||
| 1160 | @code{UTF8_STRING}, and uses whichever result seems more appropriate. | ||
| 1161 | You can explicitly specify the data type by setting the variable to | ||
| 1162 | one of the symbols @code{COMPOUND_TEXT}, @code{UTF8_STRING}, | ||
| 1163 | @code{STRING} and @code{TEXT}. | ||
| 1164 | |||
| 1165 | @node File Name Coding | 1156 | @node File Name Coding |
| 1166 | @section Coding Systems for File Names | 1157 | @section Coding Systems for File Names |
| 1167 | 1158 | ||
diff --git a/doc/lispref/ChangeLog b/doc/lispref/ChangeLog index 1a980f14f3d..7bb1919b837 100644 --- a/doc/lispref/ChangeLog +++ b/doc/lispref/ChangeLog | |||
| @@ -1,3 +1,16 @@ | |||
| 1 | 2011-03-06 Chong Yidong <cyd@stupidchicken.com> | ||
| 2 | |||
| 3 | * Makefile.in (srcs): Add package.texi. | ||
| 4 | |||
| 5 | 2011-03-05 Chong Yidong <cyd@stupidchicken.com> | ||
| 6 | |||
| 7 | * processes.texi (Synchronous Processes): Minor clarification | ||
| 8 | (Bug#8149). | ||
| 9 | |||
| 10 | 2011-03-03 Glenn Morris <rgm@gnu.org> | ||
| 11 | |||
| 12 | * files.texi (Truenames): Minor clarification. (Bug#2341) | ||
| 13 | |||
| 1 | 2011-03-01 Glenn Morris <rgm@gnu.org> | 14 | 2011-03-01 Glenn Morris <rgm@gnu.org> |
| 2 | 15 | ||
| 3 | * variables.texi (Directory Local Variables): | 16 | * variables.texi (Directory Local Variables): |
diff --git a/doc/lispref/Makefile.in b/doc/lispref/Makefile.in index a9664a4e197..d5427f6e477 100644 --- a/doc/lispref/Makefile.in +++ b/doc/lispref/Makefile.in | |||
| @@ -80,6 +80,7 @@ srcs = \ | |||
| 80 | $(srcdir)/numbers.texi \ | 80 | $(srcdir)/numbers.texi \ |
| 81 | $(srcdir)/objects.texi \ | 81 | $(srcdir)/objects.texi \ |
| 82 | $(srcdir)/os.texi \ | 82 | $(srcdir)/os.texi \ |
| 83 | $(srcdir)/package.texi \ | ||
| 83 | $(srcdir)/positions.texi \ | 84 | $(srcdir)/positions.texi \ |
| 84 | $(srcdir)/processes.texi \ | 85 | $(srcdir)/processes.texi \ |
| 85 | $(srcdir)/searching.texi \ | 86 | $(srcdir)/searching.texi \ |
diff --git a/doc/lispref/files.texi b/doc/lispref/files.texi index 3697f18badd..e3bdebd28a1 100644 --- a/doc/lispref/files.texi +++ b/doc/lispref/files.texi | |||
| @@ -1041,7 +1041,8 @@ because they eliminate symbolic links as a cause of name variation. | |||
| 1041 | 1041 | ||
| 1042 | @defun file-truename filename | 1042 | @defun file-truename filename |
| 1043 | The function @code{file-truename} returns the truename of the file | 1043 | The function @code{file-truename} returns the truename of the file |
| 1044 | @var{filename}. The argument must be an absolute file name. | 1044 | @var{filename}. If the argument is not an absolute file name, |
| 1045 | this function first expands it against @code{default-directory}. | ||
| 1045 | 1046 | ||
| 1046 | This function does not expand environment variables. Only | 1047 | This function does not expand environment variables. Only |
| 1047 | @code{substitute-in-file-name} does that. @xref{Definition of | 1048 | @code{substitute-in-file-name} does that. @xref{Definition of |
diff --git a/doc/lispref/processes.texi b/doc/lispref/processes.texi index 8a8de0e7fa8..dc9fed58076 100644 --- a/doc/lispref/processes.texi +++ b/doc/lispref/processes.texi | |||
| @@ -266,10 +266,9 @@ subprocess by @code{call-process-region} is encoded using a coding | |||
| 266 | system, much like text written into a file. @xref{Coding Systems}. | 266 | system, much like text written into a file. @xref{Coding Systems}. |
| 267 | 267 | ||
| 268 | @defun call-process program &optional infile destination display &rest args | 268 | @defun call-process program &optional infile destination display &rest args |
| 269 | This function calls @var{program} in a separate process and waits for | 269 | This function calls @var{program} and waits for it to finish. |
| 270 | it to finish. | ||
| 271 | 270 | ||
| 272 | The standard input for the process comes from file @var{infile} if | 271 | The standard input for the new process comes from file @var{infile} if |
| 273 | @var{infile} is not @code{nil}, and from the null device otherwise. | 272 | @var{infile} is not @code{nil}, and from the null device otherwise. |
| 274 | The argument @var{destination} says where to put the process output. | 273 | The argument @var{destination} says where to put the process output. |
| 275 | Here are the possibilities: | 274 | Here are the possibilities: |
| @@ -488,10 +487,10 @@ inputinput@point{} | |||
| 488 | @end defun | 487 | @end defun |
| 489 | 488 | ||
| 490 | @defun call-process-shell-command command &optional infile destination display &rest args | 489 | @defun call-process-shell-command command &optional infile destination display &rest args |
| 491 | This function executes the shell command @var{command} synchronously | 490 | This function executes the shell command @var{command} synchronously. |
| 492 | in a separate process. The final arguments @var{args} are additional | 491 | The final arguments @var{args} are additional arguments to add at the |
| 493 | arguments to add at the end of @var{command}. The other arguments | 492 | end of @var{command}. The other arguments are handled as in |
| 494 | are handled as in @code{call-process}. | 493 | @code{call-process}. |
| 495 | @end defun | 494 | @end defun |
| 496 | 495 | ||
| 497 | @defun process-file-shell-command command &optional infile destination display &rest args | 496 | @defun process-file-shell-command command &optional infile destination display &rest args |
| @@ -506,12 +505,12 @@ then returns the command's output as a string. | |||
| 506 | @end defun | 505 | @end defun |
| 507 | 506 | ||
| 508 | @defun process-lines program &rest args | 507 | @defun process-lines program &rest args |
| 509 | This function runs @var{program} in a separate process, waits for it | 508 | This function runs @var{program}, waits for it to finish, and returns |
| 510 | to finish, and returns its output as a list of strings. Each string | 509 | its output as a list of strings. Each string in the list holds a |
| 511 | in the list holds a single line of text output by the program; the | 510 | single line of text output by the program; the end-of-line characters |
| 512 | end-of-line characters are stripped from each line. The arguments | 511 | are stripped from each line. The arguments beyond @var{program}, |
| 513 | beyond @var{program}, @var{args}, are strings that specify | 512 | @var{args}, are strings that specify command-line arguments with which |
| 514 | command-line arguments with which to run the program. | 513 | to run the program. |
| 515 | 514 | ||
| 516 | If @var{program} exits with a non-zero exit status, this function | 515 | If @var{program} exits with a non-zero exit status, this function |
| 517 | signals an error. | 516 | signals an error. |
diff --git a/doc/misc/ChangeLog b/doc/misc/ChangeLog index b50dafb62ee..2c5f998737a 100644 --- a/doc/misc/ChangeLog +++ b/doc/misc/ChangeLog | |||
| @@ -1,3 +1,25 @@ | |||
| 1 | 2011-03-06 Jay Belanger <jay.p.belanger@gmail.com> | ||
| 2 | |||
| 3 | * calc.texi (Logarithmic Units): Rename calc-logunits-dblevel | ||
| 4 | and calc-logunits-nplevel to calc-dblevel and calc-nplevel, | ||
| 5 | respectively. | ||
| 6 | (Musical Notes): New section. | ||
| 7 | (Customizing Calc): Mention the customizable variable | ||
| 8 | calc-note-threshold. | ||
| 9 | |||
| 10 | 2011-03-03 Glenn Morris <rgm@gnu.org> | ||
| 11 | |||
| 12 | * url.texi (Dealing with HTTP documents): Remove reference to | ||
| 13 | function url-decode-text-part; never seems to have existed. (Bug#6038) | ||
| 14 | (Configuration): Update url-configuration-directory description. | ||
| 15 | |||
| 16 | 2011-03-02 Glenn Morris <rgm@gnu.org> | ||
| 17 | |||
| 18 | * dired-x.texi (Multiple Dired Directories): Remove mentions | ||
| 19 | of dired-default-directory-alist and dired-default-directory. | ||
| 20 | Move dired-smart-shell-command here... | ||
| 21 | (Miscellaneous Commands): ... from here. | ||
| 22 | |||
| 1 | 2011-03-02 Paul Eggert <eggert@cs.ucla.edu> | 23 | 2011-03-02 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 24 | ||
| 3 | * texinfo.tex: Update to version 2011-02-24.09. | 25 | * texinfo.tex: Update to version 2011-02-24.09. |
diff --git a/doc/misc/calc.texi b/doc/misc/calc.texi index b9d4f8c4a23..88103fc0034 100644 --- a/doc/misc/calc.texi +++ b/doc/misc/calc.texi | |||
| @@ -27676,6 +27676,7 @@ begin with the @kbd{u} prefix key. | |||
| 27676 | * Predefined Units:: | 27676 | * Predefined Units:: |
| 27677 | * User-Defined Units:: | 27677 | * User-Defined Units:: |
| 27678 | * Logarithmic Units:: | 27678 | * Logarithmic Units:: |
| 27679 | * Musical Notes:: | ||
| 27679 | @end menu | 27680 | @end menu |
| 27680 | 27681 | ||
| 27681 | @node Basic Operations on Units, The Units Table, Units, Units | 27682 | @node Basic Operations on Units, The Units Table, Units, Units |
| @@ -28121,7 +28122,7 @@ was already a set of user-defined units in your Calc init file, it | |||
| 28121 | is replaced by the new set. (@xref{General Mode Commands}, for a way to | 28122 | is replaced by the new set. (@xref{General Mode Commands}, for a way to |
| 28122 | tell Calc to use a different file for the Calc init file.) | 28123 | tell Calc to use a different file for the Calc init file.) |
| 28123 | 28124 | ||
| 28124 | @node Logarithmic Units, , User-Defined Units, Units | 28125 | @node Logarithmic Units, Musical Notes, User-Defined Units, Units |
| 28125 | @section Logarithmic Units | 28126 | @section Logarithmic Units |
| 28126 | 28127 | ||
| 28127 | The units @code{dB} (decibels) and @code{Np} (nepers) are logarithmic | 28128 | The units @code{dB} (decibels) and @code{Np} (nepers) are logarithmic |
| @@ -28251,18 +28252,18 @@ The @kbd{H l q} [@code{fieldquant}] command behaves like @kbd{l q} but | |||
| 28251 | computes field quantities instead of power quantities. | 28252 | computes field quantities instead of power quantities. |
| 28252 | 28253 | ||
| 28253 | @kindex l d | 28254 | @kindex l d |
| 28254 | @pindex calc-logunits-dblevel | 28255 | @pindex calc-dblevel |
| 28255 | @tindex dbpowerlevel | 28256 | @tindex dbpowerlevel |
| 28256 | @tindex dbfieldlevel | 28257 | @tindex dbfieldlevel |
| 28257 | @kindex l n | 28258 | @kindex l n |
| 28258 | @pindex calc-logunits-nplevel | 28259 | @pindex calc-nplevel |
| 28259 | @tindex nppowerlevel | 28260 | @tindex nppowerlevel |
| 28260 | @tindex npfieldlevel | 28261 | @tindex npfieldlevel |
| 28261 | The @kbd{l d} (@code{calc-logunits-dblevel}) [@code{dbpowerlevel}] | 28262 | The @kbd{l d} (@code{calc-dblevel}) [@code{dbpowerlevel}] |
| 28262 | command will compute the decibel level of a power quantity using the | 28263 | command will compute the decibel level of a power quantity using the |
| 28263 | default reference level; @kbd{H l d} [@code{dbfieldlevel}] will | 28264 | default reference level; @kbd{H l d} [@code{dbfieldlevel}] will |
| 28264 | compute the decibel level of a field quantity. The commands @kbd{l n} | 28265 | compute the decibel level of a field quantity. The commands @kbd{l n} |
| 28265 | (@code{calc-logunits-nplevel}) [@code{nppowerlevel}] and @kbd{H l n} | 28266 | (@code{calc-nplevel}) [@code{nppowerlevel}] and @kbd{H l n} |
| 28266 | [@code{npfieldlevel}] will similarly compute neper levels. With the | 28267 | [@code{npfieldlevel}] will similarly compute neper levels. With the |
| 28267 | capital @kbd{O} prefix these commands will read a reference level | 28268 | capital @kbd{O} prefix these commands will read a reference level |
| 28268 | from the stack; in an algebraic formula the reference level can be | 28269 | from the stack; in an algebraic formula the reference level can be |
| @@ -28363,6 +28364,76 @@ a logarithmic unit by a number; the @kbd{l /} | |||
| 28363 | logarithmic unit by a number. Note that the reference quantities don't | 28364 | logarithmic unit by a number. Note that the reference quantities don't |
| 28364 | play a role in this arithmetic. | 28365 | play a role in this arithmetic. |
| 28365 | 28366 | ||
| 28367 | @node Musical Notes, , Logarithmic Units, Units | ||
| 28368 | @section Musical Notes | ||
| 28369 | |||
| 28370 | Calc can convert between musical notes and their associated | ||
| 28371 | frequencies. Notes can be given using either scientific pitch | ||
| 28372 | notation or midi numbers. Since these note systems are basically | ||
| 28373 | logarithmic scales, Calc uses the @kbd{l} prefix for functions | ||
| 28374 | operating on notes. | ||
| 28375 | |||
| 28376 | Scientific pitch notation refers to a note by giving a letter | ||
| 28377 | A through G, possibly followed by a flat or sharp) with a subscript | ||
| 28378 | indicating an octave number. Each octave starts with C and ends with | ||
| 28379 | B and | ||
| 28380 | @c increasing each note by a semitone will result | ||
| 28381 | @c in the sequence @expr{C}, @expr{C} sharp, @expr{D}, @expr{E} flat, @expr{E}, | ||
| 28382 | @c @expr{F}, @expr{F} sharp, @expr{G}, @expr{A} flat, @expr{A}, @expr{B} | ||
| 28383 | @c flat and @expr{B}. | ||
| 28384 | the octave numbered 0 was chosen to correspond to the lowest | ||
| 28385 | audible frequency. Using this system, middle C (about 261.625 Hz) | ||
| 28386 | corresponds to the note @expr{C} in octave 4 and is denoted | ||
| 28387 | @expr{C_4}. Any frequency can be described by giving a note plus an | ||
| 28388 | offset in cents (where a cent is a ratio of frequencies so that a | ||
| 28389 | semitone consists of 100 cents). | ||
| 28390 | |||
| 28391 | The midi note number system assigns numbers to notes so that | ||
| 28392 | @expr{C_(-1)} corresponds to the midi note number 0 and @expr{G_9} | ||
| 28393 | corresponds to the midi note number 127. A midi controller can have | ||
| 28394 | up to 128 keys and each midi note number from 0 to 127 corresponds to | ||
| 28395 | a possible key. | ||
| 28396 | |||
| 28397 | @kindex l s | ||
| 28398 | @pindex calc-spn | ||
| 28399 | @tindex spn | ||
| 28400 | The @kbd{l s} (@code{calc-spn}) [@code{spn}] command converts either | ||
| 28401 | a frequency or a midi number to scientific pitch notation. For | ||
| 28402 | example, @code{500 Hz} gets converted to | ||
| 28403 | @code{B_4 + 21.3094853649 cents} and @code{84} to @code{C_6}. | ||
| 28404 | |||
| 28405 | |||
| 28406 | @kindex l m | ||
| 28407 | @pindex calc-midi | ||
| 28408 | @tindex midi | ||
| 28409 | The @kbd{l m} (@code{calc-midi}) [@code{midi}] command converts either | ||
| 28410 | a frequency or a note given in scientific pitch notation to the | ||
| 28411 | corresponding midi number. For example, @code{C_6} gets converted to 84 | ||
| 28412 | and @code{440 Hz} to 69. | ||
| 28413 | |||
| 28414 | @kindex l f | ||
| 28415 | @pindex calc-freq | ||
| 28416 | @tindex freq | ||
| 28417 | The @kbd{l f} (@code{calc-freq}) [@code{freq}] command converts either | ||
| 28418 | either a midi number or a note given in scientific pitch notation to | ||
| 28419 | the corresponding frequency. For example, @code{Asharp_2 + 30 cents} | ||
| 28420 | gets converted to @code{118.578040134 Hz} and @code{55} to | ||
| 28421 | @code{195.99771799 Hz}. | ||
| 28422 | |||
| 28423 | Since the frequencies of notes are not usually given exactly (and are | ||
| 28424 | typically irrational), the customizable variable | ||
| 28425 | @code{calc-note-threshold} determines how close (in cents) a frequency | ||
| 28426 | needs to be to a note to be recognized as that note | ||
| 28427 | (@pxref{Customizing Calc}). This variable has a default value of | ||
| 28428 | @code{1}. For example, middle @var{C} is approximately | ||
| 28429 | @expr{261.625565302 Hz}; this frequency is often shortened to | ||
| 28430 | @expr{261.625 Hz}. Without @code{calc-note-threshold} (or a value of | ||
| 28431 | @expr{0}), Calc would convert @code{261.625 Hz} to scientific pitch | ||
| 28432 | notation @code{B_3 + 99.9962592773 cents}; with the default value of | ||
| 28433 | @code{1}, Calc converts @code{261.625 Hz} to @code{C_4}. | ||
| 28434 | |||
| 28435 | |||
| 28436 | |||
| 28366 | @node Store and Recall, Graphics, Units, Top | 28437 | @node Store and Recall, Graphics, Units, Top |
| 28367 | @chapter Storing and Recalling | 28438 | @chapter Storing and Recalling |
| 28368 | 28439 | ||
| @@ -35481,6 +35552,15 @@ and the default value of @code{calc-logunits-field-reference} is | |||
| 35481 | @code{"20 uPa"}. | 35552 | @code{"20 uPa"}. |
| 35482 | @end defvar | 35553 | @end defvar |
| 35483 | 35554 | ||
| 35555 | @defvar calc-note-threshold | ||
| 35556 | See @ref{Musical Notes}.@* | ||
| 35557 | The variable @code{calc-note-threshold} is a number (written as a | ||
| 35558 | string) which determines how close (in cents) a frequency needs to be | ||
| 35559 | to a note to be recognized as that note. | ||
| 35560 | |||
| 35561 | The default value of @code{calc-note-threshold} is 1. | ||
| 35562 | @end defvar | ||
| 35563 | |||
| 35484 | @defvar calc-highlight-selections-with-faces | 35564 | @defvar calc-highlight-selections-with-faces |
| 35485 | @defvarx calc-selected-face | 35565 | @defvarx calc-selected-face |
| 35486 | @defvarx calc-nonselected-face | 35566 | @defvarx calc-nonselected-face |
| @@ -36129,26 +36209,29 @@ keystrokes are not listed in this summary. | |||
| 36129 | @r{ v x@: I k T @: @: @:ltpt@:(x,v)} | 36209 | @r{ v x@: I k T @: @: @:ltpt@:(x,v)} |
| 36130 | 36210 | ||
| 36131 | @c | 36211 | @c |
| 36132 | @r{ a b@: l + @: @: 2 @:lupoweradd@:(a,b)} | 36212 | @r{ a b@: l + @: @: @:lupoweradd@:(a,b)} |
| 36133 | @r{ a b@: H l + @: @: 2 @:lufieldadd@:(a,b)} | 36213 | @r{ a b@: H l + @: @: @:lufieldadd@:(a,b)} |
| 36134 | @r{ a b@: l - @: @: 2 @:lupowersub@:(a,b)} | 36214 | @r{ a b@: l - @: @: @:lupowersub@:(a,b)} |
| 36135 | @r{ a b@: H l - @: @: 2 @:lufieldsub@:(a,b)} | 36215 | @r{ a b@: H l - @: @: @:lufieldsub@:(a,b)} |
| 36136 | @r{ a b@: l * @: @: 2 @:lupowermul@:(a,b)} | 36216 | @r{ a b@: l * @: @: @:lupowermul@:(a,b)} |
| 36137 | @r{ a b@: H l * @: @: 2 @:lufieldmul@:(a,b)} | 36217 | @r{ a b@: H l * @: @: @:lufieldmul@:(a,b)} |
| 36138 | @r{ a b@: l / @: @: 2 @:lupowerdiv@:(a,b)} | 36218 | @r{ a b@: l / @: @: @:lupowerdiv@:(a,b)} |
| 36139 | @r{ a b@: H l / @: @: 2 @:lufielddiv@:(a,b)} | 36219 | @r{ a b@: H l / @: @: @:lufielddiv@:(a,b)} |
| 36140 | @r{ a@: l d @: @: 1 @:dbpowerlevel@:(a)} | 36220 | @r{ a@: l d @: @: @:dbpowerlevel@:(a)} |
| 36141 | @r{ a b@: O l d @: @: 2 @:dbpowerlevel@:(a,b)} | 36221 | @r{ a b@: O l d @: @: @:dbpowerlevel@:(a,b)} |
| 36142 | @r{ a@: H l d @: @: 1 @:dbfieldlevel@:(a)} | 36222 | @r{ a@: H l d @: @: @:dbfieldlevel@:(a)} |
| 36143 | @r{ a b@: O H l d @: @: 2 @:dbfieldlevel@:(a,b)} | 36223 | @r{ a b@: O H l d @: @: @:dbfieldlevel@:(a,b)} |
| 36144 | @r{ a@: l n @: @: 1 @:nppowerlevel@:(a)} | 36224 | @r{ a@: l n @: @: @:nppowerlevel@:(a)} |
| 36145 | @r{ a b@: O l n @: @: 2 @:nppowerlevel@:(a,b)} | 36225 | @r{ a b@: O l n @: @: @:nppowerlevel@:(a,b)} |
| 36146 | @r{ a@: H l n @: @: 1 @:npfieldlevel@:(a)} | 36226 | @r{ a@: H l n @: @: @:npfieldlevel@:(a)} |
| 36147 | @r{ a b@: O H l n @: @: 2 @:npfieldlevel@:(a,b)} | 36227 | @r{ a b@: O H l n @: @: @:npfieldlevel@:(a,b)} |
| 36148 | @r{ a@: l q @: @: 1 @:powerquant@:(a)} | 36228 | @r{ a@: l q @: @: @:powerquant@:(a)} |
| 36149 | @r{ a b@: O l q @: @: 2 @:powerquant@:(a,b)} | 36229 | @r{ a b@: O l q @: @: @:powerquant@:(a,b)} |
| 36150 | @r{ a@: H l q @: @: 1 @:fieldquant@:(a)} | 36230 | @r{ a@: H l q @: @: @:fieldquant@:(a)} |
| 36151 | @r{ a b@: O H l q @: @: 2 @:fieldquant@:(a,b)} | 36231 | @r{ a b@: O H l q @: @: @:fieldquant@:(a,b)} |
| 36232 | @r{ a@: l s @: @: @:spn@:(a)} | ||
| 36233 | @r{ a@: l m @: @: @:midi@:(a)} | ||
| 36234 | @r{ a@: l f @: @: @:freq@:(a)} | ||
| 36152 | 36235 | ||
| 36153 | @c | 36236 | @c |
| 36154 | @r{ @: m a @: @: 12,13 @:calc-algebraic-mode@:} | 36237 | @r{ @: m a @: @: 12,13 @:calc-algebraic-mode@:} |
diff --git a/doc/misc/dired-x.texi b/doc/misc/dired-x.texi index dba99d9c6c7..eb797789922 100644 --- a/doc/misc/dired-x.texi +++ b/doc/misc/dired-x.texi | |||
| @@ -867,24 +867,12 @@ some commands it is appropriate that they use the current Dired | |||
| 867 | directory instead of @code{default-directory}, e.g., @code{find-file} and | 867 | directory instead of @code{default-directory}, e.g., @code{find-file} and |
| 868 | @code{compile}. | 868 | @code{compile}. |
| 869 | 869 | ||
| 870 | A general mechanism is provided for special handling of the working | 870 | @findex dired-smart-shell-command |
| 871 | directory in special major modes: | 871 | @findex shell-command |
| 872 | 872 | @kindex M-! | |
| 873 | @table @code | 873 | The command @code{dired-smart-shell-command}, bound to @kbd{M-!} in |
| 874 | @item dired-default-directory-alist | 874 | Dired buffers, is like @code{shell-command}, but it runs with |
| 875 | @vindex dired-default-directory-alist | 875 | @code{default-directory} bound to the current Dired directory. |
| 876 | Default: @code{((dired-mode . (dired-current-directory)))} | ||
| 877 | |||
| 878 | Alist of major modes and their notion of @code{default-directory}, as a | ||
| 879 | Lisp expression to evaluate. A resulting value of @code{nil} is ignored | ||
| 880 | in favor of @code{default-directory}. | ||
| 881 | |||
| 882 | @item dired-default-directory | ||
| 883 | @findex dired-default-directory | ||
| 884 | Use this function like you would use the variable | ||
| 885 | @code{default-directory}, except that @code{dired-default-directory} | ||
| 886 | also consults the variable @code{dired-default-directory-alist}. | ||
| 887 | @end table | ||
| 888 | 876 | ||
| 889 | @node Find File At Point, Miscellaneous Commands, Multiple Dired Directories, Top | 877 | @node Find File At Point, Miscellaneous Commands, Multiple Dired Directories, Top |
| 890 | @section Find File At Point | 878 | @section Find File At Point |
| @@ -993,12 +981,6 @@ inserted subdirectories. | |||
| 993 | @end table | 981 | @end table |
| 994 | 982 | ||
| 995 | @table @code | 983 | @table @code |
| 996 | @item dired-smart-shell-command | ||
| 997 | @findex dired-smart-shell-command | ||
| 998 | @findex shell-command | ||
| 999 | @kindex M-! | ||
| 1000 | Like function @code{shell-command}, but in the current Dired directory. | ||
| 1001 | Bound to @kbd{M-!} in Dired buffers. | ||
| 1002 | 984 | ||
| 1003 | @item dired-jump | 985 | @item dired-jump |
| 1004 | @findex dired-jump | 986 | @findex dired-jump |
diff --git a/doc/misc/faq.texi b/doc/misc/faq.texi index a9a5e4dc6eb..7528abca58d 100644 --- a/doc/misc/faq.texi +++ b/doc/misc/faq.texi | |||
| @@ -1042,11 +1042,11 @@ Emacs now supports using both X displays and ttys in the same session | |||
| 1042 | @item | 1042 | @item |
| 1043 | Emacs can be started as a daemon in the background. | 1043 | Emacs can be started as a daemon in the background. |
| 1044 | 1044 | ||
| 1045 | @cindex NeXTSTEP port | 1045 | @cindex NeXTstep port |
| 1046 | @cindex GNUstep port | 1046 | @cindex GNUstep port |
| 1047 | @cindex Mac OS X Cocoa | 1047 | @cindex Mac OS X Cocoa |
| 1048 | @item | 1048 | @item |
| 1049 | There is a new NeXTSTEP port of Emacs. This supports GNUstep and Mac OS | 1049 | There is a new NeXTstep port of Emacs. This supports GNUstep and Mac OS |
| 1050 | X (via the Cocoa libraries). The Carbon port of Emacs, which supported | 1050 | X (via the Cocoa libraries). The Carbon port of Emacs, which supported |
| 1051 | Mac OS X in Emacs 22, has been removed. | 1051 | Mac OS X in Emacs 22, has been removed. |
| 1052 | 1052 | ||
diff --git a/doc/misc/url.texi b/doc/misc/url.texi index 2bde54a8dea..42594457ab1 100644 --- a/doc/misc/url.texi +++ b/doc/misc/url.texi | |||
| @@ -116,7 +116,10 @@ The meaning of the @var{path} component depends on the service. | |||
| 116 | @cindex @file{~/.url} | 116 | @cindex @file{~/.url} |
| 117 | @cindex configuration files | 117 | @cindex configuration files |
| 118 | The directory in which URL configuration files, the cache etc., | 118 | The directory in which URL configuration files, the cache etc., |
| 119 | reside. Default @file{~/.url}. | 119 | reside. The old default was @file{~/.url}, and this directory |
| 120 | is still used if it exists. The new default is a @file{url/} | ||
| 121 | directory in @code{user-emacs-directory}, which is normally | ||
| 122 | @file{~/.emacs.d}. | ||
| 120 | @end defvar | 123 | @end defvar |
| 121 | 124 | ||
| 122 | @node Parsed URLs | 125 | @node Parsed URLs |
| @@ -383,20 +386,7 @@ Currently this is just the raw header contents. | |||
| 383 | HTTP URLs are retrieved into a buffer containing the HTTP headers | 386 | HTTP URLs are retrieved into a buffer containing the HTTP headers |
| 384 | followed by the body. Since the headers are quasi-MIME, they may be | 387 | followed by the body. Since the headers are quasi-MIME, they may be |
| 385 | processed using the MIME library. @xref{Top,, Emacs MIME, | 388 | processed using the MIME library. @xref{Top,, Emacs MIME, |
| 386 | emacs-mime, The Emacs MIME Manual}. The URL package provides a | 389 | emacs-mime, The Emacs MIME Manual}. |
| 387 | function to do this in general: | ||
| 388 | |||
| 389 | @defun url-decode-text-part handle &optional coding | ||
| 390 | This function decodes charset-encoded text in the current buffer. In | ||
| 391 | Emacs, the buffer is expected to be unibyte initially and is set to | ||
| 392 | multibyte after decoding. | ||
| 393 | HANDLE is the MIME handle of the original part. CODING is an explicit | ||
| 394 | coding to use, overriding what the MIME headers specify. | ||
| 395 | The coding system used for the decoding is returned. | ||
| 396 | |||
| 397 | Note that this function doesn't deal with @samp{http-equiv} charset | ||
| 398 | specifications in HTML @samp{<meta>} elements. | ||
| 399 | @end defun | ||
| 400 | 390 | ||
| 401 | @node file/ftp | 391 | @node file/ftp |
| 402 | @section file and ftp | 392 | @section file and ftp |
diff --git a/etc/ChangeLog b/etc/ChangeLog index 74787c3de3b..13f99b466a3 100644 --- a/etc/ChangeLog +++ b/etc/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2011-03-06 Juanma Barranquero <lekktu@gmail.com> | ||
| 2 | |||
| 3 | * srecode/el.srt: Fix typo. | ||
| 4 | |||
| 1 | 2011-02-21 Chong Yidong <cyd@stupidchicken.com> | 5 | 2011-02-21 Chong Yidong <cyd@stupidchicken.com> |
| 2 | 6 | ||
| 3 | * themes/tango-dark-theme.el: Tweak background on low-color | 7 | * themes/tango-dark-theme.el: Tweak background on low-color |
| @@ -117,7 +121,7 @@ | |||
| 117 | 121 | ||
| 118 | * NEWS: Mention new Tramp method "ksu". | 122 | * NEWS: Mention new Tramp method "ksu". |
| 119 | 123 | ||
| 120 | 2010-12-13 W. Martin Borgert <debacle@debian.org> (tiny change) | 124 | 2010-12-13 W. Martin Borgert <debacle@debian.org> (tiny change) |
| 121 | 125 | ||
| 122 | * schema/schemas.xml: Add DocBook (Bug#7491). | 126 | * schema/schemas.xml: Add DocBook (Bug#7491). |
| 123 | 127 | ||
| @@ -71,6 +71,9 @@ from load-path. -Q now implies this. | |||
| 71 | client frame in parent X window ID, via XEmbed. This works like the | 71 | client frame in parent X window ID, via XEmbed. This works like the |
| 72 | --parent-id argument to Emacs. | 72 | --parent-id argument to Emacs. |
| 73 | 73 | ||
| 74 | +++ | ||
| 75 | *** New emacsclient argument -q/--quiet suppresses some status messages. | ||
| 76 | |||
| 74 | *** If emacsclient shuts down as a result of Emacs signalling an | 77 | *** If emacsclient shuts down as a result of Emacs signalling an |
| 75 | error, its exit status is 1. | 78 | error, its exit status is 1. |
| 76 | 79 | ||
| @@ -176,6 +179,8 @@ higher-resolution time stamps. | |||
| 176 | and SIGHUP, and upon SIGINT in batch mode. | 179 | and SIGHUP, and upon SIGINT in batch mode. |
| 177 | 180 | ||
| 178 | ** kill-emacs-hook is now also run in batch mode. | 181 | ** kill-emacs-hook is now also run in batch mode. |
| 182 | If you have code that adds something to kill-emacs-hook, you should | ||
| 183 | consider if it is still appropriate to add it in the noninteractive case. | ||
| 179 | 184 | ||
| 180 | ** New scrolling commands `scroll-up-command' and `scroll-down-command' | 185 | ** New scrolling commands `scroll-up-command' and `scroll-down-command' |
| 181 | (bound to C-v/[next] and M-v/[prior]) does not signal errors at top/bottom | 186 | (bound to C-v/[next] and M-v/[prior]) does not signal errors at top/bottom |
| @@ -651,6 +656,8 @@ Notifications API. It requires D-Bus for communication. | |||
| 651 | ** soap-client.el supports access to SOAP web services from Emacs. | 656 | ** soap-client.el supports access to SOAP web services from Emacs. |
| 652 | soap-inspect.el is an interactive inspector for SOAP WSDL structures. | 657 | soap-inspect.el is an interactive inspector for SOAP WSDL structures. |
| 653 | 658 | ||
| 659 | ** xmodmap-generic-mode for xmodmap files. | ||
| 660 | |||
| 654 | 661 | ||
| 655 | * Incompatible Lisp Changes in Emacs 24.1 | 662 | * Incompatible Lisp Changes in Emacs 24.1 |
| 656 | 663 | ||
diff --git a/etc/NEWS.23 b/etc/NEWS.23 index 181548e98d6..3e7a364ffd0 100644 --- a/etc/NEWS.23 +++ b/etc/NEWS.23 | |||
| @@ -129,7 +129,7 @@ starting from the first line of text below the header line. | |||
| 129 | 129 | ||
| 130 | * Changes in Emacs 23.3 on non-free operating systems | 130 | * Changes in Emacs 23.3 on non-free operating systems |
| 131 | 131 | ||
| 132 | ** The nextstep port can have different modifiers for the left and right | 132 | ** The NeXTstep port can have different modifiers for the left and right |
| 133 | alt/option key by customizing the value for ns-right-alternate-modifier. | 133 | alt/option key by customizing the value for ns-right-alternate-modifier. |
| 134 | 134 | ||
| 135 | 135 | ||
| @@ -697,7 +697,7 @@ a GIF library. | |||
| 697 | 697 | ||
| 698 | *** Emacs now supports multi-page TIFF images. | 698 | *** Emacs now supports multi-page TIFF images. |
| 699 | 699 | ||
| 700 | ** New NeXTSTEP-based port. | 700 | ** New NeXTstep-based port. |
| 701 | This provides support for GNUstep (via the GNUstep libraries) and Mac | 701 | This provides support for GNUstep (via the GNUstep libraries) and Mac |
| 702 | OS X (via the Cocoa libraries). | 702 | OS X (via the Cocoa libraries). |
| 703 | 703 | ||
| @@ -707,7 +707,7 @@ other emacsen (e.g. X11 build) use --disable-ns-self-contained. See | |||
| 707 | nextstep/README and nextstep/INSTALL in the Emacs source directory. | 707 | nextstep/README and nextstep/INSTALL in the Emacs source directory. |
| 708 | 708 | ||
| 709 | ** Mac OS X is no longer supported via Carbon. | 709 | ** Mac OS X is no longer supported via Carbon. |
| 710 | Use the NeXTSTEP port, described above. | 710 | Use the NeXTstep port, described above. |
| 711 | 711 | ||
| 712 | ** The new configuration option "--with-dbus" enables D-Bus language | 712 | ** The new configuration option "--with-dbus" enables D-Bus language |
| 713 | bindings for Emacs. | 713 | bindings for Emacs. |
diff --git a/etc/srecode/el.srt b/etc/srecode/el.srt index b63d560582c..6117e72be2a 100644 --- a/etc/srecode/el.srt +++ b/etc/srecode/el.srt | |||
| @@ -261,7 +261,7 @@ template defgroup :indent :blank | |||
| 261 | ---- | 261 | ---- |
| 262 | (defgroup $?MODESYM$-mode nil | 262 | (defgroup $?MODESYM$-mode nil |
| 263 | "$MODESYM$ group." | 263 | "$MODESYM$ group." |
| 264 | :group 'langauges) | 264 | :group 'languages) |
| 265 | ---- | 265 | ---- |
| 266 | bind "g" | 266 | bind "g" |
| 267 | 267 | ||
diff --git a/lib-src/ChangeLog b/lib-src/ChangeLog index f54ad384b13..4b50b2dddeb 100644 --- a/lib-src/ChangeLog +++ b/lib-src/ChangeLog | |||
| @@ -1,3 +1,10 @@ | |||
| 1 | 2011-03-03 Drake Wilson <drake@begriffli.ch> (tiny change) | ||
| 2 | |||
| 3 | * emacsclient.c (longopts): Add quiet. | ||
| 4 | (decode_options): Handle q/quiet. | ||
| 5 | (print_help_and_exit): Add q/quiet. | ||
| 6 | (main): Suppress some messages if quiet option is used. | ||
| 7 | |||
| 1 | 2011-02-26 Eli Zaretskii <eliz@gnu.org> | 8 | 2011-02-26 Eli Zaretskii <eliz@gnu.org> |
| 2 | 9 | ||
| 3 | * Makefile.in (fakemail${EXEEXT}): Depend on lib/ignore-value.h. | 10 | * Makefile.in (fakemail${EXEEXT}): Depend on lib/ignore-value.h. |
diff --git a/lib-src/emacsclient.c b/lib-src/emacsclient.c index 836891ae6aa..abc9aee37c1 100644 --- a/lib-src/emacsclient.c +++ b/lib-src/emacsclient.c | |||
| @@ -129,6 +129,9 @@ char **main_argv; | |||
| 129 | /* Nonzero means don't wait for a response from Emacs. --no-wait. */ | 129 | /* Nonzero means don't wait for a response from Emacs. --no-wait. */ |
| 130 | int nowait = 0; | 130 | int nowait = 0; |
| 131 | 131 | ||
| 132 | /* Nonzero means don't print messages for successful operations. --quiet. */ | ||
| 133 | int quiet = 0; | ||
| 134 | |||
| 132 | /* Nonzero means args are expressions to be evaluated. --eval. */ | 135 | /* Nonzero means args are expressions to be evaluated. --eval. */ |
| 133 | int eval = 0; | 136 | int eval = 0; |
| 134 | 137 | ||
| @@ -164,6 +167,7 @@ static void fail (void) NO_RETURN; | |||
| 164 | struct option longopts[] = | 167 | struct option longopts[] = |
| 165 | { | 168 | { |
| 166 | { "no-wait", no_argument, NULL, 'n' }, | 169 | { "no-wait", no_argument, NULL, 'n' }, |
| 170 | { "quiet", no_argument, NULL, 'q' }, | ||
| 167 | { "eval", no_argument, NULL, 'e' }, | 171 | { "eval", no_argument, NULL, 'e' }, |
| 168 | { "help", no_argument, NULL, 'H' }, | 172 | { "help", no_argument, NULL, 'H' }, |
| 169 | { "version", no_argument, NULL, 'V' }, | 173 | { "version", no_argument, NULL, 'V' }, |
| @@ -523,9 +527,9 @@ decode_options (int argc, char **argv) | |||
| 523 | { | 527 | { |
| 524 | int opt = getopt_long_only (argc, argv, | 528 | int opt = getopt_long_only (argc, argv, |
| 525 | #ifndef NO_SOCKETS_IN_FILE_SYSTEM | 529 | #ifndef NO_SOCKETS_IN_FILE_SYSTEM |
| 526 | "VHnea:s:f:d:tc", | 530 | "VHneqa:s:f:d:tc", |
| 527 | #else | 531 | #else |
| 528 | "VHnea:f:d:tc", | 532 | "VHneqa:f:d:tc", |
| 529 | #endif | 533 | #endif |
| 530 | longopts, 0); | 534 | longopts, 0); |
| 531 | 535 | ||
| @@ -569,6 +573,10 @@ decode_options (int argc, char **argv) | |||
| 569 | eval = 1; | 573 | eval = 1; |
| 570 | break; | 574 | break; |
| 571 | 575 | ||
| 576 | case 'q': | ||
| 577 | quiet = 1; | ||
| 578 | break; | ||
| 579 | |||
| 572 | case 'V': | 580 | case 'V': |
| 573 | message (FALSE, "emacsclient %s\n", VERSION); | 581 | message (FALSE, "emacsclient %s\n", VERSION); |
| 574 | exit (EXIT_SUCCESS); | 582 | exit (EXIT_SUCCESS); |
| @@ -660,6 +668,7 @@ The following OPTIONS are accepted:\n\ | |||
| 660 | use the current Emacs frame\n\ | 668 | use the current Emacs frame\n\ |
| 661 | -e, --eval Evaluate the FILE arguments as ELisp expressions\n\ | 669 | -e, --eval Evaluate the FILE arguments as ELisp expressions\n\ |
| 662 | -n, --no-wait Don't wait for the server to return\n\ | 670 | -n, --no-wait Don't wait for the server to return\n\ |
| 671 | -q, --quiet Don't display messages on success\n\ | ||
| 663 | -d DISPLAY, --display=DISPLAY\n\ | 672 | -d DISPLAY, --display=DISPLAY\n\ |
| 664 | Visit the file in the given display\n\ | 673 | Visit the file in the given display\n\ |
| 665 | --parent-id=ID Open in parent window ID, via XEmbed\n" | 674 | --parent-id=ID Open in parent window ID, via XEmbed\n" |
| @@ -986,7 +995,7 @@ set_tcp_socket (void) | |||
| 986 | if (! get_server_config (&server, auth_string)) | 995 | if (! get_server_config (&server, auth_string)) |
| 987 | return INVALID_SOCKET; | 996 | return INVALID_SOCKET; |
| 988 | 997 | ||
| 989 | if (server.sin_addr.s_addr != inet_addr ("127.0.0.1")) | 998 | if (server.sin_addr.s_addr != inet_addr ("127.0.0.1") && !quiet) |
| 990 | message (FALSE, "%s: connected to remote socket at %s\n", | 999 | message (FALSE, "%s: connected to remote socket at %s\n", |
| 991 | progname, inet_ntoa (server.sin_addr)); | 1000 | progname, inet_ntoa (server.sin_addr)); |
| 992 | 1001 | ||
| @@ -1712,7 +1721,7 @@ main (int argc, char **argv) | |||
| 1712 | send_to_emacs (emacs_socket, "\n"); | 1721 | send_to_emacs (emacs_socket, "\n"); |
| 1713 | 1722 | ||
| 1714 | /* Wait for an answer. */ | 1723 | /* Wait for an answer. */ |
| 1715 | if (!eval && !tty && !nowait) | 1724 | if (!eval && !tty && !nowait && !quiet) |
| 1716 | { | 1725 | { |
| 1717 | printf ("Waiting for Emacs..."); | 1726 | printf ("Waiting for Emacs..."); |
| 1718 | needlf = 2; | 1727 | needlf = 2; |
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1f1dbf69fe5..e34fde79543 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,319 @@ | |||
| 1 | 2011-03-06 Jay Belanger <jay.p.belanger@gmail.com> | ||
| 2 | |||
| 3 | * calc/calc-ext.el (calc-init-extensions): | ||
| 4 | Rename calc-logunits-dblevel and calc-logunits-nplevel to | ||
| 5 | calc-dblevel and calc-nplevel, respectively. | ||
| 6 | Add keybindings for calc-spn, calc-midi and calc-freq. Add | ||
| 7 | autoloads for calcFunc-spn, calcFunc-midi, calcFunc-freq, | ||
| 8 | calc-spn, calc-midi and calc-freq. | ||
| 9 | |||
| 10 | * calc/calc-units.el (calc-dblevel): Rename from | ||
| 11 | calc-logunits-dblevel. | ||
| 12 | (calc-nplevel): Rename from calc-logunits-nplevel. | ||
| 13 | (math-midi-round, math-freqp, math-midip, math-spnp) | ||
| 14 | (math-spn-to-midi, math-midi-to-spn, math-freq-to-spn) | ||
| 15 | (math-midi-to-freq, math-spn-to-freq, calcFunc-spn, calcFunc-midi) | ||
| 16 | (calcFunc-freq, calc-freq, calc-midi, calc-spn): New functions. | ||
| 17 | (math-notes): New variable. | ||
| 18 | |||
| 19 | * calc/calc.el (calc-note-threshold): New variable. | ||
| 20 | |||
| 21 | 2011-03-06 Chong Yidong <cyd@stupidchicken.com> | ||
| 22 | |||
| 23 | * emacs-lisp/package.el (package-archives): Accept either ordinary | ||
| 24 | directory names, in addition to HTTP URLs. | ||
| 25 | (package--with-work-buffer): New macro. Handle normal directories. | ||
| 26 | (package-handle-response): Don't display the failing buffer. | ||
| 27 | (package-download-single, package-download-tar) | ||
| 28 | (package--download-one-archive): Use package--with-work-buffer. | ||
| 29 | (package-archive-base): Rename from package-archive-url. | ||
| 30 | |||
| 31 | 2011-03-06 Glenn Morris <rgm@gnu.org> | ||
| 32 | |||
| 33 | * generic-x.el (generic-unix-modes): Add xmodmap-generic-mode. | ||
| 34 | (xmodmap-generic-mode): Respect generic-extras-enable-list. | ||
| 35 | |||
| 36 | 2011-03-06 Daniel Clemente <dcl441-bugs@yahoo.com> (tiny change) | ||
| 37 | |||
| 38 | * generic-x.el (xmodmap-generic-mode): New. (Bug#2065) | ||
| 39 | |||
| 40 | 2011-03-06 Juanma Barranquero <lekktu@gmail.com> | ||
| 41 | |||
| 42 | * allout.el (allout-init, allout-prefixed-keybindings) | ||
| 43 | (allout-unprefixed-keybindings): | ||
| 44 | * progmodes/prolog.el (prolog-find-term): | ||
| 45 | Fix typos in docstrings. | ||
| 46 | |||
| 47 | 2011-03-06 Nikolaj Schumacher <me@nschum.de> (tiny change) | ||
| 48 | |||
| 49 | * emacs-lisp/elp.el (elp-results): Fix off-by-one in header. (Bug#2746) | ||
| 50 | |||
| 51 | 2011-03-06 Kevin Ryde <user42@zip.com.au> | ||
| 52 | |||
| 53 | * textmodes/sgml-mode.el (sgml-fill-nobreak): Give it a doc. (Bug#5326) | ||
| 54 | |||
| 55 | 2011-03-06 Michael Shields <shields@msrl.com> (tiny change) | ||
| 56 | |||
| 57 | * window.el (one-window-p, walk-windows, display-buffer): | ||
| 58 | Doc fixes. (Bug#5567) | ||
| 59 | |||
| 60 | 2011-03-06 Jay Belanger <jay.p.belanger@gmail.com> | ||
| 61 | |||
| 62 | * cus-edit.el (custom-prompt-variable): Use the `custom-get' property | ||
| 63 | of the variable if it exists. | ||
| 64 | |||
| 65 | 2011-03-06 Juanma Barranquero <lekktu@gmail.com> | ||
| 66 | |||
| 67 | * bookmark.el: | ||
| 68 | * desktop.el: | ||
| 69 | * emacs-lock.el: | ||
| 70 | * ps-print.el: | ||
| 71 | * saveplace.el: | ||
| 72 | * net/tramp-cache.el: | ||
| 73 | * obsolete/fast-lock.el: | ||
| 74 | * textmodes/reftex.el: | ||
| 75 | Don't set `kill-emacs-hook' on noninteractive sessions (bug#8137). | ||
| 76 | |||
| 77 | 2011-03-05 Antoine Levitt <antoine.levitt@gmail.com> | ||
| 78 | |||
| 79 | * files.el (delete-directory, copy-directory, list-directory): | ||
| 80 | Use read-directory-name. | ||
| 81 | |||
| 82 | * find-file.el (ff-find-the-other-file): | ||
| 83 | * net/ange-ftp.el (ange-ftp-make-directory): | ||
| 84 | * printing.el (pr-interactive-dir): | ||
| 85 | * progmodes/ada-prj.el (ada-prj-load-directory): | ||
| 86 | * progmodes/ebnf2ps.el (ebnf-print-directory) | ||
| 87 | (ebnf-spool-directory, ebnf-eps-directory) | ||
| 88 | (ebnf-syntax-directory): | ||
| 89 | * shell.el (shell): | ||
| 90 | * speedbar.el (speedbar-create-directory): | ||
| 91 | * vc/emerge.el (emerge-merge-directories): | ||
| 92 | * vc/vc-dir.el (vc-dir): | ||
| 93 | * vc/vc.el (vc-create-tag, vc-retrieve-tag): Likewise. | ||
| 94 | |||
| 95 | 2011-03-05 Chong Yidong <cyd@stupidchicken.com> | ||
| 96 | |||
| 97 | * help-mode.el (help-buffer): If we are to return the current | ||
| 98 | buffer, signal an error if it's not in Help mode (Bug#8147). | ||
| 99 | |||
| 100 | 2011-03-05 Reuben Thomas <rrt@sc3d.org> | ||
| 101 | |||
| 102 | * files.el (file-name-version-regexp): Handle backup files of the | ||
| 103 | form `foo.js.~HEAD~1~' (Bug#8159). | ||
| 104 | |||
| 105 | 2011-03-05 Glenn Morris <rgm@gnu.org> | ||
| 106 | |||
| 107 | * eshell/esh-var.el: Don't require esh-test when compiling. | ||
| 108 | * eshell/em-banner.el, eshell/esh-cmd.el, eshell/esh-mode.el: | ||
| 109 | * eshell/esh-var.el, eshell/eshell.el: Move tests to esh-test. | ||
| 110 | * eshell/esh-test.el: Move to ../../test/eshell.el. | ||
| 111 | |||
| 112 | 2011-03-05 David Engster <deng@randomsample.de> | ||
| 113 | |||
| 114 | * files.el (save-some-buffers): Report the names of buffers saved | ||
| 115 | automatically due to buffer-save-without-query (Bug#8134). | ||
| 116 | |||
| 117 | 2011-03-05 Deniz Dogan <deniz.a.m.dogan@gmail.com> | ||
| 118 | |||
| 119 | * net/rcirc.el: Add QuakeNet authentication support. | ||
| 120 | (rcirc-authinfo, rcirc-check-auth-status) | ||
| 121 | (rcirc-authenticate): Support QuakeNet. | ||
| 122 | |||
| 123 | 2011-03-05 Deniz Dogan <deniz.a.m.dogan@gmail.com> | ||
| 124 | |||
| 125 | * net/rcirc.el: Add functionality to authenticate before | ||
| 126 | autojoining channels. | ||
| 127 | (rcirc-authenticate-before-join): New option. | ||
| 128 | (rcirc-authenticated-hook): New variable. | ||
| 129 | (rcirc-connect): Make local variable rcirc-user-authenticated. | ||
| 130 | (rcirc-handler-001): Respect rcirc-authenticate-before-join. | ||
| 131 | (rcirc-check-auth-status, rcirc-join-channels-post-auth): | ||
| 132 | New functions. | ||
| 133 | (rcirc-handler-PRIVMSG, rcirc-handler-NOTICE): | ||
| 134 | Call rcirc-check-auth-status. | ||
| 135 | |||
| 136 | 2011-03-05 Alex Harsanyi <AlexHarsanyi@gmail.com> | ||
| 137 | |||
| 138 | * net/soap-client.el (soap-namespace-put-link): Check if the target | ||
| 139 | name is fully qualified -- use only the name part. | ||
| 140 | (soap-parse-complex-type, soap-parse-sequence): Recognize xsd:all | ||
| 141 | types, treated the same as xsd:sequence. (Bug#8166) | ||
| 142 | |||
| 143 | 2011-03-05 Eli Zaretskii <eliz@gnu.org> | ||
| 144 | |||
| 145 | * files.el (find-file-noselect): Don't ask about re-visiting | ||
| 146 | non-literally if the file is already visited in image-mode. | ||
| 147 | (Bug#8177) | ||
| 148 | |||
| 149 | 2011-03-05 Glenn Morris <rgm@gnu.org> | ||
| 150 | |||
| 151 | * eshell/esh-mode.el (eshell-kill-buffer-function): New function. | ||
| 152 | (eshell-mode): Use eshell-kill-buffer-function. | ||
| 153 | Run the -initialize functions independently of the -load-hooks. | ||
| 154 | * eshell/esh-proc.el (eshell-kill-process-function): New function. | ||
| 155 | (eshell-gather-process-output, eshell-sentinel) | ||
| 156 | (eshell-interrupt-process, eshell-kill-process, eshell-quit-process): | ||
| 157 | Use eshell-kill-process-function. | ||
| 158 | * eshell/em-alias.el (eshell-alias-load-hook): | ||
| 159 | * eshell/em-banner.el (eshell-banner-load-hook): | ||
| 160 | * eshell/em-cmpl.el (eshell-cmpl-load-hook): | ||
| 161 | * eshell/em-dirs.el (eshell-dirs-load-hook): | ||
| 162 | * eshell/em-glob.el (eshell-glob-load-hook): | ||
| 163 | * eshell/em-hist.el (eshell-hist-load-hook): | ||
| 164 | * eshell/em-pred.el (eshell-pred-load-hook): | ||
| 165 | * eshell/em-prompt.el (eshell-prompt-load-hook): | ||
| 166 | * eshell/em-rebind.el (eshell-rebind-load-hook): | ||
| 167 | * eshell/em-script.el (eshell-script-load-hook): | ||
| 168 | * eshell/em-smart.el (eshell-smart-load-hook): | ||
| 169 | * eshell/em-term.el (eshell-term-load-hook): | ||
| 170 | * eshell/em-unix.el (eshell-unix-load-hook): | ||
| 171 | * eshell/esh-arg.el (eshell-arg-load-hook): | ||
| 172 | * eshell/esh-cmd.el (eshell-cmd-load-hook): | ||
| 173 | * eshell/esh-ext.el (eshell-ext-load-hook): | ||
| 174 | * eshell/esh-io.el (eshell-io-load-hook): | ||
| 175 | * eshell/esh-mode.el (eshell-exit-hook): | ||
| 176 | * eshell/esh-proc.el (eshell-proc-load-hook, eshell-kill-hook): | ||
| 177 | * eshell/esh-var.el (eshell-var-load-hook): | ||
| 178 | Set default hook values to nil. (Bug#5375) | ||
| 179 | |||
| 180 | * eshell/esh-module.el (eshell-module-unload-hook) | ||
| 181 | (eshell-modules-list): Remove leading * from defcustom docs. | ||
| 182 | |||
| 183 | * eshell/esh-util.el (eshell-for): Make it obsolete. | ||
| 184 | * eshell/em-alias.el (eshell/alias, eshell-alias-completions): | ||
| 185 | * eshell/em-dirs.el (eshell-save-some-last-dir): | ||
| 186 | * eshell/em-hist.el (eshell-save-some-history) | ||
| 187 | (eshell-hist-parse-modifier): | ||
| 188 | * eshell/em-ls.el (eshell-ls-dir, eshell-ls-files) | ||
| 189 | (eshell-ls-entries): | ||
| 190 | * eshell/em-unix.el (eshell/cat, eshell/du, eshell/su): | ||
| 191 | * eshell/esh-cmd.el (eshell-invoke-directly, eshell-do-eval) | ||
| 192 | (eshell/which): | ||
| 193 | * eshell/esh-ext.el (eshell-find-interpreter): | ||
| 194 | * eshell/esh-mode.el (eshell-mode): | ||
| 195 | * eshell/esh-module.el (eshell-unload-extension-modules): | ||
| 196 | * eshell/esh-proc.el (eshell-process-interact): | ||
| 197 | * eshell/esh-test.el (eshell-test): | ||
| 198 | * eshell/esh-util.el (eshell-flatten-list, eshell-winnow-list): | ||
| 199 | * eshell/esh-var.el (eshell/env, eshell-environment-variables) | ||
| 200 | (eshell-variables-list): | ||
| 201 | * eshell/eshell.el (eshell-unload-all-modules): | ||
| 202 | Replace eshell-for with dolist. | ||
| 203 | |||
| 204 | 2011-03-04 Glenn Morris <rgm@gnu.org> | ||
| 205 | |||
| 206 | * vc/vc-bzr.el (vc-bzr-after-dir-status): Handle bzr 2.3.0. (Bug#8170) | ||
| 207 | |||
| 208 | 2011-03-04 Tom Tromey <tromey@redhat.com> | ||
| 209 | |||
| 210 | * progmodes/gud.el (gdb-script-mode): Derive from prog-mode. | ||
| 211 | |||
| 212 | 2011-03-04 Glenn Morris <rgm@gnu.org> | ||
| 213 | |||
| 214 | * outline.el (outline-regexp): No longer allow nil. | ||
| 215 | (outline-heading-end-regexp): Add safety predicate. (Bug#7619) | ||
| 216 | |||
| 217 | * net/browse-url.el (browse-url): | ||
| 218 | Handle deleted default-directory. (Bug#6077) | ||
| 219 | |||
| 220 | * recentf.el (recentf-include-p): In case of a buggy predicate, | ||
| 221 | err on the side of including, not excluding. (Bug#5843) | ||
| 222 | |||
| 223 | 2011-03-04 Jay Belanger <jay.p.belanger@gmail.com> | ||
| 224 | |||
| 225 | * calc/calc-units.el (math-to-standard-rec): Don't treat subscripted | ||
| 226 | variables as units. | ||
| 227 | |||
| 228 | 2011-03-04 Bob Rogers <rogers@rgrjr.dyndns.org> | ||
| 229 | |||
| 230 | * emacs-lisp/ewoc.el (ewoc-goto-next): Give a more explicit error | ||
| 231 | if there is no node. (Bug#3261) | ||
| 232 | |||
| 233 | 2011-03-04 Leo <sdl.web@gmail.com> | ||
| 234 | |||
| 235 | * vc/diff-mode.el (diff-mode): Fix whitespace-style. (Bug#8139) | ||
| 236 | |||
| 237 | * time.el (display-time-world-list): Fix typo. (Bug#7571) | ||
| 238 | |||
| 239 | 2011-03-04 Zachary Kanfer <zkanfer@gmail.com> (tiny change) | ||
| 240 | |||
| 241 | * cus-edit.el (custom-buffer-create-internal): | ||
| 242 | Split search string before passing it to `customize-apropos' (bug#8136). | ||
| 243 | |||
| 244 | 2011-03-04 Drew Adams <drew.adams@oracle.com> | ||
| 245 | |||
| 246 | * image-dired.el (image-dired-cmd-read-exif-data-options): | ||
| 247 | Fix typo in docstring (bug#8156). | ||
| 248 | |||
| 249 | 2011-03-03 Deniz Dogan <deniz.a.m.dogan@gmail.com> | ||
| 250 | |||
| 251 | * net/rcirc.el (rcirc-cmd-join): Accept comma-separated input. | ||
| 252 | |||
| 253 | 2011-03-03 Christian Ohler <ohler@gnu.org> | ||
| 254 | |||
| 255 | * emacs-lisp/ert.el (ert--explain-equal): New function. | ||
| 256 | (ert--explain-equal-rec): Renamed from `ert--explain-not-equal'. | ||
| 257 | All callers changed. | ||
| 258 | (ert--explain-equal-including-properties): Renamed from | ||
| 259 | `ert--explain-not-equal-including-properties'. All callers | ||
| 260 | changed. | ||
| 261 | |||
| 262 | 2011-03-03 Christian Ohler <ohler@gnu.org> | ||
| 263 | |||
| 264 | * emacs-lisp/ert.el (ert--stats-set-test-and-result) | ||
| 265 | (ert-char-for-test-result, ert-string-for-test-result) | ||
| 266 | (ert-run-tests-batch, ert--print-test-for-ewoc): | ||
| 267 | Handle `ert-test-quit'. | ||
| 268 | |||
| 269 | 2011-03-03 David Abrahams <dave@boostpro.com> (tiny change) | ||
| 270 | |||
| 271 | * vc/ediff-init.el (ediff-use-faces, ediff-highlight-all-diffs): | ||
| 272 | Move ediff-defvar-local calls after defcustoms. (Bug#1821) | ||
| 273 | |||
| 274 | 2011-03-03 Glenn Morris <rgm@gnu.org> | ||
| 275 | |||
| 276 | * files.el (file-truename): Doc fix. (Bug#2341) | ||
| 277 | |||
| 278 | 2011-03-03 Bob Rogers <rogers-emacs@rgrjr.dyndns.org> | ||
| 279 | |||
| 280 | * vc/vc-dir.el (vc-dir-mode-map): Bind vc-dir-find-file to e (Bug#7349). | ||
| 281 | |||
| 282 | 2011-03-03 Vagn Johansen <gonz808@hotmail.com> (tiny change) | ||
| 283 | |||
| 284 | * vc/vc-svn.el (vc-svn-after-dir-status): Some MS Windows svn client | ||
| 285 | programs output backslashes. (Bug#7663) | ||
| 286 | |||
| 287 | 2011-03-03 Glenn Morris <rgm@gnu.org> | ||
| 288 | |||
| 289 | * mail/sendmail.el (mail-mode-map): Remove mail-sent-via. | ||
| 290 | (mail-mode): Remove mail-sent-via from the doc. | ||
| 291 | (mail-sent-via): Make it obsolete. (Bug#1776) | ||
| 292 | |||
| 293 | * progmodes/grep.el (grep-highlight-matches): Doc fix. | ||
| 294 | (grep-process-setup): No highlighting without font-lock. (Bug#8084) | ||
| 295 | |||
| 296 | * vc/vc-bzr.el (vc-bzr-state-heuristic): Handle dirstate entries | ||
| 297 | with no parents. (Bug#8025) | ||
| 298 | |||
| 299 | 2011-03-02 Teodor Zlatanov <tzz@lifelogs.com> | ||
| 300 | |||
| 301 | * password-cache.el (password-in-cache-p): Add autoload. | ||
| 302 | |||
| 1 | 2011-03-02 Glenn Morris <rgm@gnu.org> | 303 | 2011-03-02 Glenn Morris <rgm@gnu.org> |
| 2 | 304 | ||
| 305 | * man.el (Man-support-local-filenames): Also handle Red Hat's man. | ||
| 306 | * dired-x.el (Man-support-local-filenames): Autoload it. | ||
| 307 | (dired-guess-shell-alist-default): Also handle Red Hat's man. | ||
| 308 | |||
| 309 | * dired-x.el (dired-default-directory-alist, dired-default-directory): | ||
| 310 | Mark as obsolete. | ||
| 311 | (dired-smart-shell-command): Just call dired-current-directory. | ||
| 312 | |||
| 313 | * dired-x.el (dired-jump-other-window): Add autoload. | ||
| 314 | (dired-default-directory-alist, dired-default-directory): Doc fixes. | ||
| 315 | (dired-default-directory-alist): Mark as risky. | ||
| 316 | |||
| 3 | * dired-x.el (dired-omit-here-always): Make it obsolete. | 317 | * dired-x.el (dired-omit-here-always): Make it obsolete. |
| 4 | 318 | ||
| 5 | 2011-03-02 Chong Yidong <cyd@stupidchicken.com> | 319 | 2011-03-02 Chong Yidong <cyd@stupidchicken.com> |
| @@ -28,8 +342,9 @@ | |||
| 28 | 342 | ||
| 29 | 2011-03-01 Glenn Morris <rgm@gnu.org> | 343 | 2011-03-01 Glenn Morris <rgm@gnu.org> |
| 30 | 344 | ||
| 31 | * calendar/cal-hebrew.el (calendar-hebrew-birthday, diary-hebrew-date): | 345 | * calendar/cal-hebrew.el (calendar-hebrew-birthday) |
| 32 | Rename and rework functions added in previous change. | 346 | (diary-hebrew-birthday): Rename and rework functions added |
| 347 | in previous change. | ||
| 33 | 348 | ||
| 34 | 2011-03-01 Ed Reingold <reingold@emr.cs.iit.edu> | 349 | 2011-03-01 Ed Reingold <reingold@emr.cs.iit.edu> |
| 35 | 350 | ||
| @@ -66,7 +381,7 @@ | |||
| 66 | * net/tramp-cmds.el (tramp-append-tramp-buffers): Dump load-path | 381 | * net/tramp-cmds.el (tramp-append-tramp-buffers): Dump load-path |
| 67 | shadows. | 382 | shadows. |
| 68 | 383 | ||
| 69 | 2011-02-28 Antoine Levitt <antoine.levitt@gmail.com> (tiny change) | 384 | 2011-02-28 Antoine Levitt <antoine.levitt@gmail.com> |
| 70 | 385 | ||
| 71 | * dired-x.el (dired-guess-shell-alist-default): Add rar and 7z. | 386 | * dired-x.el (dired-guess-shell-alist-default): Add rar and 7z. |
| 72 | 387 | ||
| @@ -187,7 +502,7 @@ | |||
| 187 | * help-fns.el (describe-function-1): Don't signal an error just because | 502 | * help-fns.el (describe-function-1): Don't signal an error just because |
| 188 | the DOC file disappeared. | 503 | the DOC file disappeared. |
| 189 | 504 | ||
| 190 | 2011-02-22 Seppo Sade <sepposade1@gmail.com> (tiny change) | 505 | 2011-02-22 Seppo Sade <sepposade1@gmail.com> (tiny change) |
| 191 | 506 | ||
| 192 | * eshell/esh-ext.el (eshell-external-command): Do not restrict | 507 | * eshell/esh-ext.el (eshell-external-command): Do not restrict |
| 193 | remote check to "ftp". (Bug#8089) | 508 | remote check to "ftp". (Bug#8089) |
| @@ -250,8 +565,8 @@ | |||
| 250 | * autorevert.el (auto-revert-mode, auto-revert-tail-mode) | 565 | * autorevert.el (auto-revert-mode, auto-revert-tail-mode) |
| 251 | (global-auto-revert-ignore-buffer): Remove leading "*" from docs. | 566 | (global-auto-revert-ignore-buffer): Remove leading "*" from docs. |
| 252 | 567 | ||
| 253 | 2011-02-19 Dmitry Bolshakov <dmitry.bolshakov@bridge-quest.com> | 568 | 2011-02-19 Dmitry Bolshakov <dmitry.bolshakov@bridge-quest.com> |
| 254 | Dima Kogan <dkogan@cds.caltech.edu> (tiny change) | 569 | Dima Kogan <dkogan@cds.caltech.edu> (tiny change) |
| 255 | 570 | ||
| 256 | * progmodes/hideshow.el (hs-find-block-beginning) | 571 | * progmodes/hideshow.el (hs-find-block-beginning) |
| 257 | (hs-hide-level-recursive): Ignore comments when parsing braces | 572 | (hs-hide-level-recursive): Ignore comments when parsing braces |
| @@ -406,13 +721,13 @@ | |||
| 406 | 721 | ||
| 407 | 2011-02-17 Ken Manheimer <ken.manheimer@gmail.com> | 722 | 2011-02-17 Ken Manheimer <ken.manheimer@gmail.com> |
| 408 | 723 | ||
| 409 | * lisp/allout-widgets.el: (allout-widgets-icons-light-subdir) | 724 | * lisp/allout-widgets.el (allout-widgets-icons-light-subdir) |
| 410 | (allout-widgets-icons-dark-subdir): Track relocations of icons | 725 | (allout-widgets-icons-dark-subdir): Track relocations of icons |
| 411 | * lisp/allout.el: Remove commentary about remove encryption | 726 | * lisp/allout.el: Remove commentary about remove encryption |
| 412 | passphrase mnemonic support and verification. | 727 | passphrase mnemonic support and verification. |
| 413 | (allout-encrypt-string): (allout-encrypt-string): Recognize epg | 728 | (allout-encrypt-string): Recognize epg failure to decrypt gpg2 |
| 414 | failure to decrypt gpg2 armored text using gpg1, and indicate that | 729 | armored text using gpg1, and indicate that the gpg version *might* |
| 415 | the gpg version *might* be the problem in the error message. | 730 | be the problem in the error message. |
| 416 | 731 | ||
| 417 | 2011-02-17 Deniz Dogan <deniz.a.m.dogan@gmail.com> | 732 | 2011-02-17 Deniz Dogan <deniz.a.m.dogan@gmail.com> |
| 418 | 733 | ||
| @@ -701,7 +1016,7 @@ | |||
| 701 | 1016 | ||
| 702 | 2011-02-11 Deniz Dogan <deniz.a.m.dogan@gmail.com> | 1017 | 2011-02-11 Deniz Dogan <deniz.a.m.dogan@gmail.com> |
| 703 | 1018 | ||
| 704 | * net/rcirc.el (defun-rcirc-join): Accept multiple channels. | 1019 | * net/rcirc.el (rcirc-cmd-join): Accept multiple channels. |
| 705 | 1020 | ||
| 706 | 2011-02-11 Glenn Morris <rgm@gnu.org> | 1021 | 2011-02-11 Glenn Morris <rgm@gnu.org> |
| 707 | 1022 | ||
| @@ -744,7 +1059,7 @@ | |||
| 744 | * play/pong.el (pong-mode-map): | 1059 | * play/pong.el (pong-mode-map): |
| 745 | * play/handwrite.el (menu-bar-handwrite-map): | 1060 | * play/handwrite.el (menu-bar-handwrite-map): |
| 746 | * play/gametree.el (gametree-mode-map): | 1061 | * play/gametree.el (gametree-mode-map): |
| 747 | * net/rcirc.el (rcirc-mode-map, rcirc-browse-url-map | 1062 | * net/rcirc.el (rcirc-mode-map, rcirc-browse-url-map) |
| 748 | (rcirc-multiline-minor-mode-map, rcirc-track-minor-mode-map): | 1063 | (rcirc-multiline-minor-mode-map, rcirc-track-minor-mode-map): |
| 749 | * net/newst-plainview.el (newsticker-menu, newsticker-mode-map) | 1064 | * net/newst-plainview.el (newsticker-menu, newsticker-mode-map) |
| 750 | (newsticker--url-keymap): | 1065 | (newsticker--url-keymap): |
| @@ -782,7 +1097,7 @@ | |||
| 782 | auto-activation is controlled solely by customization | 1097 | auto-activation is controlled solely by customization |
| 783 | `allout-auto-activation'. | 1098 | `allout-auto-activation'. |
| 784 | 1099 | ||
| 785 | (allout-auto-activation-helper) (allout-setup): New autoloads | 1100 | (allout-auto-activation-helper, allout-setup): New autoloads |
| 786 | implement new custom set procedure for allout-auto-activation. | 1101 | implement new custom set procedure for allout-auto-activation. |
| 787 | Also, explicitly invoke | 1102 | Also, explicitly invoke |
| 788 | (allout-setup) after allout-auto-activation is custom-defined, to | 1103 | (allout-setup) after allout-auto-activation is custom-defined, to |
| @@ -794,7 +1109,7 @@ | |||
| 794 | allout-auto-activation, and mark obsolete. | 1109 | allout-auto-activation, and mark obsolete. |
| 795 | (allout-mode): Respect string values for allout-auto-activation. | 1110 | (allout-mode): Respect string values for allout-auto-activation. |
| 796 | Run allout-after-copy-or-kill-hook without any args. | 1111 | Run allout-after-copy-or-kill-hook without any args. |
| 797 | (allout-mode) (allout-layout) (allout-default-layout) | 1112 | (allout-mode, allout-layout, allout-default-layout) |
| 798 | (outlineify-sticky): Adjust docstring for new scheme. | 1113 | (outlineify-sticky): Adjust docstring for new scheme. |
| 799 | (allout-after-copy-or-kill-hook): No arguments - hook implementers | 1114 | (allout-after-copy-or-kill-hook): No arguments - hook implementers |
| 800 | should concentrate on the kill ring. | 1115 | should concentrate on the kill ring. |
| @@ -835,7 +1150,7 @@ | |||
| 835 | extension-specific processing of killed text. | 1150 | extension-specific processing of killed text. |
| 836 | (allout-mode): Include new allout-after-copy-or-kill-hook among | 1151 | (allout-mode): Include new allout-after-copy-or-kill-hook among |
| 837 | mentioned hooks. | 1152 | mentioned hooks. |
| 838 | (allout-kill-line) (allout-kill-topic): Ensure that processing | 1153 | (allout-kill-line, allout-kill-topic): Ensure that processing |
| 839 | after kill happens even if barf-if-buffer-read-only is raised. | 1154 | after kill happens even if barf-if-buffer-read-only is raised. |
| 840 | Include new allout-after-copy-or-kill-hook among that subsequent | 1155 | Include new allout-after-copy-or-kill-hook among that subsequent |
| 841 | processing. | 1156 | processing. |
| @@ -857,23 +1172,23 @@ | |||
| 857 | * calc/calc.el (calc-logunits-field-reference): Rename from | 1172 | * calc/calc.el (calc-logunits-field-reference): Rename from |
| 858 | `calc-default-field-reference-level'. | 1173 | `calc-default-field-reference-level'. |
| 859 | (calc-logunits-power-reference): Rename from | 1174 | (calc-logunits-power-reference): Rename from |
| 860 | `calc-default-power-reference-level' | 1175 | `calc-default-power-reference-level'. |
| 861 | 1176 | ||
| 862 | * calc/calc-units.el (math-logunits-quant): Rename from | 1177 | * calc/calc-units.el (math-logunits-quant): Rename from |
| 863 | `math-logunits-level' | 1178 | `math-logunits-level' |
| 864 | (math-logunits-plus): Rename from math-logcombine. | 1179 | (math-logunits-plus): Rename from math-logcombine. |
| 865 | (calcFunc-luplus, calcFunc-luminus calc-luplus, calc-luminus): Remove. | 1180 | (calcFunc-luplus, calcFunc-luminus calc-luplus, calc-luminus): Remove. |
| 866 | (calcFunc-lufieldadd, calcFunc-lupoweradd, calcFunc-lufieldsub) | 1181 | (calcFunc-lufieldadd, calcFunc-lupoweradd, calcFunc-lufieldsub) |
| 867 | (calcFunc-lufieldsub,calc-logunits-add calc-logunits-sub): | 1182 | (calcFunc-lufieldsub, calc-logunits-add, calc-logunits-sub): |
| 868 | New functions. | 1183 | New functions. |
| 869 | (calcFunc-fieldquant): Rename from `calcFunc-fieldlevel'. | 1184 | (calcFunc-fieldquant): Rename from `calcFunc-fieldlevel'. |
| 870 | (calcFunc-powerquant): Rename from `calcFunc-powerlevel'. | 1185 | (calcFunc-powerquant): Rename from `calcFunc-powerlevel'. |
| 871 | (calc-logunits-quantity): Rename from `calc-level'. | 1186 | (calc-logunits-quantity): Rename from `calc-level'. |
| 872 | (calcFunc-dbfieldlevel, calcFunc-dbpowerlevel, calcFunc-npfieldlevel) | 1187 | (calcFunc-dbfieldlevel, calcFunc-dbpowerlevel, calcFunc-npfieldlevel) |
| 873 | (calcFunc-nppowerlevel,calc-logunits-dblevel, calc-logunits-nplevel) | 1188 | (calcFunc-nppowerlevel, calc-logunits-dblevel, calc-logunits-nplevel) |
| 874 | (math-logunits-mul, calcFunc-lufieldmul, calcFunc-lupowermul) | 1189 | (math-logunits-mul, calcFunc-lufieldmul, calcFunc-lupowermul) |
| 875 | (calc-logunits-mul, math-logunits-divide, calcFunc-lufielddiv) | 1190 | (calc-logunits-mul, math-logunits-divide, calcFunc-lufielddiv) |
| 876 | (calcFunc-lupowerdiv,calc-logunits-divide,math-logunits-level): | 1191 | (calcFunc-lupowerdiv, calc-logunits-divide, math-logunits-level): |
| 877 | New functions. | 1192 | New functions. |
| 878 | 1193 | ||
| 879 | * calc/calc-help.el (calc-u-prefix-help): Remove "L" reference. | 1194 | * calc/calc-help.el (calc-u-prefix-help): Remove "L" reference. |
| @@ -1596,7 +1911,7 @@ | |||
| 1596 | (allout-institute-keymap): Take over the "setup" part of the former | 1911 | (allout-institute-keymap): Take over the "setup" part of the former |
| 1597 | allout-setup-mode-map. Reassign allout-mode-map-value value and | 1912 | allout-setup-mode-map. Reassign allout-mode-map-value value and |
| 1598 | update the defalias. | 1913 | update the defalias. |
| 1599 | (allout-command-prefix) (allout-prefixed-keybindings) | 1914 | (allout-command-prefix, allout-prefixed-keybindings) |
| 1600 | (allout-unprefixed-keybindings): | 1915 | (allout-unprefixed-keybindings): |
| 1601 | Use allout-compose-and-institute-keymap to process the bindings. | 1916 | Use allout-compose-and-institute-keymap to process the bindings. |
| 1602 | (allout-unprefixed-keybindings): Remove extraneous '?' question marks. | 1917 | (allout-unprefixed-keybindings): Remove extraneous '?' question marks. |
| @@ -2591,7 +2906,7 @@ | |||
| 2591 | * loadup.el (symbol-file-load-history-loaded): Remove; unused. | 2906 | * loadup.el (symbol-file-load-history-loaded): Remove; unused. |
| 2592 | 2907 | ||
| 2593 | 2010-12-15 Jari Aalto <jari.aalto@cante.net> | 2908 | 2010-12-15 Jari Aalto <jari.aalto@cante.net> |
| 2594 | Scott Evans <gse@antisleep.com> | 2909 | Scott Evans <gse@antisleep.com> |
| 2595 | 2910 | ||
| 2596 | * rect.el (rectange--default-line-number-format) | 2911 | * rect.el (rectange--default-line-number-format) |
| 2597 | (rectangle-number-line-callback): New functions. | 2912 | (rectangle-number-line-callback): New functions. |
| @@ -2751,7 +3066,7 @@ | |||
| 2751 | * dired.el (dired-pop-to-buffer): Bind pop-up-frames to nil | 3066 | * dired.el (dired-pop-to-buffer): Bind pop-up-frames to nil |
| 2752 | (Bug#7533). | 3067 | (Bug#7533). |
| 2753 | 3068 | ||
| 2754 | 2010-12-13 W. Martin Borgert <debacle@debian.org> (tiny change) | 3069 | 2010-12-13 W. Martin Borgert <debacle@debian.org> (tiny change) |
| 2755 | 3070 | ||
| 2756 | * files.el (auto-mode-alist): Handle .dbk (DocBook) with xml-mode. | 3071 | * files.el (auto-mode-alist): Handle .dbk (DocBook) with xml-mode. |
| 2757 | (Bug#7491). | 3072 | (Bug#7491). |
| @@ -3679,7 +3994,7 @@ | |||
| 3679 | describe-prefix-bindings | 3994 | describe-prefix-bindings |
| 3680 | - adapt to new version of called-interactively-p, while | 3995 | - adapt to new version of called-interactively-p, while |
| 3681 | maintaining backwards compatibility with old version | 3996 | maintaining backwards compatibility with old version |
| 3682 | - fix hotspot navigation so i works properly with meta-modified keys | 3997 | - fix hotspot navigation so i works properly with meta-modified keys. |
| 3683 | 3998 | ||
| 3684 | * allout.el (allout-keybindings, allout-bind-keys) | 3999 | * allout.el (allout-keybindings, allout-bind-keys) |
| 3685 | (allout-keybindings-binding, allout-prefixed-keybindings) | 4000 | (allout-keybindings-binding, allout-prefixed-keybindings) |
| @@ -3806,7 +4121,7 @@ | |||
| 3806 | 2010-11-12 Glenn Morris <rgm@gnu.org> | 4121 | 2010-11-12 Glenn Morris <rgm@gnu.org> |
| 3807 | 4122 | ||
| 3808 | * emacs-lisp/bytecomp.el (byte-compile-log-buffer): New constant. | 4123 | * emacs-lisp/bytecomp.el (byte-compile-log-buffer): New constant. |
| 3809 | Use it to replace all instances of "*Compile-Log*" | 4124 | Use it to replace all instances of "*Compile-Log*". |
| 3810 | 4125 | ||
| 3811 | 2010-11-12 Stefan Monnier <monnier@iro.umontreal.ca> | 4126 | 2010-11-12 Stefan Monnier <monnier@iro.umontreal.ca> |
| 3812 | 4127 | ||
| @@ -5737,7 +6052,7 @@ | |||
| 5737 | 6052 | ||
| 5738 | 2010-10-03 Glenn Morris <rgm@gnu.org> | 6053 | 2010-10-03 Glenn Morris <rgm@gnu.org> |
| 5739 | 6054 | ||
| 5740 | * obsolete/x-menu.el: Remove file, obsolete since 21.1 | 6055 | * obsolete/x-menu.el: Remove file, obsolete since 21.1. |
| 5741 | 6056 | ||
| 5742 | * textmodes/rst.el (rst-font-lock-keywords-function): | 6057 | * textmodes/rst.el (rst-font-lock-keywords-function): |
| 5743 | Drop Emacs 20 code. | 6058 | Drop Emacs 20 code. |
| @@ -6451,7 +6766,7 @@ | |||
| 6451 | 6766 | ||
| 6452 | 2010-09-14 Sascha Wilde <wilde@sha-bang.de> | 6767 | 2010-09-14 Sascha Wilde <wilde@sha-bang.de> |
| 6453 | 6768 | ||
| 6454 | * vc/vc-hg.el (vc-hg-state,vc-hg-working-revision): | 6769 | * vc/vc-hg.el (vc-hg-state, vc-hg-working-revision): |
| 6455 | Replace setting HGRCPATH to "" by some less invasive --config options. | 6770 | Replace setting HGRCPATH to "" by some less invasive --config options. |
| 6456 | 6771 | ||
| 6457 | 2010-09-14 Stefan Monnier <monnier@iro.umontreal.ca> | 6772 | 2010-09-14 Stefan Monnier <monnier@iro.umontreal.ca> |
| @@ -7567,7 +7882,7 @@ | |||
| 7567 | 7882 | ||
| 7568 | * net/dbus.el: Accept UNIX domain sockets as bus address. | 7883 | * net/dbus.el: Accept UNIX domain sockets as bus address. |
| 7569 | (top): Don't initialize `dbus-registered-objects-table' anymore, | 7884 | (top): Don't initialize `dbus-registered-objects-table' anymore, |
| 7570 | this is done in dbusbind,c. | 7885 | this is done in dbusbind.c. |
| 7571 | (dbus-check-event): Adapt test for bus. | 7886 | (dbus-check-event): Adapt test for bus. |
| 7572 | (dbus-return-values-table, dbus-unregister-service) | 7887 | (dbus-return-values-table, dbus-unregister-service) |
| 7573 | (dbus-event-bus-name, dbus-introspect, dbus-register-property): | 7888 | (dbus-event-bus-name, dbus-introspect, dbus-register-property): |
| @@ -7904,7 +8219,7 @@ | |||
| 7904 | * progmodes/octave-mod.el (octave-mode): Set comment-add. | 8219 | * progmodes/octave-mod.el (octave-mode): Set comment-add. |
| 7905 | (octave-mode-map): Use comment-dwim (bug#6829). | 8220 | (octave-mode-map): Use comment-dwim (bug#6829). |
| 7906 | 8221 | ||
| 7907 | 2010-08-12 Antoine Levitt <antoine.levitt@gmail.com> (tiny change) | 8222 | 2010-08-12 Antoine Levitt <antoine.levitt@gmail.com> |
| 7908 | 8223 | ||
| 7909 | * cus-edit.el (custom-save-variables, custom-save-faces): Fix up | 8224 | * cus-edit.el (custom-save-variables, custom-save-faces): Fix up |
| 7910 | indentation of inserted comment. | 8225 | indentation of inserted comment. |
| @@ -8083,7 +8398,7 @@ | |||
| 8083 | 8398 | ||
| 8084 | 2010-08-08 Jay Belanger <jay.p.belanger@gmail.com> | 8399 | 2010-08-08 Jay Belanger <jay.p.belanger@gmail.com> |
| 8085 | 8400 | ||
| 8086 | * calc/calc.el (calc-trail-mode,calc-refresh): Use `face' property | 8401 | * calc/calc.el (calc-trail-mode, calc-refresh): Use `face' property |
| 8087 | to italicize headers. | 8402 | to italicize headers. |
| 8088 | (calc-highlight-selections-with-faces): New variable. | 8403 | (calc-highlight-selections-with-faces): New variable. |
| 8089 | (calc-selected-face, calc-nonselected-face): New faces. | 8404 | (calc-selected-face, calc-nonselected-face): New faces. |
| @@ -8128,7 +8443,7 @@ | |||
| 8128 | 8443 | ||
| 8129 | * progmodes/cc-cmds.el (c-mask-paragraph, c-fill-paragraph): | 8444 | * progmodes/cc-cmds.el (c-mask-paragraph, c-fill-paragraph): |
| 8130 | Fix for the case that a C style comment has its delimiters alone on | 8445 | Fix for the case that a C style comment has its delimiters alone on |
| 8131 | their respective lines. | 8446 | their respective lines. (Bug#193) |
| 8132 | 8447 | ||
| 8133 | 2010-08-06 Michael Albinus <michael.albinus@gmx.de> | 8448 | 2010-08-06 Michael Albinus <michael.albinus@gmx.de> |
| 8134 | 8449 | ||
| @@ -10903,7 +11218,7 @@ | |||
| 10903 | 11218 | ||
| 10904 | * textmodes/ispell.el (ispell-init-process): Fix personal dictionary | 11219 | * textmodes/ispell.el (ispell-init-process): Fix personal dictionary |
| 10905 | condition in default directory check. | 11220 | condition in default directory check. |
| 10906 | (ispell-init-process,ispell-kill-ispell,kill-buffer-hook): | 11221 | (ispell-init-process, ispell-kill-ispell, kill-buffer-hook): |
| 10907 | Kill ispell process when killing its associated buffer. | 11222 | Kill ispell process when killing its associated buffer. |
| 10908 | 11223 | ||
| 10909 | 2010-04-27 Jan Djärv <jan.h.d@swipnet.se> | 11224 | 2010-04-27 Jan Djärv <jan.h.d@swipnet.se> |
| @@ -15633,7 +15948,7 @@ | |||
| 15633 | * vc-rcs.el (vc-rcs-print-log): | 15948 | * vc-rcs.el (vc-rcs-print-log): |
| 15634 | * vc-git.el (vc-git-print-log): | 15949 | * vc-git.el (vc-git-print-log): |
| 15635 | * vc-cvs.el (vc-cvs-print-log): Add new optional argument LIMIT, | 15950 | * vc-cvs.el (vc-cvs-print-log): Add new optional argument LIMIT, |
| 15636 | ignore it. Make the BUFFER argument non-optional | 15951 | ignore it. Make the BUFFER argument non-optional. |
| 15637 | 15952 | ||
| 15638 | * bindings.el (mode-line-buffer-identification): Do not purecopy. | 15953 | * bindings.el (mode-line-buffer-identification): Do not purecopy. |
| 15639 | 15954 | ||
| @@ -20387,12 +20702,12 @@ | |||
| 20387 | 2009-08-19 Magnus Henoch <magnus.henoch@gmail.com> | 20702 | 2009-08-19 Magnus Henoch <magnus.henoch@gmail.com> |
| 20388 | 20703 | ||
| 20389 | * log-edit.el (log-edit-strip-single-file-name): New var. | 20704 | * log-edit.el (log-edit-strip-single-file-name): New var. |
| 20390 | (log-edit-insert-changelog): Use it. Bug#3571 | 20705 | (log-edit-insert-changelog): Use it. Bug#3571. |
| 20391 | 20706 | ||
| 20392 | 2009-08-19 Stefan Monnier <monnier@iro.umontreal.ca> | 20707 | 2009-08-19 Stefan Monnier <monnier@iro.umontreal.ca> |
| 20393 | 20708 | ||
| 20394 | * subr.el (read-passwd): Use read-key so keypad keys work as well. | 20709 | * subr.el (read-passwd): Use read-key so keypad keys work as well. |
| 20395 | Bug#3287 | 20710 | Bug#3287. |
| 20396 | 20711 | ||
| 20397 | * help.el (help-print-return-message): Rename from | 20712 | * help.el (help-print-return-message): Rename from |
| 20398 | print-help-return-message. | 20713 | print-help-return-message. |
| @@ -22156,7 +22471,7 @@ | |||
| 22156 | or shell command text during AUTO expansion. Suggested by Tad Truex. | 22471 | or shell command text during AUTO expansion. Suggested by Tad Truex. |
| 22157 | (verilog-read-sub-decls-expr, verilog-read-sub-decls-line) | 22472 | (verilog-read-sub-decls-expr, verilog-read-sub-decls-line) |
| 22158 | (verilog-read-sub-decls-sig, verilog-symbol-detick-text): | 22473 | (verilog-read-sub-decls-sig, verilog-symbol-detick-text): |
| 22159 | Fix dotted nets {a.b,c.d} and excaped identifiers being mis-included | 22474 | Fix dotted nets {a.b,c.d} and escaped identifiers being mis-included |
| 22160 | in AUTOINOUT. Reported by Matthew Lovell. | 22475 | in AUTOINOUT. Reported by Matthew Lovell. |
| 22161 | (verilog-read-always-signals-recurse): Fix AUTORESET "if (a<=b)" | 22476 | (verilog-read-always-signals-recurse): Fix AUTORESET "if (a<=b)" |
| 22162 | causing use of <= assignments. Reported by Alex Reed. | 22477 | causing use of <= assignments. Reported by Alex Reed. |
diff --git a/lisp/allout.el b/lisp/allout.el index ca72806b7d9..c75b7a22f9a 100644 --- a/lisp/allout.el +++ b/lisp/allout.el | |||
| @@ -234,7 +234,7 @@ Use vector format for the keys: | |||
| 234 | - put literal keys after a '?' question mark, eg: '?a', '?.' | 234 | - put literal keys after a '?' question mark, eg: '?a', '?.' |
| 235 | - enclose control, shift, or meta-modified keys as sequences within | 235 | - enclose control, shift, or meta-modified keys as sequences within |
| 236 | parentheses, with the literal key, as above, preceded by the name(s) | 236 | parentheses, with the literal key, as above, preceded by the name(s) |
| 237 | of the modifers, eg: [(control ?a)] | 237 | of the modifiers, eg: [(control ?a)] |
| 238 | See the existing keys for examples. | 238 | See the existing keys for examples. |
| 239 | 239 | ||
| 240 | Functions can be bound to multiple keys, but binding keys to | 240 | Functions can be bound to multiple keys, but binding keys to |
| @@ -261,7 +261,7 @@ Use vector format for the keys: | |||
| 261 | - put literal keys after a '?' question mark, eg: '?a', '?.' | 261 | - put literal keys after a '?' question mark, eg: '?a', '?.' |
| 262 | - enclose control, shift, or meta-modified keys as sequences within | 262 | - enclose control, shift, or meta-modified keys as sequences within |
| 263 | parentheses, with the literal key, as above, preceded by the name(s) | 263 | parentheses, with the literal key, as above, preceded by the name(s) |
| 264 | of the modifers, eg: [(control ?a)] | 264 | of the modifiers, eg: [(control ?a)] |
| 265 | See the existing keys for examples." | 265 | See the existing keys for examples." |
| 266 | :type 'allout-keybindings-binding | 266 | :type 'allout-keybindings-binding |
| 267 | :group 'allout-keybindings | 267 | :group 'allout-keybindings |
| @@ -1642,7 +1642,7 @@ So `allout-post-command-business' should not reactivate it...") | |||
| 1642 | (defun allout-init (mode) | 1642 | (defun allout-init (mode) |
| 1643 | "DEPRECATED - configure allout activation by customizing | 1643 | "DEPRECATED - configure allout activation by customizing |
| 1644 | `allout-auto-activation'. This function remains around, limited | 1644 | `allout-auto-activation'. This function remains around, limited |
| 1645 | from what it did before, for backwards compatability. | 1645 | from what it did before, for backwards compatibility. |
| 1646 | 1646 | ||
| 1647 | MODE is the activation mode - see `allout-auto-activation' for | 1647 | MODE is the activation mode - see `allout-auto-activation' for |
| 1648 | valid values." | 1648 | valid values." |
diff --git a/lisp/bookmark.el b/lisp/bookmark.el index cd946e46be9..d3db54c81d4 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el | |||
| @@ -2181,7 +2181,8 @@ This also runs `bookmark-exit-hook'." | |||
| 2181 | (bookmark-time-to-save-p t) | 2181 | (bookmark-time-to-save-p t) |
| 2182 | (bookmark-save))) | 2182 | (bookmark-save))) |
| 2183 | 2183 | ||
| 2184 | (add-hook 'kill-emacs-hook 'bookmark-exit-hook-internal) | 2184 | (unless noninteractive |
| 2185 | (add-hook 'kill-emacs-hook 'bookmark-exit-hook-internal)) | ||
| 2185 | 2186 | ||
| 2186 | (defun bookmark-unload-function () | 2187 | (defun bookmark-unload-function () |
| 2187 | "Unload the Bookmark library." | 2188 | "Unload the Bookmark library." |
diff --git a/lisp/calc/calc-ext.el b/lisp/calc/calc-ext.el index ec4e902f33d..11a26d6d125 100644 --- a/lisp/calc/calc-ext.el +++ b/lisp/calc/calc-ext.el | |||
| @@ -423,12 +423,16 @@ | |||
| 423 | 423 | ||
| 424 | (define-key calc-mode-map "l" nil) | 424 | (define-key calc-mode-map "l" nil) |
| 425 | (define-key calc-mode-map "lq" 'calc-logunits-quantity) | 425 | (define-key calc-mode-map "lq" 'calc-logunits-quantity) |
| 426 | (define-key calc-mode-map "ld" 'calc-logunits-dblevel) | 426 | (define-key calc-mode-map "ld" 'calc-dblevel) |
| 427 | (define-key calc-mode-map "ln" 'calc-logunits-nplevel) | 427 | (define-key calc-mode-map "ln" 'calc-nplevel) |
| 428 | (define-key calc-mode-map "l+" 'calc-logunits-add) | 428 | (define-key calc-mode-map "l+" 'calc-logunits-add) |
| 429 | (define-key calc-mode-map "l-" 'calc-logunits-sub) | 429 | (define-key calc-mode-map "l-" 'calc-logunits-sub) |
| 430 | (define-key calc-mode-map "l*" 'calc-logunits-mul) | 430 | (define-key calc-mode-map "l*" 'calc-logunits-mul) |
| 431 | (define-key calc-mode-map "l/" 'calc-logunits-divide) | 431 | (define-key calc-mode-map "l/" 'calc-logunits-divide) |
| 432 | (define-key calc-mode-map "ls" 'calc-spn) | ||
| 433 | (define-key calc-mode-map "lm" 'calc-midi) | ||
| 434 | (define-key calc-mode-map "lf" 'calc-freq) | ||
| 435 | |||
| 432 | (define-key calc-mode-map "l?" 'calc-l-prefix-help) | 436 | (define-key calc-mode-map "l?" 'calc-l-prefix-help) |
| 433 | 437 | ||
| 434 | (define-key calc-mode-map "m" nil) | 438 | (define-key calc-mode-map "m" nil) |
| @@ -944,7 +948,7 @@ calcFunc-lupoweradd calcFunc-lufieldsub calcFunc-lupowersub | |||
| 944 | calcFunc-lufieldmul calcFunc-lupowermul calcFunc-lufielddiv | 948 | calcFunc-lufieldmul calcFunc-lupowermul calcFunc-lufielddiv |
| 945 | calcFunc-lupowerdiv calcFunc-fieldquant calcFunc-powerquant | 949 | calcFunc-lupowerdiv calcFunc-fieldquant calcFunc-powerquant |
| 946 | calcFunc-dbfieldlevel calcFunc-dbpowerlevel calcFunc-npfieldlevel | 950 | calcFunc-dbfieldlevel calcFunc-dbpowerlevel calcFunc-npfieldlevel |
| 947 | calcFunc-nppowerlevel | 951 | calcFunc-nppowerlevel calcFunc-spn calcFunc-midi calcFunc-freq |
| 948 | math-build-units-table math-build-units-table-buffer | 952 | math-build-units-table math-build-units-table-buffer |
| 949 | math-check-unit-name math-convert-temperature math-convert-units | 953 | math-check-unit-name math-convert-temperature math-convert-units |
| 950 | math-extract-units math-remove-units math-simplify-units | 954 | math-extract-units math-remove-units math-simplify-units |
| @@ -1176,9 +1180,10 @@ calc-convert-temperature calc-convert-units calc-define-unit | |||
| 1176 | calc-enter-units-table calc-explain-units calc-extract-units | 1180 | calc-enter-units-table calc-explain-units calc-extract-units |
| 1177 | calc-get-unit-definition calc-permanent-units calc-quick-units | 1181 | calc-get-unit-definition calc-permanent-units calc-quick-units |
| 1178 | calc-remove-units calc-simplify-units calc-undefine-unit | 1182 | calc-remove-units calc-simplify-units calc-undefine-unit |
| 1179 | calc-view-units-table calc-logunits-quantity calc-logunits-dblevel | 1183 | calc-view-units-table calc-logunits-quantity calc-dblevel |
| 1180 | calc-logunits-nplevel calc-logunits-add calc-logunits-sub | 1184 | calc-nplevel calc-logunits-add calc-logunits-sub |
| 1181 | calc-logunits-mul calc-logunits-divide) | 1185 | calc-logunits-mul calc-logunits-divide calc-spn calc-midi |
| 1186 | calc-freq) | ||
| 1182 | 1187 | ||
| 1183 | ("calc-vec" calc-arrange-vector calc-build-vector calc-cnorm | 1188 | ("calc-vec" calc-arrange-vector calc-build-vector calc-cnorm |
| 1184 | calc-conj-transpose calc-cons calc-cross calc-kron calc-diag | 1189 | calc-conj-transpose calc-cons calc-cross calc-kron calc-diag |
diff --git a/lisp/calc/calc-units.el b/lisp/calc/calc-units.el index e6a6fb01132..7f0adc9fe7e 100644 --- a/lisp/calc/calc-units.el +++ b/lisp/calc/calc-units.el | |||
| @@ -960,7 +960,10 @@ If EXPR is nil, return nil." | |||
| 960 | (if (eq base 'pi) | 960 | (if (eq base 'pi) |
| 961 | (math-pi) | 961 | (math-pi) |
| 962 | expr))) | 962 | expr))) |
| 963 | (if (Math-primp expr) | 963 | (if (or |
| 964 | (Math-primp expr) | ||
| 965 | (and (eq (car-safe expr) 'calcFunc-subscr) | ||
| 966 | (eq (car-safe (nth 1 expr)) 'var))) | ||
| 964 | expr | 967 | expr |
| 965 | (cons (car expr) | 968 | (cons (car expr) |
| 966 | (mapcar 'math-to-standard-rec (cdr expr)))))) | 969 | (mapcar 'math-to-standard-rec (cdr expr)))))) |
| @@ -1834,7 +1837,7 @@ In symbolic mode, return the list (^ a b)." | |||
| 1834 | (setq ref (math-read-expr calc-logunits-power-reference))) | 1837 | (setq ref (math-read-expr calc-logunits-power-reference))) |
| 1835 | (math-logunits-level val ref nil t)) | 1838 | (math-logunits-level val ref nil t)) |
| 1836 | 1839 | ||
| 1837 | (defun calc-logunits-dblevel (arg) | 1840 | (defun calc-dblevel (arg) |
| 1838 | (interactive "P") | 1841 | (interactive "P") |
| 1839 | (calc-slow-wrapper | 1842 | (calc-slow-wrapper |
| 1840 | (if (calc-is-hyperbolic) | 1843 | (if (calc-is-hyperbolic) |
| @@ -1845,7 +1848,7 @@ In symbolic mode, return the list (^ a b)." | |||
| 1845 | (calc-binary-op "ludb" 'calcFunc-dbpowerlevel arg) | 1848 | (calc-binary-op "ludb" 'calcFunc-dbpowerlevel arg) |
| 1846 | (calc-unary-op "ludb" 'calcFunc-dbpowerlevel arg))))) | 1849 | (calc-unary-op "ludb" 'calcFunc-dbpowerlevel arg))))) |
| 1847 | 1850 | ||
| 1848 | (defun calc-logunits-nplevel (arg) | 1851 | (defun calc-nplevel (arg) |
| 1849 | (interactive "P") | 1852 | (interactive "P") |
| 1850 | (calc-slow-wrapper | 1853 | (calc-slow-wrapper |
| 1851 | (if (calc-is-hyperbolic) | 1854 | (if (calc-is-hyperbolic) |
| @@ -1856,6 +1859,222 @@ In symbolic mode, return the list (^ a b)." | |||
| 1856 | (calc-binary-op "lunp" 'calcFunc-nppowerlevel arg) | 1859 | (calc-binary-op "lunp" 'calcFunc-nppowerlevel arg) |
| 1857 | (calc-unary-op "lunp" 'calcFunc-nppowerlevel arg))))) | 1860 | (calc-unary-op "lunp" 'calcFunc-nppowerlevel arg))))) |
| 1858 | 1861 | ||
| 1862 | ;;; Musical notes | ||
| 1863 | |||
| 1864 | |||
| 1865 | (defvar calc-note-threshold) | ||
| 1866 | |||
| 1867 | (defun math-midi-round (num) | ||
| 1868 | "Round NUM to an integer N if NUM is within calc-note-threshold cents of N." | ||
| 1869 | (let* ((n (math-round num)) | ||
| 1870 | (diff (math-abs | ||
| 1871 | (math-sub num n)))) | ||
| 1872 | (if (< (math-compare diff | ||
| 1873 | (math-div (math-read-expr calc-note-threshold) 100)) 0) | ||
| 1874 | n | ||
| 1875 | num))) | ||
| 1876 | |||
| 1877 | (defconst math-notes | ||
| 1878 | '(((var C var-C) . 0) | ||
| 1879 | ((var Csharp var-Csharp) . 1) | ||
| 1880 | ; ((var C♯ var-C♯) . 1) | ||
| 1881 | ((var Dflat var-Dflat) . 1) | ||
| 1882 | ; ((var D♭ var-D♭) . 1) | ||
| 1883 | ((var D var-D) . 2) | ||
| 1884 | ((var Dsharp var-Dsharp) . 3) | ||
| 1885 | ; ((var D♯ var-D♯) . 3) | ||
| 1886 | ((var E var-E) . 4) | ||
| 1887 | ((var F var-F) . 5) | ||
| 1888 | ((var Fsharp var-Fsharp) . 6) | ||
| 1889 | ; ((var F♯ var-F♯) . 6) | ||
| 1890 | ((var Gflat var-Gflat) . 6) | ||
| 1891 | ; ((var G♭ var-G♭) . 6) | ||
| 1892 | ((var G var-G) . 7) | ||
| 1893 | ((var Gsharp var-Gsharp) . 8) | ||
| 1894 | ; ((var G♯ var-G♯) . 8) | ||
| 1895 | ((var A var-A) . 9) | ||
| 1896 | ((var Asharp var-Asharp) . 10) | ||
| 1897 | ; ((var A♯ var-A♯) . 10) | ||
| 1898 | ((var Bflat var-Bflat) . 10) | ||
| 1899 | ; ((var B♭ var-B♭) . 10) | ||
| 1900 | ((var B var-B) . 11)) | ||
| 1901 | "An alist of notes with their number of semitones above C.") | ||
| 1902 | |||
| 1903 | (defun math-freqp (freq) | ||
| 1904 | "Non-nil if FREQ is a positive number times the unit Hz. | ||
| 1905 | If non-nil, return the coefficient of Hz." | ||
| 1906 | (let ((freqcoef (math-simplify-units | ||
| 1907 | (math-div freq '(var Hz var-Hz))))) | ||
| 1908 | (if (Math-posp freqcoef) freqcoef))) | ||
| 1909 | |||
| 1910 | (defun math-midip (num) | ||
| 1911 | "Non-nil if NUM is a possible MIDI note number. | ||
| 1912 | If non-nil, return NUM." | ||
| 1913 | (if (Math-numberp num) num)) | ||
| 1914 | |||
| 1915 | (defun math-spnp (spn) | ||
| 1916 | "Non-nil if NUM is a scientific pitch note (note + cents). | ||
| 1917 | If non-nil, return a list consisting of the note and the cents coefficient." | ||
| 1918 | (let (note cents rnote rcents) | ||
| 1919 | (if (eq (car-safe spn) '+) | ||
| 1920 | (setq note (nth 1 spn) | ||
| 1921 | cents (nth 2 spn)) | ||
| 1922 | (setq note spn | ||
| 1923 | cents nil)) | ||
| 1924 | (cond | ||
| 1925 | ((and ;; NOTE is a note, CENTS is nil or cents. | ||
| 1926 | (eq (car-safe note) 'calcFunc-subscr) | ||
| 1927 | (assoc (nth 1 note) math-notes) | ||
| 1928 | (integerp (nth 2 note)) | ||
| 1929 | (setq rnote note) | ||
| 1930 | (or | ||
| 1931 | (not cents) | ||
| 1932 | (Math-numberp (setq rcents | ||
| 1933 | (math-simplify | ||
| 1934 | (math-div cents '(var cents var-cents))))))) | ||
| 1935 | (list rnote rcents)) | ||
| 1936 | ((and ;; CENTS is a note, NOTE is cents. | ||
| 1937 | (eq (car-safe cents) 'calcFunc-subscr) | ||
| 1938 | (assoc (nth 1 cents) math-notes) | ||
| 1939 | (integerp (nth 2 cents)) | ||
| 1940 | (setq rnote cents) | ||
| 1941 | (or | ||
| 1942 | (not note) | ||
| 1943 | (Math-numberp (setq rcents | ||
| 1944 | (math-simplify | ||
| 1945 | (math-div note '(var cents var-cents))))))) | ||
| 1946 | (list rnote rcents))))) | ||
| 1947 | |||
| 1948 | (defun math-freq-to-midi (freq) | ||
| 1949 | "Return the midi note number corresponding to FREQ Hz." | ||
| 1950 | (let ((midi (math-add | ||
| 1951 | 69 | ||
| 1952 | (math-mul | ||
| 1953 | 12 | ||
| 1954 | (calcFunc-log | ||
| 1955 | (math-div freq 440) | ||
| 1956 | 2))))) | ||
| 1957 | (math-midi-round midi))) | ||
| 1958 | |||
| 1959 | (defun math-spn-to-midi (spn) | ||
| 1960 | "Return the MIDI number corresponding to SPN." | ||
| 1961 | (let* ((note (cdr (assoc (nth 1 (car spn)) math-notes))) | ||
| 1962 | (octave (math-add (nth 2 (car spn)) 1)) | ||
| 1963 | (cents (nth 1 spn)) | ||
| 1964 | (midi (math-add | ||
| 1965 | (math-mul 12 octave) | ||
| 1966 | note))) | ||
| 1967 | (if cents | ||
| 1968 | (math-add midi (math-div cents 100)) | ||
| 1969 | midi))) | ||
| 1970 | |||
| 1971 | (defun math-midi-to-spn (midi) | ||
| 1972 | "Return the scientific pitch notation corresponding to midi number MIDI." | ||
| 1973 | (let (midin cents) | ||
| 1974 | (if (math-integerp midi) | ||
| 1975 | (setq midin midi | ||
| 1976 | cents nil) | ||
| 1977 | (setq midin (math-floor midi) | ||
| 1978 | cents (math-mul 100 (math-sub midi midin)))) | ||
| 1979 | (let* ((nr ;; This should be (math-idivmod midin 12), but with | ||
| 1980 | ;; better behavior for negative midin. | ||
| 1981 | (if (Math-negp midin) | ||
| 1982 | (let ((dm (math-idivmod (math-neg midin) 12))) | ||
| 1983 | (if (= (cdr dm) 0) | ||
| 1984 | (cons (math-neg (car dm)) 0) | ||
| 1985 | (cons | ||
| 1986 | (math-sub (math-neg (car dm)) 1) | ||
| 1987 | (math-sub 12 (cdr dm))))) | ||
| 1988 | (math-idivmod midin 12))) | ||
| 1989 | (n (math-sub (car nr) 1)) | ||
| 1990 | (note (car (rassoc (cdr nr) math-notes)))) | ||
| 1991 | (if cents | ||
| 1992 | (list '+ (list 'calcFunc-subscr note n) | ||
| 1993 | (list '* cents '(var cents var-cents))) | ||
| 1994 | (list 'calcFunc-subscr note n))))) | ||
| 1995 | |||
| 1996 | (defun math-freq-to-spn (freq) | ||
| 1997 | "Return the scientific pitch notation corresponding to FREQ Hz." | ||
| 1998 | (math-with-extra-prec 3 | ||
| 1999 | (math-midi-to-spn (math-freq-to-midi freq)))) | ||
| 2000 | |||
| 2001 | (defun math-midi-to-freq (midi) | ||
| 2002 | "Return the frequency of the note with midi number MIDI." | ||
| 2003 | (list '* | ||
| 2004 | (math-mul | ||
| 2005 | 440 | ||
| 2006 | (math-pow | ||
| 2007 | 2 | ||
| 2008 | (math-div | ||
| 2009 | (math-sub | ||
| 2010 | midi | ||
| 2011 | 69) | ||
| 2012 | 12))) | ||
| 2013 | '(var Hz var-Hz))) | ||
| 2014 | |||
| 2015 | (defun math-spn-to-freq (spn) | ||
| 2016 | "Return the frequency of the note with scientific pitch notation SPN." | ||
| 2017 | (math-midi-to-freq (math-spn-to-midi spn))) | ||
| 2018 | |||
| 2019 | (defun calcFunc-spn (expr) | ||
| 2020 | "Return EXPR written as scientific pitch notation + cents." | ||
| 2021 | ;; Get the coeffecient of Hz | ||
| 2022 | (let (note) | ||
| 2023 | (cond | ||
| 2024 | ((setq note (math-freqp expr)) | ||
| 2025 | (math-freq-to-spn note)) | ||
| 2026 | ((setq note (math-midip expr)) | ||
| 2027 | (math-midi-to-spn note)) | ||
| 2028 | ((math-spnp expr) | ||
| 2029 | expr) | ||
| 2030 | (t | ||
| 2031 | (math-reject-arg expr "*Improper expression"))))) | ||
| 2032 | |||
| 2033 | (defun calcFunc-midi (expr) | ||
| 2034 | "Return EXPR written as a MIDI number." | ||
| 2035 | (let (note) | ||
| 2036 | (cond | ||
| 2037 | ((setq note (math-freqp expr)) | ||
| 2038 | (math-freq-to-midi note)) | ||
| 2039 | ((setq note (math-spnp expr)) | ||
| 2040 | (math-spn-to-midi note)) | ||
| 2041 | ((math-midip expr) | ||
| 2042 | expr) | ||
| 2043 | (t | ||
| 2044 | (math-reject-arg expr "*Improper expression"))))) | ||
| 2045 | |||
| 2046 | (defun calcFunc-freq (expr) | ||
| 2047 | "Return the frequency corresponding to EXPR." | ||
| 2048 | (let (note) | ||
| 2049 | (cond | ||
| 2050 | ((setq note (math-midip expr)) | ||
| 2051 | (math-midi-to-freq note)) | ||
| 2052 | ((setq note (math-spnp expr)) | ||
| 2053 | (math-spn-to-freq note)) | ||
| 2054 | ((math-freqp expr) | ||
| 2055 | expr) | ||
| 2056 | (t | ||
| 2057 | (math-reject-arg expr "*Improper expression"))))) | ||
| 2058 | |||
| 2059 | (defun calc-freq (arg) | ||
| 2060 | "Return the frequency corresponding to the expression on the stack." | ||
| 2061 | (interactive "P") | ||
| 2062 | (calc-slow-wrapper | ||
| 2063 | (calc-unary-op "freq" 'calcFunc-freq arg))) | ||
| 2064 | |||
| 2065 | (defun calc-midi (arg) | ||
| 2066 | "Return the MIDI number corresponding to the expression on the stack." | ||
| 2067 | (interactive "P") | ||
| 2068 | (calc-slow-wrapper | ||
| 2069 | (calc-unary-op "midi" 'calcFunc-midi arg))) | ||
| 2070 | |||
| 2071 | (defun calc-spn (arg) | ||
| 2072 | "Return the scientific pitch notation corresponding to the expression on the stack." | ||
| 2073 | (interactive "P") | ||
| 2074 | (calc-slow-wrapper | ||
| 2075 | (calc-unary-op "spn" 'calcFunc-spn arg))) | ||
| 2076 | |||
| 2077 | |||
| 1859 | (provide 'calc-units) | 2078 | (provide 'calc-units) |
| 1860 | 2079 | ||
| 1861 | ;; Local variables: | 2080 | ;; Local variables: |
diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el index 72ddddeb32d..f4d8983eb88 100644 --- a/lisp/calc/calc.el +++ b/lisp/calc/calc.el | |||
| @@ -446,6 +446,11 @@ by displaying the sub-formula in `calc-selected-face'." | |||
| 446 | :group 'calc | 446 | :group 'calc |
| 447 | :type '(string)) | 447 | :type '(string)) |
| 448 | 448 | ||
| 449 | (defcustom calc-note-threshold "1" | ||
| 450 | "The number of cents that a frequency should be near a note | ||
| 451 | to be identified as that note." | ||
| 452 | :type 'string | ||
| 453 | :group 'calc) | ||
| 449 | 454 | ||
| 450 | (defface calc-nonselected-face | 455 | (defface calc-nonselected-face |
| 451 | '((t :inherit shadow | 456 | '((t :inherit shadow |
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index d43d2607c9a..88821652784 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el | |||
| @@ -920,6 +920,8 @@ it were the arg to `interactive' (which see) to interactively read the value. | |||
| 920 | 920 | ||
| 921 | If the variable has a `custom-type' property, it must be a widget and the | 921 | If the variable has a `custom-type' property, it must be a widget and the |
| 922 | `:prompt-value' property of that widget will be used for reading the value. | 922 | `:prompt-value' property of that widget will be used for reading the value. |
| 923 | If the variable also has a `custom-get' property, that is used for finding | ||
| 924 | the current value of the variable, otherwise `symbol-value' is used. | ||
| 923 | 925 | ||
| 924 | If optional COMMENT argument is non-nil, also prompt for a comment and return | 926 | If optional COMMENT argument is non-nil, also prompt for a comment and return |
| 925 | it as the third element in the list." | 927 | it as the third element in the list." |
| @@ -941,7 +943,9 @@ it as the third element in the list." | |||
| 941 | (widget-prompt-value type | 943 | (widget-prompt-value type |
| 942 | prompt | 944 | prompt |
| 943 | (if (boundp var) | 945 | (if (boundp var) |
| 944 | (symbol-value var)) | 946 | (funcall |
| 947 | (or (get var 'custom-get) 'symbol-value) | ||
| 948 | var)) | ||
| 945 | (not (boundp var)))) | 949 | (not (boundp var)))) |
| 946 | (t | 950 | (t |
| 947 | (eval-minibuffer prompt)))))) | 951 | (eval-minibuffer prompt)))))) |
| @@ -1599,7 +1603,7 @@ Otherwise use brackets." | |||
| 1599 | 'editable-field | 1603 | 'editable-field |
| 1600 | :size 40 :help-echo echo | 1604 | :size 40 :help-echo echo |
| 1601 | :action `(lambda (widget &optional event) | 1605 | :action `(lambda (widget &optional event) |
| 1602 | (customize-apropos (widget-value widget)))))) | 1606 | (customize-apropos (split-string (widget-value widget))))))) |
| 1603 | (widget-insert " ") | 1607 | (widget-insert " ") |
| 1604 | (widget-create-child-and-convert | 1608 | (widget-create-child-and-convert |
| 1605 | search-widget 'push-button | 1609 | search-widget 'push-button |
diff --git a/lisp/desktop.el b/lisp/desktop.el index 4ca4cec38ff..fd5baaf020f 100644 --- a/lisp/desktop.el +++ b/lisp/desktop.el | |||
| @@ -611,7 +611,8 @@ Furthermore, it clears the variables listed in `desktop-globals-to-clear'." | |||
| 611 | (delete-other-windows)) | 611 | (delete-other-windows)) |
| 612 | 612 | ||
| 613 | ;; ---------------------------------------------------------------------------- | 613 | ;; ---------------------------------------------------------------------------- |
| 614 | (add-hook 'kill-emacs-hook 'desktop-kill) | 614 | (unless noninteractive |
| 615 | (add-hook 'kill-emacs-hook 'desktop-kill)) | ||
| 615 | 616 | ||
| 616 | (defun desktop-kill () | 617 | (defun desktop-kill () |
| 617 | "If `desktop-save-mode' is non-nil, do what `desktop-save' says to do. | 618 | "If `desktop-save-mode' is non-nil, do what `desktop-save' says to do. |
diff --git a/lisp/dired-x.el b/lisp/dired-x.el index 81f77b48289..a5063bb77dd 100644 --- a/lisp/dired-x.el +++ b/lisp/dired-x.el | |||
| @@ -436,6 +436,7 @@ move to its line in dired." | |||
| 436 | (dired-omit-mode) | 436 | (dired-omit-mode) |
| 437 | (dired-goto-file file))))))) | 437 | (dired-goto-file file))))))) |
| 438 | 438 | ||
| 439 | ;;;###autoload | ||
| 439 | (defun dired-jump-other-window (&optional file-name) | 440 | (defun dired-jump-other-window (&optional file-name) |
| 440 | "Like \\[dired-jump] (`dired-jump') but in other window." | 441 | "Like \\[dired-jump] (`dired-jump') but in other window." |
| 441 | (interactive | 442 | (interactive |
| @@ -704,15 +705,26 @@ Also useful for `auto-mode-alist' like this: | |||
| 704 | (dired-current-directory) | 705 | (dired-current-directory) |
| 705 | default-directory))) | 706 | default-directory))) |
| 706 | "Alist of major modes and their opinion on `default-directory'. | 707 | "Alist of major modes and their opinion on `default-directory'. |
| 707 | This is given as a Lisp expression to evaluate. A resulting value of | 708 | Each element has the form (MAJOR . EXPRESSION). |
| 708 | nil is ignored in favor of `default-directory'.") | 709 | The function `dired-default-directory' evaluates EXPRESSION to |
| 710 | determine a default directory.") | ||
| 711 | |||
| 712 | (put 'dired-default-directory-alist 'risky-local-variable t) ; gets eval'd | ||
| 713 | (make-obsolete-variable 'dired-default-directory-alist | ||
| 714 | "this feature is due to be removed." "24.1") | ||
| 709 | 715 | ||
| 710 | (defun dired-default-directory () | 716 | (defun dired-default-directory () |
| 711 | "Usage like variable `default-directory'. | 717 | "Return the `dired-default-directory-alist' entry for the current major-mode. |
| 712 | Knows about the special cases in variable `dired-default-directory-alist'." | 718 | If none, return `default-directory'." |
| 713 | (or (eval (cdr (assq major-mode dired-default-directory-alist))) | 719 | (or (eval (cdr (assq major-mode dired-default-directory-alist))) |
| 714 | default-directory)) | 720 | default-directory)) |
| 715 | 721 | ||
| 722 | ;; It looks like this was intended to be something of a "general" feature, | ||
| 723 | ;; but it only ever seems to have been used in dired-smart-shell-command, | ||
| 724 | ;; and does not seem worth keeping around (?). | ||
| 725 | (make-obsolete 'dired-default-directory | ||
| 726 | "this feature is due to be removed." "24.1") | ||
| 727 | |||
| 716 | (defun dired-smart-shell-command (command &optional output-buffer error-buffer) | 728 | (defun dired-smart-shell-command (command &optional output-buffer error-buffer) |
| 717 | "Like function `shell-command', but in the current Virtual Dired directory." | 729 | "Like function `shell-command', but in the current Virtual Dired directory." |
| 718 | (interactive | 730 | (interactive |
| @@ -723,7 +735,9 @@ Knows about the special cases in variable `dired-default-directory-alist'." | |||
| 723 | ((eq major-mode 'dired-mode) (dired-get-filename t t)))) | 735 | ((eq major-mode 'dired-mode) (dired-get-filename t t)))) |
| 724 | current-prefix-arg | 736 | current-prefix-arg |
| 725 | shell-command-default-error-buffer)) | 737 | shell-command-default-error-buffer)) |
| 726 | (let ((default-directory (dired-default-directory))) | 738 | (let ((default-directory (or (and (eq major-mode 'dired-mode) |
| 739 | (dired-current-directory)) | ||
| 740 | default-directory))) | ||
| 727 | (shell-command command output-buffer error-buffer))) | 741 | (shell-command command output-buffer error-buffer))) |
| 728 | 742 | ||
| 729 | 743 | ||
| @@ -846,7 +860,7 @@ replace it with a dir-locals-file `./%s'" | |||
| 846 | ;; NOTE: Use `gunzip -c' instead of `zcat' on `.gz' files. Some do not | 860 | ;; NOTE: Use `gunzip -c' instead of `zcat' on `.gz' files. Some do not |
| 847 | ;; install GNU zip's version of zcat. | 861 | ;; install GNU zip's version of zcat. |
| 848 | 862 | ||
| 849 | (declare-function Man-support-local-filenames "man" ()) | 863 | (autoload 'Man-support-local-filenames "man") |
| 850 | 864 | ||
| 851 | (defvar dired-guess-shell-alist-default | 865 | (defvar dired-guess-shell-alist-default |
| 852 | (list | 866 | (list |
| @@ -939,20 +953,27 @@ replace it with a dir-locals-file `./%s'" | |||
| 939 | " " dired-guess-shell-znew-switches)) | 953 | " " dired-guess-shell-znew-switches)) |
| 940 | 954 | ||
| 941 | ;; The following four extensions are useful with dired-man ("N" key) | 955 | ;; The following four extensions are useful with dired-man ("N" key) |
| 942 | (list "\\.\\(?:[0-9]\\|man\\)\\'" '(progn (require 'man) | 956 | ;; FIXME "man ./" does not work with dired-do-shell-command, |
| 943 | (if (Man-support-local-filenames) | 957 | ;; because there seems to be no way for us to modify the filename, |
| 944 | "man -l" | 958 | ;; only the command. Hmph. `dired-man' works though. |
| 945 | "cat * | tbl | nroff -man -h"))) | 959 | (list "\\.\\(?:[0-9]\\|man\\)\\'" '(let ((loc (Man-support-local-filenames))) |
| 946 | (list "\\.\\(?:[0-9]\\|man\\)\\.g?z\\'" '(progn (require 'man) | 960 | (cond ((eq loc 'man-db) "man -l") |
| 947 | (if (Man-support-local-filenames) | 961 | ((eq loc 'man) "man ./") |
| 948 | "man -l" | 962 | (t |
| 949 | "gunzip -qc * | tbl | nroff -man -h")) | 963 | "cat * | tbl | nroff -man -h")))) |
| 964 | (list "\\.\\(?:[0-9]\\|man\\)\\.g?z\\'" | ||
| 965 | '(let ((loc (Man-support-local-filenames))) | ||
| 966 | (cond ((eq loc 'man-db) | ||
| 967 | "man -l") | ||
| 968 | ((eq loc 'man) | ||
| 969 | "man ./") | ||
| 970 | (t "gunzip -qc * | tbl | nroff -man -h"))) | ||
| 950 | ;; Optional decompression. | 971 | ;; Optional decompression. |
| 951 | '(concat "gunzip" (if dired-guess-shell-gzip-quiet " -q"))) | 972 | '(concat "gunzip" (if dired-guess-shell-gzip-quiet " -q"))) |
| 952 | (list "\\.[0-9]\\.Z\\'" '(progn (require 'man) | 973 | (list "\\.[0-9]\\.Z\\'" '(let ((loc (Man-support-local-filenames))) |
| 953 | (if (Man-support-local-filenames) | 974 | (cond ((eq loc 'man-db) "man -l") |
| 954 | "man -l" | 975 | ((eq loc 'man) "man ./") |
| 955 | "zcat * | tbl | nroff -man -h")) | 976 | (t "zcat * | tbl | nroff -man -h"))) |
| 956 | ;; Optional conversion to gzip format. | 977 | ;; Optional conversion to gzip format. |
| 957 | '(concat "znew" (if dired-guess-shell-gzip-quiet " -q") | 978 | '(concat "znew" (if dired-guess-shell-gzip-quiet " -q") |
| 958 | " " dired-guess-shell-znew-switches)) | 979 | " " dired-guess-shell-znew-switches)) |
diff --git a/lisp/dired.el b/lisp/dired.el index c113f0cb2f4..c4374503a6f 100644 --- a/lisp/dired.el +++ b/lisp/dired.el | |||
| @@ -611,9 +611,12 @@ Don't use that together with FILTER." | |||
| 611 | (if current-prefix-arg | 611 | (if current-prefix-arg |
| 612 | (read-string "Dired listing switches: " | 612 | (read-string "Dired listing switches: " |
| 613 | dired-listing-switches)) | 613 | dired-listing-switches)) |
| 614 | ;; If a dialog is about to be used, call read-directory-name so | 614 | ;; If a dialog is used, call `read-directory-name' so the |
| 615 | ;; the dialog code knows we want directories. Some dialogs can | 615 | ;; dialog code knows we want directories. Some dialogs |
| 616 | ;; only select directories or files when popped up, not both. | 616 | ;; can only select directories or files when popped up, |
| 617 | ;; not both. If no dialog is used, call `read-file-name' | ||
| 618 | ;; because the user may want completion of file names for | ||
| 619 | ;; use in a wildcard pattern. | ||
| 617 | (if (next-read-file-uses-dialog-p) | 620 | (if (next-read-file-uses-dialog-p) |
| 618 | (read-directory-name (format "Dired %s(directory): " str) | 621 | (read-directory-name (format "Dired %s(directory): " str) |
| 619 | nil default-directory nil) | 622 | nil default-directory nil) |
| @@ -4082,8 +4085,8 @@ true then the type of the file linked to by FILE is printed instead. | |||
| 4082 | 4085 | ||
| 4083 | ;;;*** | 4086 | ;;;*** |
| 4084 | 4087 | ||
| 4085 | ;;;### (autoloads (dired-do-relsymlink dired-jump) "dired-x" "dired-x.el" | 4088 | ;;;### (autoloads (dired-do-relsymlink dired-jump-other-window dired-jump) |
| 4086 | ;;;;;; "3b8851132739ab3f9054bf639873c53e") | 4089 | ;;;;;; "dired-x" "dired-x.el" "87fd4ae2fdade7e0f11c4a0b1cfdeda2") |
| 4087 | ;;; Generated autoloads from dired-x.el | 4090 | ;;; Generated autoloads from dired-x.el |
| 4088 | 4091 | ||
| 4089 | (autoload 'dired-jump "dired-x" "\ | 4092 | (autoload 'dired-jump "dired-x" "\ |
| @@ -4098,6 +4101,11 @@ move to its line in dired. | |||
| 4098 | 4101 | ||
| 4099 | \(fn &optional OTHER-WINDOW FILE-NAME)" t nil) | 4102 | \(fn &optional OTHER-WINDOW FILE-NAME)" t nil) |
| 4100 | 4103 | ||
| 4104 | (autoload 'dired-jump-other-window "dired-x" "\ | ||
| 4105 | Like \\[dired-jump] (`dired-jump') but in other window. | ||
| 4106 | |||
| 4107 | \(fn &optional FILE-NAME)" t nil) | ||
| 4108 | |||
| 4101 | (autoload 'dired-do-relsymlink "dired-x" "\ | 4109 | (autoload 'dired-do-relsymlink "dired-x" "\ |
| 4102 | Relative symlink all marked (or next ARG) files into a directory. | 4110 | Relative symlink all marked (or next ARG) files into a directory. |
| 4103 | Otherwise make a relative symbolic link to the current file. | 4111 | Otherwise make a relative symbolic link to the current file. |
diff --git a/lisp/emacs-lisp/elp.el b/lisp/emacs-lisp/elp.el index 910eff3c78f..73af3a5708f 100644 --- a/lisp/emacs-lisp/elp.el +++ b/lisp/emacs-lisp/elp.el | |||
| @@ -630,7 +630,7 @@ displayed." | |||
| 630 | 'display (list 'space :align-to column) | 630 | 'display (list 'space :align-to column) |
| 631 | 'face 'fixed-pitch) | 631 | 'face 'fixed-pitch) |
| 632 | title) | 632 | title) |
| 633 | (setq column (+ column 1 | 633 | (setq column (+ column 2 |
| 634 | (if (= column 0) | 634 | (if (= column 0) |
| 635 | elp-field-len | 635 | elp-field-len |
| 636 | (length title)))))) | 636 | (length title)))))) |
diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el index b3c95fcc78f..5bd8fd01b1e 100644 --- a/lisp/emacs-lisp/ert.el +++ b/lisp/emacs-lisp/ert.el | |||
| @@ -219,7 +219,7 @@ Emacs bug 6581 at URL `http://debbugs.gnu.org/cgi/bugreport.cgi?bug=6581'." | |||
| 219 | ;; This implementation is inefficient. Rather than making it | 219 | ;; This implementation is inefficient. Rather than making it |
| 220 | ;; efficient, let's hope bug 6581 gets fixed so that we can delete | 220 | ;; efficient, let's hope bug 6581 gets fixed so that we can delete |
| 221 | ;; it altogether. | 221 | ;; it altogether. |
| 222 | (not (ert--explain-not-equal-including-properties a b))) | 222 | (not (ert--explain-equal-including-properties a b))) |
| 223 | 223 | ||
| 224 | 224 | ||
| 225 | ;;; Defining and locating tests. | 225 | ;;; Defining and locating tests. |
| @@ -571,16 +571,15 @@ failed." | |||
| 571 | (when (and (not firstp) (eq fast slow)) (return nil)))) | 571 | (when (and (not firstp) (eq fast slow)) (return nil)))) |
| 572 | 572 | ||
| 573 | (defun ert--explain-format-atom (x) | 573 | (defun ert--explain-format-atom (x) |
| 574 | "Format the atom X for `ert--explain-not-equal'." | 574 | "Format the atom X for `ert--explain-equal'." |
| 575 | (typecase x | 575 | (typecase x |
| 576 | (fixnum (list x (format "#x%x" x) (format "?%c" x))) | 576 | (fixnum (list x (format "#x%x" x) (format "?%c" x))) |
| 577 | (t x))) | 577 | (t x))) |
| 578 | 578 | ||
| 579 | (defun ert--explain-not-equal (a b) | 579 | (defun ert--explain-equal-rec (a b) |
| 580 | "Explainer function for `equal'. | 580 | "Returns a programmer-readable explanation of why A and B are not `equal'. |
| 581 | 581 | ||
| 582 | Returns a programmer-readable explanation of why A and B are not | 582 | Returns nil if they are." |
| 583 | `equal', or nil if they are." | ||
| 584 | (if (not (equal (type-of a) (type-of b))) | 583 | (if (not (equal (type-of a) (type-of b))) |
| 585 | `(different-types ,a ,b) | 584 | `(different-types ,a ,b) |
| 586 | (etypecase a | 585 | (etypecase a |
| @@ -598,13 +597,13 @@ Returns a programmer-readable explanation of why A and B are not | |||
| 598 | (loop for i from 0 | 597 | (loop for i from 0 |
| 599 | for ai in a | 598 | for ai in a |
| 600 | for bi in b | 599 | for bi in b |
| 601 | for xi = (ert--explain-not-equal ai bi) | 600 | for xi = (ert--explain-equal-rec ai bi) |
| 602 | do (when xi (return `(list-elt ,i ,xi))) | 601 | do (when xi (return `(list-elt ,i ,xi))) |
| 603 | finally (assert (equal a b) t))) | 602 | finally (assert (equal a b) t))) |
| 604 | (let ((car-x (ert--explain-not-equal (car a) (car b)))) | 603 | (let ((car-x (ert--explain-equal-rec (car a) (car b)))) |
| 605 | (if car-x | 604 | (if car-x |
| 606 | `(car ,car-x) | 605 | `(car ,car-x) |
| 607 | (let ((cdr-x (ert--explain-not-equal (cdr a) (cdr b)))) | 606 | (let ((cdr-x (ert--explain-equal-rec (cdr a) (cdr b)))) |
| 608 | (if cdr-x | 607 | (if cdr-x |
| 609 | `(cdr ,cdr-x) | 608 | `(cdr ,cdr-x) |
| 610 | (assert (equal a b) t) | 609 | (assert (equal a b) t) |
| @@ -618,7 +617,7 @@ Returns a programmer-readable explanation of why A and B are not | |||
| 618 | (loop for i from 0 | 617 | (loop for i from 0 |
| 619 | for ai across a | 618 | for ai across a |
| 620 | for bi across b | 619 | for bi across b |
| 621 | for xi = (ert--explain-not-equal ai bi) | 620 | for xi = (ert--explain-equal-rec ai bi) |
| 622 | do (when xi (return `(array-elt ,i ,xi))) | 621 | do (when xi (return `(array-elt ,i ,xi))) |
| 623 | finally (assert (equal a b) t)))) | 622 | finally (assert (equal a b) t)))) |
| 624 | (atom (if (not (equal a b)) | 623 | (atom (if (not (equal a b)) |
| @@ -627,7 +626,15 @@ Returns a programmer-readable explanation of why A and B are not | |||
| 627 | `(different-atoms ,(ert--explain-format-atom a) | 626 | `(different-atoms ,(ert--explain-format-atom a) |
| 628 | ,(ert--explain-format-atom b))) | 627 | ,(ert--explain-format-atom b))) |
| 629 | nil))))) | 628 | nil))))) |
| 630 | (put 'equal 'ert-explainer 'ert--explain-not-equal) | 629 | |
| 630 | (defun ert--explain-equal (a b) | ||
| 631 | "Explainer function for `equal'." | ||
| 632 | ;; Do a quick comparison in C to avoid running our expensive | ||
| 633 | ;; comparison when possible. | ||
| 634 | (if (equal a b) | ||
| 635 | nil | ||
| 636 | (ert--explain-equal-rec a b))) | ||
| 637 | (put 'equal 'ert-explainer 'ert--explain-equal) | ||
| 631 | 638 | ||
| 632 | (defun ert--significant-plist-keys (plist) | 639 | (defun ert--significant-plist-keys (plist) |
| 633 | "Return the keys of PLIST that have non-null values, in order." | 640 | "Return the keys of PLIST that have non-null values, in order." |
| @@ -658,8 +665,8 @@ key/value pairs in each list does not matter." | |||
| 658 | (value-b (plist-get b key))) | 665 | (value-b (plist-get b key))) |
| 659 | (assert (not (equal value-a value-b)) t) | 666 | (assert (not (equal value-a value-b)) t) |
| 660 | `(different-properties-for-key | 667 | `(different-properties-for-key |
| 661 | ,key ,(ert--explain-not-equal-including-properties value-a | 668 | ,key ,(ert--explain-equal-including-properties value-a |
| 662 | value-b))))) | 669 | value-b))))) |
| 663 | (cond (keys-in-a-not-in-b | 670 | (cond (keys-in-a-not-in-b |
| 664 | (explain-with-key (first keys-in-a-not-in-b))) | 671 | (explain-with-key (first keys-in-a-not-in-b))) |
| 665 | (keys-in-b-not-in-a | 672 | (keys-in-b-not-in-a |
| @@ -681,13 +688,16 @@ If SUFFIXP is non-nil, returns a suffix of S, otherwise a prefix." | |||
| 681 | (t | 688 | (t |
| 682 | (substring s 0 len))))) | 689 | (substring s 0 len))))) |
| 683 | 690 | ||
| 684 | (defun ert--explain-not-equal-including-properties (a b) | 691 | ;; TODO(ohler): Once bug 6581 is fixed, rename this to |
| 692 | ;; `ert--explain-equal-including-properties-rec' and add a fast-path | ||
| 693 | ;; wrapper like `ert--explain-equal'. | ||
| 694 | (defun ert--explain-equal-including-properties (a b) | ||
| 685 | "Explainer function for `ert-equal-including-properties'. | 695 | "Explainer function for `ert-equal-including-properties'. |
| 686 | 696 | ||
| 687 | Returns a programmer-readable explanation of why A and B are not | 697 | Returns a programmer-readable explanation of why A and B are not |
| 688 | `ert-equal-including-properties', or nil if they are." | 698 | `ert-equal-including-properties', or nil if they are." |
| 689 | (if (not (equal a b)) | 699 | (if (not (equal a b)) |
| 690 | (ert--explain-not-equal a b) | 700 | (ert--explain-equal a b) |
| 691 | (assert (stringp a) t) | 701 | (assert (stringp a) t) |
| 692 | (assert (stringp b) t) | 702 | (assert (stringp b) t) |
| 693 | (assert (eql (length a) (length b)) t) | 703 | (assert (eql (length a) (length b)) t) |
| @@ -713,7 +723,7 @@ Returns a programmer-readable explanation of why A and B are not | |||
| 713 | ))) | 723 | ))) |
| 714 | (put 'ert-equal-including-properties | 724 | (put 'ert-equal-including-properties |
| 715 | 'ert-explainer | 725 | 'ert-explainer |
| 716 | 'ert--explain-not-equal-including-properties) | 726 | 'ert--explain-equal-including-properties) |
| 717 | 727 | ||
| 718 | 728 | ||
| 719 | ;;; Implementation of `ert-info'. | 729 | ;;; Implementation of `ert-info'. |
| @@ -1244,12 +1254,14 @@ Also changes the counters in STATS to match." | |||
| 1244 | (ert-test-passed (incf (ert--stats-passed-expected stats) d)) | 1254 | (ert-test-passed (incf (ert--stats-passed-expected stats) d)) |
| 1245 | (ert-test-failed (incf (ert--stats-failed-expected stats) d)) | 1255 | (ert-test-failed (incf (ert--stats-failed-expected stats) d)) |
| 1246 | (null) | 1256 | (null) |
| 1247 | (ert-test-aborted-with-non-local-exit)) | 1257 | (ert-test-aborted-with-non-local-exit) |
| 1258 | (ert-test-quit)) | ||
| 1248 | (etypecase (aref results pos) | 1259 | (etypecase (aref results pos) |
| 1249 | (ert-test-passed (incf (ert--stats-passed-unexpected stats) d)) | 1260 | (ert-test-passed (incf (ert--stats-passed-unexpected stats) d)) |
| 1250 | (ert-test-failed (incf (ert--stats-failed-unexpected stats) d)) | 1261 | (ert-test-failed (incf (ert--stats-failed-unexpected stats) d)) |
| 1251 | (null) | 1262 | (null) |
| 1252 | (ert-test-aborted-with-non-local-exit))))) | 1263 | (ert-test-aborted-with-non-local-exit) |
| 1264 | (ert-test-quit))))) | ||
| 1253 | ;; Adjust counters to remove the result that is currently in stats. | 1265 | ;; Adjust counters to remove the result that is currently in stats. |
| 1254 | (update -1) | 1266 | (update -1) |
| 1255 | ;; Put new test and result into stats. | 1267 | ;; Put new test and result into stats. |
| @@ -1342,7 +1354,8 @@ EXPECTEDP specifies whether the result was expected." | |||
| 1342 | (ert-test-passed ".P") | 1354 | (ert-test-passed ".P") |
| 1343 | (ert-test-failed "fF") | 1355 | (ert-test-failed "fF") |
| 1344 | (null "--") | 1356 | (null "--") |
| 1345 | (ert-test-aborted-with-non-local-exit "aA")))) | 1357 | (ert-test-aborted-with-non-local-exit "aA") |
| 1358 | (ert-test-quit "qQ")))) | ||
| 1346 | (elt s (if expectedp 0 1)))) | 1359 | (elt s (if expectedp 0 1)))) |
| 1347 | 1360 | ||
| 1348 | (defun ert-string-for-test-result (result expectedp) | 1361 | (defun ert-string-for-test-result (result expectedp) |
| @@ -1353,7 +1366,8 @@ EXPECTEDP specifies whether the result was expected." | |||
| 1353 | (ert-test-passed '("passed" "PASSED")) | 1366 | (ert-test-passed '("passed" "PASSED")) |
| 1354 | (ert-test-failed '("failed" "FAILED")) | 1367 | (ert-test-failed '("failed" "FAILED")) |
| 1355 | (null '("unknown" "UNKNOWN")) | 1368 | (null '("unknown" "UNKNOWN")) |
| 1356 | (ert-test-aborted-with-non-local-exit '("aborted" "ABORTED"))))) | 1369 | (ert-test-aborted-with-non-local-exit '("aborted" "ABORTED")) |
| 1370 | (ert-test-quit '("quit" "QUIT"))))) | ||
| 1357 | (elt s (if expectedp 0 1)))) | 1371 | (elt s (if expectedp 0 1)))) |
| 1358 | 1372 | ||
| 1359 | (defun ert--pp-with-indentation-and-newline (object) | 1373 | (defun ert--pp-with-indentation-and-newline (object) |
| @@ -1478,7 +1492,9 @@ Returns the stats object." | |||
| 1478 | (message "%s" (buffer-string)))) | 1492 | (message "%s" (buffer-string)))) |
| 1479 | (ert-test-aborted-with-non-local-exit | 1493 | (ert-test-aborted-with-non-local-exit |
| 1480 | (message "Test %S aborted with non-local exit" | 1494 | (message "Test %S aborted with non-local exit" |
| 1481 | (ert-test-name test))))) | 1495 | (ert-test-name test))) |
| 1496 | (ert-test-quit | ||
| 1497 | (message "Quit during %S" (ert-test-name test))))) | ||
| 1482 | (let* ((max (prin1-to-string (length (ert--stats-tests stats)))) | 1498 | (let* ((max (prin1-to-string (length (ert--stats-tests stats)))) |
| 1483 | (format-string (concat "%9s %" | 1499 | (format-string (concat "%9s %" |
| 1484 | (prin1-to-string (length max)) | 1500 | (prin1-to-string (length max)) |
| @@ -1853,7 +1869,9 @@ non-nil, returns the face for expected results.." | |||
| 1853 | (ert-test-result-with-condition-condition result)) | 1869 | (ert-test-result-with-condition-condition result)) |
| 1854 | (ert--make-xrefs-region begin (point))))) | 1870 | (ert--make-xrefs-region begin (point))))) |
| 1855 | (ert-test-aborted-with-non-local-exit | 1871 | (ert-test-aborted-with-non-local-exit |
| 1856 | (insert " aborted\n"))) | 1872 | (insert " aborted\n")) |
| 1873 | (ert-test-quit | ||
| 1874 | (insert " quit\n"))) | ||
| 1857 | (insert "\n"))))) | 1875 | (insert "\n"))))) |
| 1858 | nil) | 1876 | nil) |
| 1859 | 1877 | ||
diff --git a/lisp/emacs-lisp/ewoc.el b/lisp/emacs-lisp/ewoc.el index bf9998695ee..a71f3c7244c 100644 --- a/lisp/emacs-lisp/ewoc.el +++ b/lisp/emacs-lisp/ewoc.el | |||
| @@ -495,6 +495,8 @@ Return the node (or nil if we just passed the last node)." | |||
| 495 | ;; Never step below the first element. | 495 | ;; Never step below the first element. |
| 496 | ;; (unless (ewoc--filter-hf-nodes ewoc node) | 496 | ;; (unless (ewoc--filter-hf-nodes ewoc node) |
| 497 | ;; (setq node (ewoc--node-nth dll -2))) | 497 | ;; (setq node (ewoc--node-nth dll -2))) |
| 498 | (unless node | ||
| 499 | (error "No next")) | ||
| 498 | (ewoc-goto-node ewoc node))) | 500 | (ewoc-goto-node ewoc node))) |
| 499 | 501 | ||
| 500 | (defun ewoc-goto-node (ewoc node) | 502 | (defun ewoc-goto-node (ewoc node) |
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index ab5ba1bea56..2552ad4eb68 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el | |||
| @@ -220,10 +220,15 @@ If VERSION is nil, the package is not loaded (it is \"disabled\")." | |||
| 220 | (defcustom package-archives '(("gnu" . "http://elpa.gnu.org/packages/")) | 220 | (defcustom package-archives '(("gnu" . "http://elpa.gnu.org/packages/")) |
| 221 | "An alist of archives from which to fetch. | 221 | "An alist of archives from which to fetch. |
| 222 | The default value points to the GNU Emacs package repository. | 222 | The default value points to the GNU Emacs package repository. |
| 223 | Each element has the form (ID . URL), where ID is an identifier | 223 | |
| 224 | string for an archive and URL is a http: URL (a string)." | 224 | Each element has the form (ID . LOCATION). |
| 225 | ID is an archive name, as a string. | ||
| 226 | LOCATION specifies the base location for the archive. | ||
| 227 | If it starts with \"http:\", it is treated as a HTTP URL; | ||
| 228 | otherwise it should be an absolute directory name. | ||
| 229 | (Other types of URL are currently not supported.)" | ||
| 225 | :type '(alist :key-type (string :tag "Archive name") | 230 | :type '(alist :key-type (string :tag "Archive name") |
| 226 | :value-type (string :tag "Archive URL")) | 231 | :value-type (string :tag "URL or directory name")) |
| 227 | :risky t | 232 | :risky t |
| 228 | :group 'package | 233 | :group 'package |
| 229 | :version "24.1") | 234 | :version "24.1") |
| @@ -617,8 +622,36 @@ Otherwise it uses an external `tar' program. | |||
| 617 | (let ((load-path (cons pkg-dir load-path))) | 622 | (let ((load-path (cons pkg-dir load-path))) |
| 618 | (byte-recompile-directory pkg-dir 0 t))))) | 623 | (byte-recompile-directory pkg-dir 0 t))))) |
| 619 | 624 | ||
| 625 | (defmacro package--with-work-buffer (location file &rest body) | ||
| 626 | "Run BODY in a buffer containing the contents of FILE at LOCATION. | ||
| 627 | LOCATION is the base location of a package archive, and should be | ||
| 628 | one of the URLs (or file names) specified in `package-archives'. | ||
| 629 | FILE is the name of a file relative to that base location. | ||
| 630 | |||
| 631 | This macro retrieves FILE from LOCATION into a temporary buffer, | ||
| 632 | and evaluates BODY while that buffer is current. This work | ||
| 633 | buffer is killed afterwards. Return the last value in BODY." | ||
| 634 | `(let* ((http (string-match "\\`http:" ,location)) | ||
| 635 | (buffer | ||
| 636 | (if http | ||
| 637 | (url-retrieve-synchronously (concat ,location ,file)) | ||
| 638 | (generate-new-buffer "*package work buffer*")))) | ||
| 639 | (prog1 | ||
| 640 | (with-current-buffer buffer | ||
| 641 | (if http | ||
| 642 | (progn (package-handle-response) | ||
| 643 | (re-search-forward "^$" nil 'move) | ||
| 644 | (forward-char) | ||
| 645 | (delete-region (point-min) (point))) | ||
| 646 | (unless (file-name-absolute-p ,location) | ||
| 647 | (error "Archive location %s is not an absolute file name" | ||
| 648 | ,location)) | ||
| 649 | (insert-file-contents (expand-file-name ,file ,location))) | ||
| 650 | ,@body) | ||
| 651 | (kill-buffer buffer)))) | ||
| 652 | |||
| 620 | (defun package-handle-response () | 653 | (defun package-handle-response () |
| 621 | "Handle the response from the server. | 654 | "Handle the response from a `url-retrieve-synchronously' call. |
| 622 | Parse the HTTP response and throw if an error occurred. | 655 | Parse the HTTP response and throw if an error occurred. |
| 623 | The url package seems to require extra processing for this. | 656 | The url package seems to require extra processing for this. |
| 624 | This should be called in a `save-excursion', in the download buffer. | 657 | This should be called in a `save-excursion', in the download buffer. |
| @@ -627,7 +660,6 @@ It will move point to somewhere in the headers." | |||
| 627 | (require 'url-http) | 660 | (require 'url-http) |
| 628 | (let ((response (url-http-parse-response))) | 661 | (let ((response (url-http-parse-response))) |
| 629 | (when (or (< response 200) (>= response 300)) | 662 | (when (or (< response 200) (>= response 300)) |
| 630 | (display-buffer (current-buffer)) | ||
| 631 | (error "Error during download request:%s" | 663 | (error "Error during download request:%s" |
| 632 | (buffer-substring-no-properties (point) (progn | 664 | (buffer-substring-no-properties (point) (progn |
| 633 | (end-of-line) | 665 | (end-of-line) |
| @@ -635,28 +667,17 @@ It will move point to somewhere in the headers." | |||
| 635 | 667 | ||
| 636 | (defun package-download-single (name version desc requires) | 668 | (defun package-download-single (name version desc requires) |
| 637 | "Download and install a single-file package." | 669 | "Download and install a single-file package." |
| 638 | (let ((buffer (url-retrieve-synchronously | 670 | (let ((location (package-archive-base name)) |
| 639 | (concat (package-archive-url name) | 671 | (file (concat (symbol-name name) "-" version ".el"))) |
| 640 | (symbol-name name) "-" version ".el")))) | 672 | (package--with-work-buffer location file |
| 641 | (with-current-buffer buffer | 673 | (package-unpack-single (symbol-name name) version desc requires)))) |
| 642 | (package-handle-response) | ||
| 643 | (re-search-forward "^$" nil 'move) | ||
| 644 | (forward-char) | ||
| 645 | (delete-region (point-min) (point)) | ||
| 646 | (package-unpack-single (symbol-name name) version desc requires) | ||
| 647 | (kill-buffer buffer)))) | ||
| 648 | 674 | ||
| 649 | (defun package-download-tar (name version) | 675 | (defun package-download-tar (name version) |
| 650 | "Download and install a tar package." | 676 | "Download and install a tar package." |
| 651 | (let ((tar-buffer (url-retrieve-synchronously | 677 | (let ((location (package-archive-base name)) |
| 652 | (concat (package-archive-url name) | 678 | (file (concat (symbol-name name) "-" version ".tar"))) |
| 653 | (symbol-name name) "-" version ".tar")))) | 679 | (package--with-work-buffer location file |
| 654 | (with-current-buffer tar-buffer | 680 | (package-unpack name version)))) |
| 655 | (package-handle-response) | ||
| 656 | (re-search-forward "^$" nil 'move) | ||
| 657 | (forward-char) | ||
| 658 | (package-unpack name version) | ||
| 659 | (kill-buffer tar-buffer)))) | ||
| 660 | 681 | ||
| 661 | (defun package-installed-p (package &optional min-version) | 682 | (defun package-installed-p (package &optional min-version) |
| 662 | "Return true if PACKAGE, of VERSION or newer, is installed. | 683 | "Return true if PACKAGE, of VERSION or newer, is installed. |
| @@ -987,31 +1008,26 @@ The file can either be a tar file or an Emacs Lisp file." | |||
| 987 | (error "Package `%s-%s' is a system package, not deleting" | 1008 | (error "Package `%s-%s' is a system package, not deleting" |
| 988 | name version)))) | 1009 | name version)))) |
| 989 | 1010 | ||
| 990 | (defun package-archive-url (name) | 1011 | (defun package-archive-base (name) |
| 991 | "Return the archive containing the package NAME." | 1012 | "Return the archive containing the package NAME." |
| 992 | (let ((desc (cdr (assq (intern-soft name) package-archive-contents)))) | 1013 | (let ((desc (cdr (assq (intern-soft name) package-archive-contents)))) |
| 993 | (cdr (assoc (aref desc (- (length desc) 1)) package-archives)))) | 1014 | (cdr (assoc (aref desc (- (length desc) 1)) package-archives)))) |
| 994 | 1015 | ||
| 995 | (defun package--download-one-archive (archive file) | 1016 | (defun package--download-one-archive (archive file) |
| 996 | "Download an archive file FILE from ARCHIVE, and cache it locally." | 1017 | "Retrieve an archive file FILE from ARCHIVE, and cache it. |
| 997 | (let* ((archive-name (car archive)) | 1018 | ARCHIVE should be a cons cell of the form (NAME . LOCATION), |
| 998 | (archive-url (cdr archive)) | 1019 | similar to an entry in `package-alist'. Save the cached copy to |
| 999 | (dir (expand-file-name "archives" package-user-dir)) | 1020 | \"archives/NAME/archive-contents\" in `package-user-dir'." |
| 1000 | (dir (expand-file-name archive-name dir)) | 1021 | (let* ((dir (expand-file-name "archives" package-user-dir)) |
| 1001 | (buffer (url-retrieve-synchronously (concat archive-url file)))) | 1022 | (dir (expand-file-name (car archive) dir))) |
| 1002 | (with-current-buffer buffer | 1023 | (package--with-work-buffer (cdr archive) file |
| 1003 | (package-handle-response) | ||
| 1004 | (re-search-forward "^$" nil 'move) | ||
| 1005 | (forward-char) | ||
| 1006 | (delete-region (point-min) (point)) | ||
| 1007 | ;; Read the retrieved buffer to make sure it is valid (e.g. it | 1024 | ;; Read the retrieved buffer to make sure it is valid (e.g. it |
| 1008 | ;; may fetch a URL redirect page). | 1025 | ;; may fetch a URL redirect page). |
| 1009 | (when (listp (read buffer)) | 1026 | (when (listp (read buffer)) |
| 1010 | (make-directory dir t) | 1027 | (make-directory dir t) |
| 1011 | (setq buffer-file-name (expand-file-name file dir)) | 1028 | (setq buffer-file-name (expand-file-name file dir)) |
| 1012 | (let ((version-control 'never)) | 1029 | (let ((version-control 'never)) |
| 1013 | (save-buffer)))) | 1030 | (save-buffer)))))) |
| 1014 | (kill-buffer buffer))) | ||
| 1015 | 1031 | ||
| 1016 | (defun package-refresh-contents () | 1032 | (defun package-refresh-contents () |
| 1017 | "Download the ELPA archive description if needed. | 1033 | "Download the ELPA archive description if needed. |
| @@ -1176,27 +1192,21 @@ If optional arg NO-ACTIVATE is non-nil, don't activate packages." | |||
| 1176 | (while (re-search-forward "^\\(;+ ?\\)" nil t) | 1192 | (while (re-search-forward "^\\(;+ ?\\)" nil t) |
| 1177 | (replace-match "")))) | 1193 | (replace-match "")))) |
| 1178 | (let ((readme (expand-file-name (concat package-name "-readme.txt") | 1194 | (let ((readme (expand-file-name (concat package-name "-readme.txt") |
| 1179 | package-user-dir))) | 1195 | package-user-dir)) |
| 1196 | readme-string) | ||
| 1180 | ;; For elpa packages, try downloading the commentary. If that | 1197 | ;; For elpa packages, try downloading the commentary. If that |
| 1181 | ;; fails, try an existing readme file in `package-user-dir'. | 1198 | ;; fails, try an existing readme file in `package-user-dir'. |
| 1182 | (cond ((let ((buffer (ignore-errors | 1199 | (cond ((condition-case nil |
| 1183 | (url-retrieve-synchronously | 1200 | (package--with-work-buffer (package-archive-base package) |
| 1184 | (concat (package-archive-url package) | 1201 | (concat package-name "-readme.txt") |
| 1185 | package-name "-readme.txt")))) | 1202 | (setq buffer-file-name |
| 1186 | response) | 1203 | (expand-file-name readme package-user-dir)) |
| 1187 | (when buffer | 1204 | (let ((version-control 'never)) |
| 1188 | (with-current-buffer buffer | 1205 | (save-buffer)) |
| 1189 | (setq response (url-http-parse-response)) | 1206 | (setq readme-string (buffer-string)) |
| 1190 | (if (or (< response 200) (>= response 300)) | 1207 | t) |
| 1191 | (setq response nil) | 1208 | (error nil)) |
| 1192 | (setq buffer-file-name | 1209 | (insert readme-string)) |
| 1193 | (expand-file-name readme package-user-dir)) | ||
| 1194 | (delete-region (point-min) (1+ url-http-end-of-headers)) | ||
| 1195 | (save-buffer))) | ||
| 1196 | (when response | ||
| 1197 | (insert-buffer-substring buffer) | ||
| 1198 | (kill-buffer buffer) | ||
| 1199 | t)))) | ||
| 1200 | ((file-readable-p readme) | 1210 | ((file-readable-p readme) |
| 1201 | (insert-file-contents readme) | 1211 | (insert-file-contents readme) |
| 1202 | (goto-char (point-max)))))))) | 1212 | (goto-char (point-max)))))))) |
diff --git a/lisp/emacs-lock.el b/lisp/emacs-lock.el index 22795a47d98..6033648298d 100644 --- a/lisp/emacs-lock.el +++ b/lisp/emacs-lock.el | |||
| @@ -88,7 +88,8 @@ If the buffer is locked, signal error and display its name." | |||
| 88 | (if emacs-lock-buffer-locked | 88 | (if emacs-lock-buffer-locked |
| 89 | (setq emacs-lock-from-exiting t))) | 89 | (setq emacs-lock-from-exiting t))) |
| 90 | 90 | ||
| 91 | (add-hook 'kill-emacs-hook 'check-emacs-lock) | 91 | (unless noninteractive |
| 92 | (add-hook 'kill-emacs-hook 'check-emacs-lock)) | ||
| 92 | (add-hook 'kill-buffer-hook 'emacs-lock-check-buffer-lock) | 93 | (add-hook 'kill-buffer-hook 'emacs-lock-check-buffer-lock) |
| 93 | (add-hook 'shell-mode-hook 'emacs-lock-was-buffer-locked) | 94 | (add-hook 'shell-mode-hook 'emacs-lock-was-buffer-locked) |
| 94 | (add-hook 'shell-mode-hook 'emacs-lock-shell-sentinel) | 95 | (add-hook 'shell-mode-hook 'emacs-lock-shell-sentinel) |
diff --git a/lisp/emulation/viper-cmd.el b/lisp/emulation/viper-cmd.el index d9b79ccd317..5daef7f9666 100644 --- a/lisp/emulation/viper-cmd.el +++ b/lisp/emulation/viper-cmd.el | |||
| @@ -776,7 +776,7 @@ Vi's prefix argument will be used. Otherwise, the prefix argument passed to | |||
| 776 | (viper-copy-event (viper-seq-last-elt key)))) | 776 | (viper-copy-event (viper-seq-last-elt key)))) |
| 777 | 777 | ||
| 778 | (if (commandp com) | 778 | (if (commandp com) |
| 779 | ;; pretend that current state is the state we excaped to | 779 | ;; pretend that current state is the state we escaped to |
| 780 | (let ((viper-current-state state)) | 780 | (let ((viper-current-state state)) |
| 781 | (setq prefix-arg (or prefix-arg arg)) | 781 | (setq prefix-arg (or prefix-arg arg)) |
| 782 | (command-execute com))) | 782 | (command-execute com))) |
diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog index 2996fee9bcb..e05828dfeea 100644 --- a/lisp/erc/ChangeLog +++ b/lisp/erc/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2011-03-04 Julien Danjou <julien@danjou.info> | ||
| 2 | |||
| 3 | * erc-track.el (erc-track-visibility): Fix :type. (Bug#6369) | ||
| 4 | |||
| 1 | 2011-02-10 Stefan Monnier <monnier@iro.umontreal.ca> | 5 | 2011-02-10 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 6 | ||
| 3 | * erc-list.el (erc-list-menu-mode-map): Move initialization | 7 | * erc-list.el (erc-list-menu-mode-map): Move initialization |
diff --git a/lisp/erc/erc-track.el b/lisp/erc/erc-track.el index a89244f695d..28c1ced91c6 100644 --- a/lisp/erc/erc-track.el +++ b/lisp/erc/erc-track.el | |||
| @@ -84,8 +84,8 @@ Activity means that there was no user input in the last 10 seconds." | |||
| 84 | :type '(choice (const :tag "All frames" t) | 84 | :type '(choice (const :tag "All frames" t) |
| 85 | (const :tag "All visible frames" visible) | 85 | (const :tag "All visible frames" visible) |
| 86 | (const :tag "Only the selected frame" nil) | 86 | (const :tag "Only the selected frame" nil) |
| 87 | (const :tag "Only the selected frame if it was active" | 87 | (const :tag "Only the selected frame if it is visible" |
| 88 | active))) | 88 | selected-visible))) |
| 89 | 89 | ||
| 90 | (defcustom erc-track-exclude nil | 90 | (defcustom erc-track-exclude nil |
| 91 | "A list targets (channel names or query targets) which should not be tracked." | 91 | "A list targets (channel names or query targets) which should not be tracked." |
diff --git a/lisp/eshell/em-alias.el b/lisp/eshell/em-alias.el index aa138cb4dcb..4e1dbd41045 100644 --- a/lisp/eshell/em-alias.el +++ b/lisp/eshell/em-alias.el | |||
| @@ -117,8 +117,9 @@ gained by using this module." | |||
| 117 | ;; :link '(custom-manual "(eshell)Auto-correction of bad commands") | 117 | ;; :link '(custom-manual "(eshell)Auto-correction of bad commands") |
| 118 | :group 'eshell-alias) | 118 | :group 'eshell-alias) |
| 119 | 119 | ||
| 120 | (defcustom eshell-alias-load-hook '(eshell-alias-initialize) | 120 | (defcustom eshell-alias-load-hook nil |
| 121 | "A hook that gets run when `eshell-alias' is loaded." | 121 | "A hook that gets run when `eshell-alias' is loaded." |
| 122 | :version "24.1" ; removed eshell-alias-initialize | ||
| 122 | :type 'hook | 123 | :type 'hook |
| 123 | :group 'eshell-alias) | 124 | :group 'eshell-alias) |
| 124 | 125 | ||
| @@ -156,7 +157,7 @@ command, which will automatically write them to the file named by | |||
| 156 | (defun eshell/alias (&optional alias &rest definition) | 157 | (defun eshell/alias (&optional alias &rest definition) |
| 157 | "Define an ALIAS in the user's alias list using DEFINITION." | 158 | "Define an ALIAS in the user's alias list using DEFINITION." |
| 158 | (if (not alias) | 159 | (if (not alias) |
| 159 | (eshell-for alias eshell-command-aliases-list | 160 | (dolist (alias eshell-command-aliases-list) |
| 160 | (eshell-print (apply 'format "alias %s %s\n" alias))) | 161 | (eshell-print (apply 'format "alias %s %s\n" alias))) |
| 161 | (if (not definition) | 162 | (if (not definition) |
| 162 | (setq eshell-command-aliases-list | 163 | (setq eshell-command-aliases-list |
| @@ -238,7 +239,7 @@ command, which will automatically write them to the file named by | |||
| 238 | "Find all possible completions for NAME. | 239 | "Find all possible completions for NAME. |
| 239 | These are all the command aliases which begin with NAME." | 240 | These are all the command aliases which begin with NAME." |
| 240 | (let (completions) | 241 | (let (completions) |
| 241 | (eshell-for alias eshell-command-aliases-list | 242 | (dolist (alias eshell-command-aliases-list) |
| 242 | (if (string-match (concat "^" name) (car alias)) | 243 | (if (string-match (concat "^" name) (car alias)) |
| 243 | (setq completions (cons (car alias) completions)))) | 244 | (setq completions (cons (car alias) completions)))) |
| 244 | completions)) | 245 | completions)) |
diff --git a/lisp/eshell/em-banner.el b/lisp/eshell/em-banner.el index b2ebde98cee..ce987f132e3 100644 --- a/lisp/eshell/em-banner.el +++ b/lisp/eshell/em-banner.el | |||
| @@ -64,8 +64,9 @@ This can be any sexp, and should end with at least two newlines." | |||
| 64 | 64 | ||
| 65 | (put 'eshell-banner-message 'risky-local-variable t) | 65 | (put 'eshell-banner-message 'risky-local-variable t) |
| 66 | 66 | ||
| 67 | (defcustom eshell-banner-load-hook '(eshell-banner-initialize) | 67 | (defcustom eshell-banner-load-hook nil |
| 68 | "A list of functions to run when `eshell-banner' is loaded." | 68 | "A list of functions to run when `eshell-banner' is loaded." |
| 69 | :version "24.1" ; removed eshell-banner-initialize | ||
| 69 | :type 'hook | 70 | :type 'hook |
| 70 | :group 'eshell-banner) | 71 | :group 'eshell-banner) |
| 71 | 72 | ||
| @@ -81,14 +82,6 @@ This can be any sexp, and should end with at least two newlines." | |||
| 81 | (assert msg) | 82 | (assert msg) |
| 82 | (eshell-interactive-print msg)))) | 83 | (eshell-interactive-print msg)))) |
| 83 | 84 | ||
| 84 | (eshell-deftest banner banner-displayed | ||
| 85 | "Startup banner is displayed at point-min" | ||
| 86 | (assert eshell-banner-message) | ||
| 87 | (let ((msg (eval eshell-banner-message))) | ||
| 88 | (assert msg) | ||
| 89 | (goto-char (point-min)) | ||
| 90 | (looking-at msg))) | ||
| 91 | |||
| 92 | (provide 'em-banner) | 85 | (provide 'em-banner) |
| 93 | 86 | ||
| 94 | ;; Local Variables: | 87 | ;; Local Variables: |
diff --git a/lisp/eshell/em-cmpl.el b/lisp/eshell/em-cmpl.el index f3f104c1ede..c551684210c 100644 --- a/lisp/eshell/em-cmpl.el +++ b/lisp/eshell/em-cmpl.el | |||
| @@ -84,8 +84,9 @@ variable names, arguments, etc." | |||
| 84 | 84 | ||
| 85 | ;;; User Variables: | 85 | ;;; User Variables: |
| 86 | 86 | ||
| 87 | (defcustom eshell-cmpl-load-hook '(eshell-cmpl-initialize) | 87 | (defcustom eshell-cmpl-load-hook nil |
| 88 | "A list of functions to run when `eshell-cmpl' is loaded." | 88 | "A list of functions to run when `eshell-cmpl' is loaded." |
| 89 | :version "24.1" ; removed eshell-cmpl-initialize | ||
| 89 | :type 'hook | 90 | :type 'hook |
| 90 | :group 'eshell-cmpl) | 91 | :group 'eshell-cmpl) |
| 91 | 92 | ||
diff --git a/lisp/eshell/em-dirs.el b/lisp/eshell/em-dirs.el index 64555ab15ef..1aa2c34c395 100644 --- a/lisp/eshell/em-dirs.el +++ b/lisp/eshell/em-dirs.el | |||
| @@ -58,8 +58,9 @@ they lack somewhat in feel from the typical shell equivalents." | |||
| 58 | 58 | ||
| 59 | ;;; User Variables: | 59 | ;;; User Variables: |
| 60 | 60 | ||
| 61 | (defcustom eshell-dirs-load-hook '(eshell-dirs-initialize) | 61 | (defcustom eshell-dirs-load-hook nil |
| 62 | "A hook that gets run when `eshell-dirs' is loaded." | 62 | "A hook that gets run when `eshell-dirs' is loaded." |
| 63 | :version "24.1" ; removed eshell-dirs-initialize | ||
| 63 | :type 'hook | 64 | :type 'hook |
| 64 | :group 'eshell-dirs) | 65 | :group 'eshell-dirs) |
| 65 | 66 | ||
| @@ -233,7 +234,7 @@ Thus, this does not include the current directory.") | |||
| 233 | 234 | ||
| 234 | (defun eshell-save-some-last-dir () | 235 | (defun eshell-save-some-last-dir () |
| 235 | "Save the list-dir-ring for any open Eshell buffers." | 236 | "Save the list-dir-ring for any open Eshell buffers." |
| 236 | (eshell-for buf (buffer-list) | 237 | (dolist (buf (buffer-list)) |
| 237 | (if (buffer-live-p buf) | 238 | (if (buffer-live-p buf) |
| 238 | (with-current-buffer buf | 239 | (with-current-buffer buf |
| 239 | (if (and eshell-mode | 240 | (if (and eshell-mode |
diff --git a/lisp/eshell/em-glob.el b/lisp/eshell/em-glob.el index 2a565c5c827..732c6c05bfe 100644 --- a/lisp/eshell/em-glob.el +++ b/lisp/eshell/em-glob.el | |||
| @@ -61,8 +61,9 @@ by zsh for filename generation." | |||
| 61 | 61 | ||
| 62 | ;;; User Variables: | 62 | ;;; User Variables: |
| 63 | 63 | ||
| 64 | (defcustom eshell-glob-load-hook '(eshell-glob-initialize) | 64 | (defcustom eshell-glob-load-hook nil |
| 65 | "A list of functions to run when `eshell-glob' is loaded." | 65 | "A list of functions to run when `eshell-glob' is loaded." |
| 66 | :version "24.1" ; removed eshell-glob-initialize | ||
| 66 | :type 'hook | 67 | :type 'hook |
| 67 | :group 'eshell-glob) | 68 | :group 'eshell-glob) |
| 68 | 69 | ||
diff --git a/lisp/eshell/em-hist.el b/lisp/eshell/em-hist.el index 5ec529f4b8f..993e9d63a94 100644 --- a/lisp/eshell/em-hist.el +++ b/lisp/eshell/em-hist.el | |||
| @@ -70,8 +70,9 @@ | |||
| 70 | 70 | ||
| 71 | ;;; User Variables: | 71 | ;;; User Variables: |
| 72 | 72 | ||
| 73 | (defcustom eshell-hist-load-hook '(eshell-hist-initialize) | 73 | (defcustom eshell-hist-load-hook nil |
| 74 | "A list of functions to call when loading `eshell-hist'." | 74 | "A list of functions to call when loading `eshell-hist'." |
| 75 | :version "24.1" ; removed eshell-hist-initialize | ||
| 75 | :type 'hook | 76 | :type 'hook |
| 76 | :group 'eshell-hist) | 77 | :group 'eshell-hist) |
| 77 | 78 | ||
| @@ -292,7 +293,7 @@ element, regardless of any text on the command line. In that case, | |||
| 292 | 293 | ||
| 293 | (defun eshell-save-some-history () | 294 | (defun eshell-save-some-history () |
| 294 | "Save the history for any open Eshell buffers." | 295 | "Save the history for any open Eshell buffers." |
| 295 | (eshell-for buf (buffer-list) | 296 | (dolist (buf (buffer-list)) |
| 296 | (if (buffer-live-p buf) | 297 | (if (buffer-live-p buf) |
| 297 | (with-current-buffer buf | 298 | (with-current-buffer buf |
| 298 | (if (and eshell-mode | 299 | (if (and eshell-mode |
| @@ -730,7 +731,7 @@ matched." | |||
| 730 | (narrow-to-region here (point)) | 731 | (narrow-to-region here (point)) |
| 731 | (goto-char (point-min)) | 732 | (goto-char (point-min)) |
| 732 | (let ((modifiers (cdr (eshell-parse-modifiers)))) | 733 | (let ((modifiers (cdr (eshell-parse-modifiers)))) |
| 733 | (eshell-for mod modifiers | 734 | (dolist (mod modifiers) |
| 734 | (setq hist (funcall mod hist))) | 735 | (setq hist (funcall mod hist))) |
| 735 | hist)) | 736 | hist)) |
| 736 | (delete-region here (point))))) | 737 | (delete-region here (point))))) |
diff --git a/lisp/eshell/em-ls.el b/lisp/eshell/em-ls.el index 7714629f2fa..4ef259dee4b 100644 --- a/lisp/eshell/em-ls.el +++ b/lisp/eshell/em-ls.el | |||
| @@ -561,7 +561,7 @@ relative to that directory." | |||
| 561 | (when (or (eq listing-style 'long-listing) show-size) | 561 | (when (or (eq listing-style 'long-listing) show-size) |
| 562 | (let ((total 0.0)) | 562 | (let ((total 0.0)) |
| 563 | (setq size-width 0) | 563 | (setq size-width 0) |
| 564 | (eshell-for e entries | 564 | (dolist (e entries) |
| 565 | (if (nth 7 (cdr e)) | 565 | (if (nth 7 (cdr e)) |
| 566 | (setq total (+ total (nth 7 (cdr e))) | 566 | (setq total (+ total (nth 7 (cdr e))) |
| 567 | size-width | 567 | size-width |
| @@ -651,7 +651,7 @@ Each member of FILES is either a string or a cons cell of the form | |||
| 651 | (not (eq eshell-in-pipeline-p 'last)) | 651 | (not (eq eshell-in-pipeline-p 'last)) |
| 652 | (not (eq listing-style 'by-lines))) | 652 | (not (eq listing-style 'by-lines))) |
| 653 | (memq listing-style '(long-listing single-column))) | 653 | (memq listing-style '(long-listing single-column))) |
| 654 | (eshell-for file files | 654 | (dolist (file files) |
| 655 | (if file | 655 | (if file |
| 656 | (eshell-ls-file file size-width copy-fileinfo))) | 656 | (eshell-ls-file file size-width copy-fileinfo))) |
| 657 | (let ((f files) | 657 | (let ((f files) |
| @@ -676,7 +676,7 @@ Each member of FILES is either a string or a cons cell of the form | |||
| 676 | (setcdr f (cddr f)))))) | 676 | (setcdr f (cddr f)))))) |
| 677 | (if (not show-size) | 677 | (if (not show-size) |
| 678 | (setq display-files (mapcar 'eshell-ls-annotate files)) | 678 | (setq display-files (mapcar 'eshell-ls-annotate files)) |
| 679 | (eshell-for file files | 679 | (dolist (file files) |
| 680 | (let* ((str (eshell-ls-printable-size (nth 7 (cdr file)) t)) | 680 | (let* ((str (eshell-ls-printable-size (nth 7 (cdr file)) t)) |
| 681 | (len (length str))) | 681 | (len (length str))) |
| 682 | (if (< len size-width) | 682 | (if (< len size-width) |
| @@ -696,7 +696,7 @@ Each member of FILES is either a string or a cons cell of the form | |||
| 696 | (columns (length col-widths)) | 696 | (columns (length col-widths)) |
| 697 | (col-index 1) | 697 | (col-index 1) |
| 698 | need-return) | 698 | need-return) |
| 699 | (eshell-for file display-files | 699 | (dolist (file display-files) |
| 700 | (let ((name | 700 | (let ((name |
| 701 | (if (car file) | 701 | (if (car file) |
| 702 | (if show-size | 702 | (if show-size |
| @@ -731,7 +731,7 @@ ROOT-DIR, if non-nil, specifies the root directory of the listing, to | |||
| 731 | which non-absolute directory names will be made relative if ever they | 731 | which non-absolute directory names will be made relative if ever they |
| 732 | need to be printed." | 732 | need to be printed." |
| 733 | (let (dirs files show-names need-return (size-width 0)) | 733 | (let (dirs files show-names need-return (size-width 0)) |
| 734 | (eshell-for entry entries | 734 | (dolist (entry entries) |
| 735 | (if (and (not dir-literal) | 735 | (if (and (not dir-literal) |
| 736 | (or (eshell-ls-filetype-p (cdr entry) ?d) | 736 | (or (eshell-ls-filetype-p (cdr entry) ?d) |
| 737 | (and (eshell-ls-filetype-p (cdr entry) ?l) | 737 | (and (eshell-ls-filetype-p (cdr entry) ?l) |
| @@ -757,7 +757,7 @@ need to be printed." | |||
| 757 | (setq need-return t)) | 757 | (setq need-return t)) |
| 758 | (setq show-names (or show-recursive | 758 | (setq show-names (or show-recursive |
| 759 | (> (+ (length files) (length dirs)) 1))) | 759 | (> (+ (length files) (length dirs)) 1))) |
| 760 | (eshell-for dir (eshell-ls-sort-entries dirs) | 760 | (dolist (dir (eshell-ls-sort-entries dirs)) |
| 761 | (if (and need-return (not dir-literal)) | 761 | (if (and need-return (not dir-literal)) |
| 762 | (funcall insert-func "\n")) | 762 | (funcall insert-func "\n")) |
| 763 | (eshell-ls-dir dir show-names | 763 | (eshell-ls-dir dir show-names |
diff --git a/lisp/eshell/em-pred.el b/lisp/eshell/em-pred.el index 33085c067fd..f3027ea9b5e 100644 --- a/lisp/eshell/em-pred.el +++ b/lisp/eshell/em-pred.el | |||
| @@ -59,8 +59,9 @@ ordinary strings." | |||
| 59 | 59 | ||
| 60 | ;;; User Variables: | 60 | ;;; User Variables: |
| 61 | 61 | ||
| 62 | (defcustom eshell-pred-load-hook '(eshell-pred-initialize) | 62 | (defcustom eshell-pred-load-hook nil |
| 63 | "A list of functions to run when `eshell-pred' is loaded." | 63 | "A list of functions to run when `eshell-pred' is loaded." |
| 64 | :version "24.1" ; removed eshell-pred-initialize | ||
| 64 | :type 'hook | 65 | :type 'hook |
| 65 | :group 'eshell-pred) | 66 | :group 'eshell-pred) |
| 66 | 67 | ||
diff --git a/lisp/eshell/em-prompt.el b/lisp/eshell/em-prompt.el index 448d2cdf303..3e87acc6d1e 100644 --- a/lisp/eshell/em-prompt.el +++ b/lisp/eshell/em-prompt.el | |||
| @@ -37,8 +37,9 @@ as is common with most shells." | |||
| 37 | 37 | ||
| 38 | ;;; User Variables: | 38 | ;;; User Variables: |
| 39 | 39 | ||
| 40 | (defcustom eshell-prompt-load-hook '(eshell-prompt-initialize) | 40 | (defcustom eshell-prompt-load-hook nil |
| 41 | "A list of functions to call when loading `eshell-prompt'." | 41 | "A list of functions to call when loading `eshell-prompt'." |
| 42 | :version "24.1" ; removed eshell-prompt-initialize | ||
| 42 | :type 'hook | 43 | :type 'hook |
| 43 | :group 'eshell-prompt) | 44 | :group 'eshell-prompt) |
| 44 | 45 | ||
diff --git a/lisp/eshell/em-rebind.el b/lisp/eshell/em-rebind.el index 6def23e1b71..2c346dfcd3d 100644 --- a/lisp/eshell/em-rebind.el +++ b/lisp/eshell/em-rebind.el | |||
| @@ -41,8 +41,9 @@ the behavior of normal shells while the user editing new input text." | |||
| 41 | 41 | ||
| 42 | ;;; User Variables: | 42 | ;;; User Variables: |
| 43 | 43 | ||
| 44 | (defcustom eshell-rebind-load-hook '(eshell-rebind-initialize) | 44 | (defcustom eshell-rebind-load-hook nil |
| 45 | "A list of functions to call when loading `eshell-rebind'." | 45 | "A list of functions to call when loading `eshell-rebind'." |
| 46 | :version "24.1" ; removed eshell-rebind-initialize | ||
| 46 | :type 'hook | 47 | :type 'hook |
| 47 | :group 'eshell-rebind) | 48 | :group 'eshell-rebind) |
| 48 | 49 | ||
diff --git a/lisp/eshell/em-script.el b/lisp/eshell/em-script.el index ed4ad1c0712..d76e19cdd07 100644 --- a/lisp/eshell/em-script.el +++ b/lisp/eshell/em-script.el | |||
| @@ -34,8 +34,9 @@ commands, as a script file." | |||
| 34 | 34 | ||
| 35 | ;;; User Variables: | 35 | ;;; User Variables: |
| 36 | 36 | ||
| 37 | (defcustom eshell-script-load-hook '(eshell-script-initialize) | 37 | (defcustom eshell-script-load-hook nil |
| 38 | "A list of functions to call when loading `eshell-script'." | 38 | "A list of functions to call when loading `eshell-script'." |
| 39 | :version "24.1" ; removed eshell-script-initialize | ||
| 39 | :type 'hook | 40 | :type 'hook |
| 40 | :group 'eshell-script) | 41 | :group 'eshell-script) |
| 41 | 42 | ||
diff --git a/lisp/eshell/em-smart.el b/lisp/eshell/em-smart.el index 2c54930e439..f08fec8f8fa 100644 --- a/lisp/eshell/em-smart.el +++ b/lisp/eshell/em-smart.el | |||
| @@ -84,8 +84,9 @@ it to get a real sense of how it works." | |||
| 84 | 84 | ||
| 85 | ;;; User Variables: | 85 | ;;; User Variables: |
| 86 | 86 | ||
| 87 | (defcustom eshell-smart-load-hook '(eshell-smart-initialize) | 87 | (defcustom eshell-smart-load-hook nil |
| 88 | "A list of functions to call when loading `eshell-smart'." | 88 | "A list of functions to call when loading `eshell-smart'." |
| 89 | :version "24.1" ; removed eshell-smart-initialize | ||
| 89 | :type 'hook | 90 | :type 'hook |
| 90 | :group 'eshell-smart) | 91 | :group 'eshell-smart) |
| 91 | 92 | ||
diff --git a/lisp/eshell/em-term.el b/lisp/eshell/em-term.el index be394ba5b22..7d5fbbeabeb 100644 --- a/lisp/eshell/em-term.el +++ b/lisp/eshell/em-term.el | |||
| @@ -46,8 +46,9 @@ which commands are considered visual in nature." | |||
| 46 | 46 | ||
| 47 | ;;; User Variables: | 47 | ;;; User Variables: |
| 48 | 48 | ||
| 49 | (defcustom eshell-term-load-hook '(eshell-term-initialize) | 49 | (defcustom eshell-term-load-hook nil |
| 50 | "A list of functions to call when loading `eshell-term'." | 50 | "A list of functions to call when loading `eshell-term'." |
| 51 | :version "24.1" ; removed eshell-term-initialize | ||
| 51 | :type 'hook | 52 | :type 'hook |
| 52 | :group 'eshell-term) | 53 | :group 'eshell-term) |
| 53 | 54 | ||
diff --git a/lisp/eshell/em-unix.el b/lisp/eshell/em-unix.el index dc5650d240e..707f2ebc2ce 100644 --- a/lisp/eshell/em-unix.el +++ b/lisp/eshell/em-unix.el | |||
| @@ -53,8 +53,9 @@ by name)." | |||
| 53 | :tag "UNIX commands in Lisp" | 53 | :tag "UNIX commands in Lisp" |
| 54 | :group 'eshell-module) | 54 | :group 'eshell-module) |
| 55 | 55 | ||
| 56 | (defcustom eshell-unix-load-hook '(eshell-unix-initialize) | 56 | (defcustom eshell-unix-load-hook nil |
| 57 | "A list of functions to run when `eshell-unix' is loaded." | 57 | "A list of functions to run when `eshell-unix' is loaded." |
| 58 | :version "24.1" ; removed eshell-unix-initialize | ||
| 58 | :type 'hook | 59 | :type 'hook |
| 59 | :group 'eshell-unix) | 60 | :group 'eshell-unix) |
| 60 | 61 | ||
| @@ -587,7 +588,7 @@ symlink, then revert to the system's definition of cat." | |||
| 587 | (setq args (eshell-stringify-list (eshell-flatten-list args))) | 588 | (setq args (eshell-stringify-list (eshell-flatten-list args))) |
| 588 | (if (or eshell-in-pipeline-p | 589 | (if (or eshell-in-pipeline-p |
| 589 | (catch 'special | 590 | (catch 'special |
| 590 | (eshell-for arg args | 591 | (dolist (arg args) |
| 591 | (unless (or (and (stringp arg) | 592 | (unless (or (and (stringp arg) |
| 592 | (> (length arg) 0) | 593 | (> (length arg) 0) |
| 593 | (eq (aref arg 0) ?-)) | 594 | (eq (aref arg 0) ?-)) |
| @@ -610,12 +611,12 @@ symlink, then revert to the system's definition of cat." | |||
| 610 | :show-usage | 611 | :show-usage |
| 611 | :usage "[OPTION] FILE... | 612 | :usage "[OPTION] FILE... |
| 612 | Concatenate FILE(s), or standard input, to standard output.") | 613 | Concatenate FILE(s), or standard input, to standard output.") |
| 613 | (eshell-for file args | 614 | (dolist (file args) |
| 614 | (if (string= file "-") | 615 | (if (string= file "-") |
| 615 | (throw 'eshell-external | 616 | (throw 'eshell-external |
| 616 | (eshell-external-command "cat" args)))) | 617 | (eshell-external-command "cat" args)))) |
| 617 | (let ((curbuf (current-buffer))) | 618 | (let ((curbuf (current-buffer))) |
| 618 | (eshell-for file args | 619 | (dolist (file args) |
| 619 | (with-temp-buffer | 620 | (with-temp-buffer |
| 620 | (insert-file-contents file) | 621 | (insert-file-contents file) |
| 621 | (goto-char (point-min)) | 622 | (goto-char (point-min)) |
| @@ -851,7 +852,7 @@ external command." | |||
| 851 | (let ((ext-du (eshell-search-path "du"))) | 852 | (let ((ext-du (eshell-search-path "du"))) |
| 852 | (if (and ext-du | 853 | (if (and ext-du |
| 853 | (not (catch 'have-ange-path | 854 | (not (catch 'have-ange-path |
| 854 | (eshell-for arg args | 855 | (dolist (arg args) |
| 855 | (if (string-equal | 856 | (if (string-equal |
| 856 | (file-remote-p (expand-file-name arg) 'method) "ftp") | 857 | (file-remote-p (expand-file-name arg) 'method) "ftp") |
| 857 | (throw 'have-ange-path t)))))) | 858 | (throw 'have-ange-path t)))))) |
| @@ -1055,7 +1056,7 @@ Become another USER during a login session.") | |||
| 1055 | "localhost")) | 1056 | "localhost")) |
| 1056 | (dir (or (file-remote-p default-directory 'localname) | 1057 | (dir (or (file-remote-p default-directory 'localname) |
| 1057 | (expand-file-name default-directory)))) | 1058 | (expand-file-name default-directory)))) |
| 1058 | (eshell-for arg args | 1059 | (dolist (arg args) |
| 1059 | (if (string-equal arg "-") (setq login t) (setq user arg))) | 1060 | (if (string-equal arg "-") (setq login t) (setq user arg))) |
| 1060 | ;; `eshell-eval-using-options' does not handle "-". | 1061 | ;; `eshell-eval-using-options' does not handle "-". |
| 1061 | (if (member "-" orig-args) (setq login t)) | 1062 | (if (member "-" orig-args) (setq login t)) |
diff --git a/lisp/eshell/esh-arg.el b/lisp/eshell/esh-arg.el index f42440ae4ec..1fb8b7f4c32 100644 --- a/lisp/eshell/esh-arg.el +++ b/lisp/eshell/esh-arg.el | |||
| @@ -117,8 +117,9 @@ treated as a literal character." | |||
| 117 | 117 | ||
| 118 | ;;; User Variables: | 118 | ;;; User Variables: |
| 119 | 119 | ||
| 120 | (defcustom eshell-arg-load-hook '(eshell-arg-initialize) | 120 | (defcustom eshell-arg-load-hook nil |
| 121 | "A hook that gets run when `eshell-arg' is loaded." | 121 | "A hook that gets run when `eshell-arg' is loaded." |
| 122 | :version "24.1" ; removed eshell-arg-initialize | ||
| 122 | :type 'hook | 123 | :type 'hook |
| 123 | :group 'eshell-arg) | 124 | :group 'eshell-arg) |
| 124 | 125 | ||
diff --git a/lisp/eshell/esh-cmd.el b/lisp/eshell/esh-cmd.el index 0567beb9a53..bdcdc453272 100644 --- a/lisp/eshell/esh-cmd.el +++ b/lisp/eshell/esh-cmd.el | |||
| @@ -229,8 +229,9 @@ return non-nil if the command is complex." | |||
| 229 | 229 | ||
| 230 | ;;; User Variables: | 230 | ;;; User Variables: |
| 231 | 231 | ||
| 232 | (defcustom eshell-cmd-load-hook '(eshell-cmd-initialize) | 232 | (defcustom eshell-cmd-load-hook nil |
| 233 | "A hook that gets run when `eshell-cmd' is loaded." | 233 | "A hook that gets run when `eshell-cmd' is loaded." |
| 234 | :version "24.1" ; removed eshell-cmd-initialize | ||
| 234 | :type 'hook | 235 | :type 'hook |
| 235 | :group 'eshell-cmd) | 236 | :group 'eshell-cmd) |
| 236 | 237 | ||
| @@ -319,18 +320,6 @@ otherwise t.") | |||
| 319 | (add-hook 'pcomplete-try-first-hook | 320 | (add-hook 'pcomplete-try-first-hook |
| 320 | 'eshell-complete-lisp-symbols nil t))) | 321 | 'eshell-complete-lisp-symbols nil t))) |
| 321 | 322 | ||
| 322 | (eshell-deftest var last-result-var | ||
| 323 | "\"last result\" variable" | ||
| 324 | (eshell-command-result-p "+ 1 2; + $$ 2" "3\n5\n")) | ||
| 325 | |||
| 326 | (eshell-deftest var last-result-var2 | ||
| 327 | "\"last result\" variable" | ||
| 328 | (eshell-command-result-p "+ 1 2; + $$ $$" "3\n6\n")) | ||
| 329 | |||
| 330 | (eshell-deftest var last-arg-var | ||
| 331 | "\"last arg\" variable" | ||
| 332 | (eshell-command-result-p "+ 1 2; + $_ 4" "3\n6\n")) | ||
| 333 | |||
| 334 | (defun eshell-complete-lisp-symbols () | 323 | (defun eshell-complete-lisp-symbols () |
| 335 | "If there is a user reference, complete it." | 324 | "If there is a user reference, complete it." |
| 336 | (let ((arg (pcomplete-actual-arg))) | 325 | (let ((arg (pcomplete-actual-arg))) |
| @@ -440,32 +429,12 @@ hooks should be run before and after the command." | |||
| 440 | (eq (caar terms) 'eshell-command-to-value)) | 429 | (eq (caar terms) 'eshell-command-to-value)) |
| 441 | (car (cdar terms)))) | 430 | (car (cdar terms)))) |
| 442 | 431 | ||
| 443 | (eshell-deftest cmd lisp-command | ||
| 444 | "Evaluate Lisp command" | ||
| 445 | (eshell-command-result-p "(+ 1 2)" "3")) | ||
| 446 | |||
| 447 | (eshell-deftest cmd lisp-command-args | ||
| 448 | "Evaluate Lisp command (ignore args)" | ||
| 449 | (eshell-command-result-p "(+ 1 2) 3" "3")) | ||
| 450 | |||
| 451 | (defun eshell-rewrite-initial-subcommand (terms) | 432 | (defun eshell-rewrite-initial-subcommand (terms) |
| 452 | "Rewrite a subcommand in initial position, such as '{+ 1 2}'." | 433 | "Rewrite a subcommand in initial position, such as '{+ 1 2}'." |
| 453 | (if (and (listp (car terms)) | 434 | (if (and (listp (car terms)) |
| 454 | (eq (caar terms) 'eshell-as-subcommand)) | 435 | (eq (caar terms) 'eshell-as-subcommand)) |
| 455 | (car terms))) | 436 | (car terms))) |
| 456 | 437 | ||
| 457 | (eshell-deftest cmd subcommand | ||
| 458 | "Run subcommand" | ||
| 459 | (eshell-command-result-p "{+ 1 2}" "3\n")) | ||
| 460 | |||
| 461 | (eshell-deftest cmd subcommand-args | ||
| 462 | "Run subcommand (ignore args)" | ||
| 463 | (eshell-command-result-p "{+ 1 2} 3" "3\n")) | ||
| 464 | |||
| 465 | (eshell-deftest cmd subcommand-lisp | ||
| 466 | "Run subcommand + Lisp form" | ||
| 467 | (eshell-command-result-p "{(+ 1 2)}" "3\n")) | ||
| 468 | |||
| 469 | (defun eshell-rewrite-named-command (terms) | 438 | (defun eshell-rewrite-named-command (terms) |
| 470 | "If no other rewriting rule transforms TERMS, assume a named command." | 439 | "If no other rewriting rule transforms TERMS, assume a named command." |
| 471 | (let ((sym (if eshell-in-pipeline-p | 440 | (let ((sym (if eshell-in-pipeline-p |
| @@ -477,10 +446,6 @@ hooks should be run before and after the command." | |||
| 477 | (list sym cmd (append (list 'list) (cdr terms))) | 446 | (list sym cmd (append (list 'list) (cdr terms))) |
| 478 | (list sym cmd)))) | 447 | (list sym cmd)))) |
| 479 | 448 | ||
| 480 | (eshell-deftest cmd named-command | ||
| 481 | "Execute named command" | ||
| 482 | (eshell-command-result-p "+ 1 2" "3\n")) | ||
| 483 | |||
| 484 | (defvar eshell-command-body) | 449 | (defvar eshell-command-body) |
| 485 | (defvar eshell-test-body) | 450 | (defvar eshell-test-body) |
| 486 | 451 | ||
| @@ -987,7 +952,7 @@ at the moment are: | |||
| 987 | (not (member name eshell-complex-commands)) | 952 | (not (member name eshell-complex-commands)) |
| 988 | (catch 'simple | 953 | (catch 'simple |
| 989 | (progn | 954 | (progn |
| 990 | (eshell-for pred eshell-complex-commands | 955 | (dolist (pred eshell-complex-commands) |
| 991 | (if (and (functionp pred) | 956 | (if (and (functionp pred) |
| 992 | (funcall pred name)) | 957 | (funcall pred name)) |
| 993 | (throw 'simple nil))) | 958 | (throw 'simple nil))) |
| @@ -1165,7 +1130,7 @@ be finished later after the completion of an asynchronous subprocess." | |||
| 1165 | (if (and (eq (car form) 'let) | 1130 | (if (and (eq (car form) 'let) |
| 1166 | (not (eq (car (cadr args)) 'eshell-do-eval))) | 1131 | (not (eq (car (cadr args)) 'eshell-do-eval))) |
| 1167 | (eshell-manipulate "evaluating let args" | 1132 | (eshell-manipulate "evaluating let args" |
| 1168 | (eshell-for letarg (car args) | 1133 | (dolist (letarg (car args)) |
| 1169 | (if (and (listp letarg) | 1134 | (if (and (listp letarg) |
| 1170 | (not (eq (cadr letarg) 'quote))) | 1135 | (not (eq (cadr letarg) 'quote))) |
| 1171 | (setcdr letarg | 1136 | (setcdr letarg |
| @@ -1241,7 +1206,7 @@ be finished later after the completion of an asynchronous subprocess." | |||
| 1241 | 1206 | ||
| 1242 | (defun eshell/which (command &rest names) | 1207 | (defun eshell/which (command &rest names) |
| 1243 | "Identify the COMMAND, and where it is located." | 1208 | "Identify the COMMAND, and where it is located." |
| 1244 | (eshell-for name (cons command names) | 1209 | (dolist (name (cons command names)) |
| 1245 | (let (program alias direct) | 1210 | (let (program alias direct) |
| 1246 | (if (eq (aref name 0) eshell-explicit-command-char) | 1211 | (if (eq (aref name 0) eshell-explicit-command-char) |
| 1247 | (setq name (substring name 1) | 1212 | (setq name (substring name 1) |
diff --git a/lisp/eshell/esh-ext.el b/lisp/eshell/esh-ext.el index 7128d7e4749..3acbeac0b89 100644 --- a/lisp/eshell/esh-ext.el +++ b/lisp/eshell/esh-ext.el | |||
| @@ -46,8 +46,9 @@ loaded into memory, thus beginning a new process." | |||
| 46 | 46 | ||
| 47 | ;;; User Variables: | 47 | ;;; User Variables: |
| 48 | 48 | ||
| 49 | (defcustom eshell-ext-load-hook '(eshell-ext-initialize) | 49 | (defcustom eshell-ext-load-hook nil |
| 50 | "A hook that gets run when `eshell-ext' is loaded." | 50 | "A hook that gets run when `eshell-ext' is loaded." |
| 51 | :version "24.1" ; removed eshell-ext-initialize | ||
| 51 | :type 'hook | 52 | :type 'hook |
| 52 | :group 'eshell-ext) | 53 | :group 'eshell-ext) |
| 53 | 54 | ||
| @@ -263,7 +264,7 @@ line of the form #!<interp>." | |||
| 263 | (let ((finterp | 264 | (let ((finterp |
| 264 | (catch 'found | 265 | (catch 'found |
| 265 | (ignore | 266 | (ignore |
| 266 | (eshell-for possible eshell-interpreter-alist | 267 | (dolist (possible eshell-interpreter-alist) |
| 267 | (cond | 268 | (cond |
| 268 | ((functionp (car possible)) | 269 | ((functionp (car possible)) |
| 269 | (and (funcall (car possible) file) | 270 | (and (funcall (car possible) file) |
diff --git a/lisp/eshell/esh-io.el b/lisp/eshell/esh-io.el index ef8966f1d7d..71fae34b360 100644 --- a/lisp/eshell/esh-io.el +++ b/lisp/eshell/esh-io.el | |||
| @@ -71,8 +71,9 @@ though they were files." | |||
| 71 | 71 | ||
| 72 | ;;; User Variables: | 72 | ;;; User Variables: |
| 73 | 73 | ||
| 74 | (defcustom eshell-io-load-hook '(eshell-io-initialize) | 74 | (defcustom eshell-io-load-hook nil |
| 75 | "A hook that gets run when `eshell-io' is loaded." | 75 | "A hook that gets run when `eshell-io' is loaded." |
| 76 | :version "24.1" ; removed eshell-io-initialize | ||
| 76 | :type 'hook | 77 | :type 'hook |
| 77 | :group 'eshell-io) | 78 | :group 'eshell-io) |
| 78 | 79 | ||
diff --git a/lisp/eshell/esh-mode.el b/lisp/eshell/esh-mode.el index 3735ee35fd5..10623dba8e3 100644 --- a/lisp/eshell/esh-mode.el +++ b/lisp/eshell/esh-mode.el | |||
| @@ -89,9 +89,10 @@ That is to say, the first time during an Emacs session." | |||
| 89 | :type 'hook | 89 | :type 'hook |
| 90 | :group 'eshell-mode) | 90 | :group 'eshell-mode) |
| 91 | 91 | ||
| 92 | (defcustom eshell-exit-hook '(eshell-query-kill-processes) | 92 | (defcustom eshell-exit-hook nil |
| 93 | "A hook that is run whenever `eshell' is exited. | 93 | "A hook that is run whenever `eshell' is exited. |
| 94 | This hook is only run if exiting actually kills the buffer." | 94 | This hook is only run if exiting actually kills the buffer." |
| 95 | :version "24.1" ; removed eshell-query-kill-processes | ||
| 95 | :type 'hook | 96 | :type 'hook |
| 96 | :group 'eshell-mode) | 97 | :group 'eshell-mode) |
| 97 | 98 | ||
| @@ -287,6 +288,17 @@ This is used by `eshell-watch-for-password-prompt'." | |||
| 287 | 288 | ||
| 288 | ;;; User Functions: | 289 | ;;; User Functions: |
| 289 | 290 | ||
| 291 | (defun eshell-kill-buffer-function () | ||
| 292 | "Function added to `kill-buffer-hook' in Eshell buffers. | ||
| 293 | This runs the function `eshell-kill-processes-on-exit', | ||
| 294 | and the hook `eshell-exit-hook'." | ||
| 295 | ;; It's fine to run this unconditionally since it can be customized | ||
| 296 | ;; via the `eshell-kill-processes-on-exit' variable. | ||
| 297 | (and (fboundp 'eshell-query-kill-processes) | ||
| 298 | (not (memq 'eshell-query-kill-processes eshell-exit-hook)) | ||
| 299 | (eshell-query-kill-processes)) | ||
| 300 | (run-hooks 'eshell-exit-hook)) | ||
| 301 | |||
| 290 | ;;;###autoload | 302 | ;;;###autoload |
| 291 | (defun eshell-mode () | 303 | (defun eshell-mode () |
| 292 | "Emacs shell interactive mode. | 304 | "Emacs shell interactive mode. |
| @@ -389,7 +401,7 @@ This is used by `eshell-watch-for-password-prompt'." | |||
| 389 | ;; load extension modules into memory. This will cause any global | 401 | ;; load extension modules into memory. This will cause any global |
| 390 | ;; variables they define to be visible, since some of the core | 402 | ;; variables they define to be visible, since some of the core |
| 391 | ;; modules sometimes take advantage of their functionality if used. | 403 | ;; modules sometimes take advantage of their functionality if used. |
| 392 | (eshell-for module eshell-modules-list | 404 | (dolist (module eshell-modules-list) |
| 393 | (let ((module-fullname (symbol-name module)) | 405 | (let ((module-fullname (symbol-name module)) |
| 394 | module-shortname) | 406 | module-shortname) |
| 395 | (if (string-match "^eshell-\\(.*\\)" module-fullname) | 407 | (if (string-match "^eshell-\\(.*\\)" module-fullname) |
| @@ -403,17 +415,15 @@ This is used by `eshell-watch-for-password-prompt'." | |||
| 403 | (unless (file-exists-p eshell-directory-name) | 415 | (unless (file-exists-p eshell-directory-name) |
| 404 | (eshell-make-private-directory eshell-directory-name t)) | 416 | (eshell-make-private-directory eshell-directory-name t)) |
| 405 | 417 | ||
| 406 | ;; load core Eshell modules for this session | 418 | ;; Load core Eshell modules, then extension modules, for this session. |
| 407 | (eshell-for module (eshell-subgroups 'eshell) | 419 | (dolist (module (append (eshell-subgroups 'eshell) eshell-modules-list)) |
| 408 | (run-hooks (intern-soft (concat (symbol-name module) | 420 | (let ((load-hook (intern-soft (format "%s-load-hook" module))) |
| 409 | "-load-hook")))) | 421 | (initfunc (intern-soft (format "%s-initialize" module)))) |
| 410 | 422 | (when (and load-hook (boundp load-hook)) | |
| 411 | ;; load extension modules for this session | 423 | (if (memq initfunc (symbol-value load-hook)) (setq initfunc nil)) |
| 412 | (eshell-for module eshell-modules-list | 424 | (run-hooks load-hook)) |
| 413 | (let ((load-hook (intern-soft (concat (symbol-name module) | 425 | ;; So we don't need the -initialize functions on the hooks (b#5375). |
| 414 | "-load-hook")))) | 426 | (and initfunc (fboundp initfunc) (funcall initfunc)))) |
| 415 | (if (and load-hook (boundp load-hook)) | ||
| 416 | (run-hooks load-hook)))) | ||
| 417 | 427 | ||
| 418 | (if eshell-send-direct-to-subprocesses | 428 | (if eshell-send-direct-to-subprocesses |
| 419 | (add-hook 'pre-command-hook 'eshell-intercept-commands t t)) | 429 | (add-hook 'pre-command-hook 'eshell-intercept-commands t t)) |
| @@ -428,10 +438,7 @@ This is used by `eshell-watch-for-password-prompt'." | |||
| 428 | (add-hook 'eshell-pre-command-hook 'eshell-command-started nil t) | 438 | (add-hook 'eshell-pre-command-hook 'eshell-command-started nil t) |
| 429 | (add-hook 'eshell-post-command-hook 'eshell-command-finished nil t)) | 439 | (add-hook 'eshell-post-command-hook 'eshell-command-finished nil t)) |
| 430 | 440 | ||
| 431 | (add-hook 'kill-buffer-hook | 441 | (add-hook 'kill-buffer-hook 'eshell-kill-buffer-function t t) |
| 432 | (function | ||
| 433 | (lambda () | ||
| 434 | (run-hooks 'eshell-exit-hook))) t t) | ||
| 435 | 442 | ||
| 436 | (if eshell-first-time-p | 443 | (if eshell-first-time-p |
| 437 | (run-hooks 'eshell-first-time-mode-hook)) | 444 | (run-hooks 'eshell-first-time-mode-hook)) |
| @@ -440,19 +447,6 @@ This is used by `eshell-watch-for-password-prompt'." | |||
| 440 | 447 | ||
| 441 | (put 'eshell-mode 'mode-class 'special) | 448 | (put 'eshell-mode 'mode-class 'special) |
| 442 | 449 | ||
| 443 | (eshell-deftest mode major-mode | ||
| 444 | "Major mode is correct" | ||
| 445 | (eq major-mode 'eshell-mode)) | ||
| 446 | |||
| 447 | (eshell-deftest mode eshell-mode-variable | ||
| 448 | "`eshell-mode' is true" | ||
| 449 | (eq eshell-mode t)) | ||
| 450 | |||
| 451 | (eshell-deftest var window-height | ||
| 452 | "LINES equals window height" | ||
| 453 | (let ((eshell-stringify-t t)) | ||
| 454 | (eshell-command-result-p "= $LINES (window-height)" "t\n"))) | ||
| 455 | |||
| 456 | (defun eshell-command-started () | 450 | (defun eshell-command-started () |
| 457 | "Indicate in the modeline that a command has started." | 451 | "Indicate in the modeline that a command has started." |
| 458 | (setq eshell-command-running-string "**") | 452 | (setq eshell-command-running-string "**") |
| @@ -463,13 +457,6 @@ This is used by `eshell-watch-for-password-prompt'." | |||
| 463 | (setq eshell-command-running-string "--") | 457 | (setq eshell-command-running-string "--") |
| 464 | (force-mode-line-update)) | 458 | (force-mode-line-update)) |
| 465 | 459 | ||
| 466 | (eshell-deftest mode command-running-p | ||
| 467 | "Modeline shows no command running" | ||
| 468 | (or (featurep 'xemacs) | ||
| 469 | (not eshell-status-in-modeline) | ||
| 470 | (and (memq 'eshell-command-running-string mode-line-format) | ||
| 471 | (equal eshell-command-running-string "--")))) | ||
| 472 | |||
| 473 | ;;; Internal Functions: | 460 | ;;; Internal Functions: |
| 474 | 461 | ||
| 475 | (defun eshell-toggle-direct-send () | 462 | (defun eshell-toggle-direct-send () |
| @@ -539,20 +526,6 @@ This is used by `eshell-watch-for-password-prompt'." | |||
| 539 | (= (1+ pos) limit)) | 526 | (= (1+ pos) limit)) |
| 540 | (forward-char 1)))) | 527 | (forward-char 1)))) |
| 541 | 528 | ||
| 542 | (eshell-deftest arg forward-arg | ||
| 543 | "Move across command arguments" | ||
| 544 | (eshell-insert-command "echo $(+ 1 (- 4 3)) \"alpha beta\" file" 'ignore) | ||
| 545 | (let ((here (point)) begin valid) | ||
| 546 | (eshell-bol) | ||
| 547 | (setq begin (point)) | ||
| 548 | (eshell-forward-argument 4) | ||
| 549 | (setq valid (= here (point))) | ||
| 550 | (eshell-backward-argument 4) | ||
| 551 | (prog1 | ||
| 552 | (and valid (= begin (point))) | ||
| 553 | (eshell-bol) | ||
| 554 | (delete-region (point) (point-max))))) | ||
| 555 | |||
| 556 | (defun eshell-forward-argument (&optional arg) | 529 | (defun eshell-forward-argument (&optional arg) |
| 557 | "Move forward ARG arguments." | 530 | "Move forward ARG arguments." |
| 558 | (interactive "p") | 531 | (interactive "p") |
| @@ -652,17 +625,6 @@ waiting for input." | |||
| 652 | (interactive "P") | 625 | (interactive "P") |
| 653 | (eshell-send-input use-region t)) | 626 | (eshell-send-input use-region t)) |
| 654 | 627 | ||
| 655 | (eshell-deftest mode queue-input | ||
| 656 | "Queue command input" | ||
| 657 | (eshell-insert-command "sleep 2") | ||
| 658 | (eshell-insert-command "echo alpha" 'eshell-queue-input) | ||
| 659 | (let ((count 10)) | ||
| 660 | (while (and eshell-current-command | ||
| 661 | (> count 0)) | ||
| 662 | (sit-for 1 0) | ||
| 663 | (setq count (1- count)))) | ||
| 664 | (eshell-match-result "alpha\n")) | ||
| 665 | |||
| 666 | (defun eshell-send-input (&optional use-region queue-p no-newline) | 628 | (defun eshell-send-input (&optional use-region queue-p no-newline) |
| 667 | "Send the input received to Eshell for parsing and processing. | 629 | "Send the input received to Eshell for parsing and processing. |
| 668 | After `eshell-last-output-end', sends all text from that marker to | 630 | After `eshell-last-output-end', sends all text from that marker to |
| @@ -741,20 +703,6 @@ newline." | |||
| 741 | (run-hooks 'eshell-post-command-hook) | 703 | (run-hooks 'eshell-post-command-hook) |
| 742 | (insert-and-inherit input))))))))) | 704 | (insert-and-inherit input))))))))) |
| 743 | 705 | ||
| 744 | ; (eshell-deftest proc send-to-subprocess | ||
| 745 | ; "Send input to a subprocess" | ||
| 746 | ; ;; jww (1999-12-06): what about when bc is unavailable? | ||
| 747 | ; (if (not (eshell-search-path "bc")) | ||
| 748 | ; t | ||
| 749 | ; (eshell-insert-command "bc") | ||
| 750 | ; (eshell-insert-command "1 + 2") | ||
| 751 | ; (sit-for 1 0) | ||
| 752 | ; (forward-line -1) | ||
| 753 | ; (prog1 | ||
| 754 | ; (looking-at "3\n") | ||
| 755 | ; (eshell-insert-command "quit") | ||
| 756 | ; (sit-for 1 0)))) | ||
| 757 | |||
| 758 | (defsubst eshell-kill-new () | 706 | (defsubst eshell-kill-new () |
| 759 | "Add the last input text to the kill ring." | 707 | "Add the last input text to the kill ring." |
| 760 | (kill-ring-save eshell-last-input-start eshell-last-input-end)) | 708 | (kill-ring-save eshell-last-input-start eshell-last-input-end)) |
| @@ -900,14 +848,6 @@ Does not delete the prompt." | |||
| 900 | (insert "*** output flushed ***\n") | 848 | (insert "*** output flushed ***\n") |
| 901 | (delete-region (point) (eshell-end-of-output)))) | 849 | (delete-region (point) (eshell-end-of-output)))) |
| 902 | 850 | ||
| 903 | (eshell-deftest io flush-output | ||
| 904 | "Flush previous output" | ||
| 905 | (eshell-insert-command "echo alpha") | ||
| 906 | (eshell-kill-output) | ||
| 907 | (and (eshell-match-result (regexp-quote "*** output flushed ***\n")) | ||
| 908 | (forward-line) | ||
| 909 | (= (point) eshell-last-output-start))) | ||
| 910 | |||
| 911 | (defun eshell-show-output (&optional arg) | 851 | (defun eshell-show-output (&optional arg) |
| 912 | "Display start of this batch of interpreter output at top of window. | 852 | "Display start of this batch of interpreter output at top of window. |
| 913 | Sets mark to the value of point when this command is run. | 853 | Sets mark to the value of point when this command is run. |
| @@ -968,12 +908,6 @@ When run interactively, widen the buffer first." | |||
| 968 | (goto-char eshell-last-output-end) | 908 | (goto-char eshell-last-output-end) |
| 969 | (insert-and-inherit input))) | 909 | (insert-and-inherit input))) |
| 970 | 910 | ||
| 971 | (eshell-deftest mode run-old-command | ||
| 972 | "Re-run an old command" | ||
| 973 | (eshell-insert-command "echo alpha") | ||
| 974 | (goto-char eshell-last-input-start) | ||
| 975 | (string= (eshell-get-old-input) "echo alpha")) | ||
| 976 | |||
| 977 | (defun eshell/exit () | 911 | (defun eshell/exit () |
| 978 | "Leave or kill the Eshell buffer, depending on `eshell-kill-on-exit'." | 912 | "Leave or kill the Eshell buffer, depending on `eshell-kill-on-exit'." |
| 979 | (throw 'eshell-terminal t)) | 913 | (throw 'eshell-terminal t)) |
diff --git a/lisp/eshell/esh-module.el b/lisp/eshell/esh-module.el index 5a62c71355c..1581d05889e 100644 --- a/lisp/eshell/esh-module.el +++ b/lisp/eshell/esh-module.el | |||
| @@ -43,7 +43,7 @@ customizing the variable `eshell-modules-list'." | |||
| 43 | 43 | ||
| 44 | (defcustom eshell-module-unload-hook | 44 | (defcustom eshell-module-unload-hook |
| 45 | '(eshell-unload-extension-modules) | 45 | '(eshell-unload-extension-modules) |
| 46 | "*A hook run when `eshell-module' is unloaded." | 46 | "A hook run when `eshell-module' is unloaded." |
| 47 | :type 'hook | 47 | :type 'hook |
| 48 | :group 'eshell-module) | 48 | :group 'eshell-module) |
| 49 | 49 | ||
| @@ -61,7 +61,7 @@ customizing the variable `eshell-modules-list'." | |||
| 61 | eshell-script | 61 | eshell-script |
| 62 | eshell-term | 62 | eshell-term |
| 63 | eshell-unix) | 63 | eshell-unix) |
| 64 | "*A list of optional add-on modules to be loaded by Eshell. | 64 | "A list of optional add-on modules to be loaded by Eshell. |
| 65 | Changes will only take effect in future Eshell buffers." | 65 | Changes will only take effect in future Eshell buffers." |
| 66 | :type (append | 66 | :type (append |
| 67 | (list 'set ':tag "Supported modules") | 67 | (list 'set ':tag "Supported modules") |
| @@ -92,7 +92,7 @@ customization group. Example: `eshell-cmpl' for that module." | |||
| 92 | 92 | ||
| 93 | (defun eshell-unload-extension-modules () | 93 | (defun eshell-unload-extension-modules () |
| 94 | "Unload any memory resident extension modules." | 94 | "Unload any memory resident extension modules." |
| 95 | (eshell-for module (eshell-subgroups 'eshell-module) | 95 | (dolist (module (eshell-subgroups 'eshell-module)) |
| 96 | (if (featurep module) | 96 | (if (featurep module) |
| 97 | (ignore-errors | 97 | (ignore-errors |
| 98 | (message "Unloading %s..." (symbol-name module)) | 98 | (message "Unloading %s..." (symbol-name module)) |
diff --git a/lisp/eshell/esh-proc.el b/lisp/eshell/esh-proc.el index f697a400556..eeaccc4b890 100644 --- a/lisp/eshell/esh-proc.el +++ b/lisp/eshell/esh-proc.el | |||
| @@ -38,8 +38,9 @@ finish." | |||
| 38 | 38 | ||
| 39 | ;;; User Variables: | 39 | ;;; User Variables: |
| 40 | 40 | ||
| 41 | (defcustom eshell-proc-load-hook '(eshell-proc-initialize) | 41 | (defcustom eshell-proc-load-hook nil |
| 42 | "A hook that gets run when `eshell-proc' is loaded." | 42 | "A hook that gets run when `eshell-proc' is loaded." |
| 43 | :version "24.1" ; removed eshell-proc-initialize | ||
| 43 | :type 'hook | 44 | :type 'hook |
| 44 | :group 'eshell-proc) | 45 | :group 'eshell-proc) |
| 45 | 46 | ||
| @@ -94,13 +95,14 @@ is created." | |||
| 94 | :type 'hook | 95 | :type 'hook |
| 95 | :group 'eshell-proc) | 96 | :group 'eshell-proc) |
| 96 | 97 | ||
| 97 | (defcustom eshell-kill-hook '(eshell-reset-after-proc) | 98 | (defcustom eshell-kill-hook nil |
| 98 | "Called when a process run by `eshell-gather-process-output' has ended. | 99 | "Called when a process run by `eshell-gather-process-output' has ended. |
| 99 | It is passed two arguments: the process that was just ended, and the | 100 | It is passed two arguments: the process that was just ended, and the |
| 100 | termination status (as a string). Note that the first argument may be | 101 | termination status (as a string). Note that the first argument may be |
| 101 | nil, in which case the user attempted to send a signal, but there was | 102 | nil, in which case the user attempted to send a signal, but there was |
| 102 | no relevant process. This can be used for displaying help | 103 | no relevant process. This can be used for displaying help |
| 103 | information, for example." | 104 | information, for example." |
| 105 | :version "24.1" ; removed eshell-reset-after-proc | ||
| 104 | :type 'hook | 106 | :type 'hook |
| 105 | :group 'eshell-proc) | 107 | :group 'eshell-proc) |
| 106 | 108 | ||
| @@ -113,6 +115,14 @@ information, for example." | |||
| 113 | 115 | ||
| 114 | ;;; Functions: | 116 | ;;; Functions: |
| 115 | 117 | ||
| 118 | (defun eshell-kill-process-function (proc status) | ||
| 119 | "Function run when killing a process. | ||
| 120 | Runs `eshell-reset-after-proc' and `eshell-kill-hook', passing arguments | ||
| 121 | PROC and STATUS to both." | ||
| 122 | (or (memq 'eshell-reset-after-proc eshell-kill-hook) | ||
| 123 | (eshell-reset-after-proc proc status)) | ||
| 124 | (run-hook-with-args 'eshell-kill-hook proc status)) | ||
| 125 | |||
| 116 | (defun eshell-proc-initialize () | 126 | (defun eshell-proc-initialize () |
| 117 | "Initialize the process handling code." | 127 | "Initialize the process handling code." |
| 118 | (make-local-variable 'eshell-process-list) | 128 | (make-local-variable 'eshell-process-list) |
| @@ -346,7 +356,7 @@ See `eshell-needs-pipe'." | |||
| 346 | (eshell-update-markers eshell-last-output-end) | 356 | (eshell-update-markers eshell-last-output-end) |
| 347 | ;; Simulate the effect of eshell-sentinel. | 357 | ;; Simulate the effect of eshell-sentinel. |
| 348 | (eshell-close-handles (if (numberp exit-status) exit-status -1)) | 358 | (eshell-close-handles (if (numberp exit-status) exit-status -1)) |
| 349 | (run-hook-with-args 'eshell-kill-hook command exit-status) | 359 | (eshell-kill-process-function command exit-status) |
| 350 | (or eshell-in-pipeline-p | 360 | (or eshell-in-pipeline-p |
| 351 | (setq eshell-last-sync-output-start nil)) | 361 | (setq eshell-last-sync-output-start nil)) |
| 352 | (if (not (numberp exit-status)) | 362 | (if (not (numberp exit-status)) |
| @@ -391,14 +401,14 @@ PROC is the process that's exiting. STRING is the exit message." | |||
| 391 | (eshell-close-handles (process-exit-status proc) 'nil | 401 | (eshell-close-handles (process-exit-status proc) 'nil |
| 392 | (cadr entry)))) | 402 | (cadr entry)))) |
| 393 | (eshell-remove-process-entry entry)))) | 403 | (eshell-remove-process-entry entry)))) |
| 394 | (run-hook-with-args 'eshell-kill-hook proc string))))) | 404 | (eshell-kill-process-function proc string))))) |
| 395 | 405 | ||
| 396 | (defun eshell-process-interact (func &optional all query) | 406 | (defun eshell-process-interact (func &optional all query) |
| 397 | "Interact with a process, using PROMPT if more than one, via FUNC. | 407 | "Interact with a process, using PROMPT if more than one, via FUNC. |
| 398 | If ALL is non-nil, background processes will be interacted with as well. | 408 | If ALL is non-nil, background processes will be interacted with as well. |
| 399 | If QUERY is non-nil, query the user with QUERY before calling FUNC." | 409 | If QUERY is non-nil, query the user with QUERY before calling FUNC." |
| 400 | (let (defunct result) | 410 | (let (defunct result) |
| 401 | (eshell-for entry eshell-process-list | 411 | (dolist (entry eshell-process-list) |
| 402 | (if (and (memq (process-status (car entry)) | 412 | (if (and (memq (process-status (car entry)) |
| 403 | '(run stop open closed)) | 413 | '(run stop open closed)) |
| 404 | (or all | 414 | (or all |
| @@ -412,7 +422,7 @@ If QUERY is non-nil, query the user with QUERY before calling FUNC." | |||
| 412 | ;; clean up the process list; this can get dirty if an error | 422 | ;; clean up the process list; this can get dirty if an error |
| 413 | ;; occurred that brought the user into the debugger, and then they | 423 | ;; occurred that brought the user into the debugger, and then they |
| 414 | ;; quit, so that the sentinel was never called. | 424 | ;; quit, so that the sentinel was never called. |
| 415 | (eshell-for d defunct | 425 | (dolist (d defunct) |
| 416 | (eshell-remove-process-entry d)) | 426 | (eshell-remove-process-entry d)) |
| 417 | result)) | 427 | result)) |
| 418 | 428 | ||
| @@ -485,31 +495,29 @@ See the variable `eshell-kill-processes-on-exit'." | |||
| 485 | (kill-buffer buf))) | 495 | (kill-buffer buf))) |
| 486 | (message nil)))) | 496 | (message nil)))) |
| 487 | 497 | ||
| 488 | (custom-add-option 'eshell-exit-hook 'eshell-query-kill-processes) | ||
| 489 | |||
| 490 | (defun eshell-interrupt-process () | 498 | (defun eshell-interrupt-process () |
| 491 | "Interrupt a process." | 499 | "Interrupt a process." |
| 492 | (interactive) | 500 | (interactive) |
| 493 | (unless (eshell-process-interact 'interrupt-process) | 501 | (unless (eshell-process-interact 'interrupt-process) |
| 494 | (run-hook-with-args 'eshell-kill-hook nil "interrupt"))) | 502 | (eshell-kill-process-function nil "interrupt"))) |
| 495 | 503 | ||
| 496 | (defun eshell-kill-process () | 504 | (defun eshell-kill-process () |
| 497 | "Kill a process." | 505 | "Kill a process." |
| 498 | (interactive) | 506 | (interactive) |
| 499 | (unless (eshell-process-interact 'kill-process) | 507 | (unless (eshell-process-interact 'kill-process) |
| 500 | (run-hook-with-args 'eshell-kill-hook nil "killed"))) | 508 | (eshell-kill-process-function nil "killed"))) |
| 501 | 509 | ||
| 502 | (defun eshell-quit-process () | 510 | (defun eshell-quit-process () |
| 503 | "Send quit signal to process." | 511 | "Send quit signal to process." |
| 504 | (interactive) | 512 | (interactive) |
| 505 | (unless (eshell-process-interact 'quit-process) | 513 | (unless (eshell-process-interact 'quit-process) |
| 506 | (run-hook-with-args 'eshell-kill-hook nil "quit"))) | 514 | (eshell-kill-process-function nil "quit"))) |
| 507 | 515 | ||
| 508 | ;(defun eshell-stop-process () | 516 | ;(defun eshell-stop-process () |
| 509 | ; "Send STOP signal to process." | 517 | ; "Send STOP signal to process." |
| 510 | ; (interactive) | 518 | ; (interactive) |
| 511 | ; (unless (eshell-process-interact 'stop-process) | 519 | ; (unless (eshell-process-interact 'stop-process) |
| 512 | ; (run-hook-with-args 'eshell-kill-hook nil "stopped"))) | 520 | ; (eshell-kill-process-function nil "stopped"))) |
| 513 | 521 | ||
| 514 | ;(defun eshell-continue-process () | 522 | ;(defun eshell-continue-process () |
| 515 | ; "Send CONTINUE signal to process." | 523 | ; "Send CONTINUE signal to process." |
| @@ -518,7 +526,7 @@ See the variable `eshell-kill-processes-on-exit'." | |||
| 518 | ; ;; jww (1999-09-17): this signal is not dealt with yet. For | 526 | ; ;; jww (1999-09-17): this signal is not dealt with yet. For |
| 519 | ; ;; example, `eshell-reset' will be called, and so will | 527 | ; ;; example, `eshell-reset' will be called, and so will |
| 520 | ; ;; `eshell-resume-eval'. | 528 | ; ;; `eshell-resume-eval'. |
| 521 | ; (run-hook-with-args 'eshell-kill-hook nil "continue"))) | 529 | ; (eshell-kill-process-function nil "continue"))) |
| 522 | 530 | ||
| 523 | (defun eshell-send-eof-to-process () | 531 | (defun eshell-send-eof-to-process () |
| 524 | "Send EOF to process." | 532 | "Send EOF to process." |
diff --git a/lisp/eshell/esh-util.el b/lisp/eshell/esh-util.el index 2de147acb00..dbe4f824deb 100644 --- a/lisp/eshell/esh-util.el +++ b/lisp/eshell/esh-util.el | |||
| @@ -147,18 +147,6 @@ function `string-to-number'." | |||
| 147 | 147 | ||
| 148 | (put 'eshell-condition-case 'lisp-indent-function 2) | 148 | (put 'eshell-condition-case 'lisp-indent-function 2) |
| 149 | 149 | ||
| 150 | (defmacro eshell-deftest (module name label &rest forms) | ||
| 151 | (if (and (fboundp 'cl-compiling-file) (cl-compiling-file)) | ||
| 152 | nil | ||
| 153 | (let ((fsym (intern (concat "eshell-test--" (symbol-name name))))) | ||
| 154 | `(eval-when-compile | ||
| 155 | (ignore | ||
| 156 | (defun ,fsym () ,label | ||
| 157 | (eshell-run-test (quote ,module) (quote ,fsym) ,label | ||
| 158 | (quote (progn ,@forms))))))))) | ||
| 159 | |||
| 160 | (put 'eshell-deftest 'lisp-indent-function 2) | ||
| 161 | |||
| 162 | (defun eshell-find-delimiter | 150 | (defun eshell-find-delimiter |
| 163 | (open close &optional bound reverse-p backslash-p) | 151 | (open close &optional bound reverse-p backslash-p) |
| 164 | "From point, find the CLOSE delimiter corresponding to OPEN. | 152 | "From point, find the CLOSE delimiter corresponding to OPEN. |
| @@ -285,7 +273,6 @@ Prepend remote identification of `default-directory', if any." | |||
| 285 | (setq text (replace-match " " t t text))) | 273 | (setq text (replace-match " " t t text))) |
| 286 | text)) | 274 | text)) |
| 287 | 275 | ||
| 288 | ;; FIXME this is just dolist. | ||
| 289 | (defmacro eshell-for (for-var for-list &rest forms) | 276 | (defmacro eshell-for (for-var for-list &rest forms) |
| 290 | "Iterate through a list" | 277 | "Iterate through a list" |
| 291 | `(let ((list-iter ,for-list)) | 278 | `(let ((list-iter ,for-list)) |
| @@ -296,10 +283,12 @@ Prepend remote identification of `default-directory', if any." | |||
| 296 | 283 | ||
| 297 | (put 'eshell-for 'lisp-indent-function 2) | 284 | (put 'eshell-for 'lisp-indent-function 2) |
| 298 | 285 | ||
| 286 | (make-obsolete 'eshell-for 'dolist "24.1") | ||
| 287 | |||
| 299 | (defun eshell-flatten-list (args) | 288 | (defun eshell-flatten-list (args) |
| 300 | "Flatten any lists within ARGS, so that there are no sublists." | 289 | "Flatten any lists within ARGS, so that there are no sublists." |
| 301 | (let ((new-list (list t))) | 290 | (let ((new-list (list t))) |
| 302 | (eshell-for a args | 291 | (dolist (a args) |
| 303 | (if (and (listp a) | 292 | (if (and (listp a) |
| 304 | (listp (cdr a))) | 293 | (listp (cdr a))) |
| 305 | (nconc new-list (eshell-flatten-list a)) | 294 | (nconc new-list (eshell-flatten-list a)) |
| @@ -405,7 +394,7 @@ list." | |||
| 405 | (unless (listp entries) | 394 | (unless (listp entries) |
| 406 | (setq entries (list entries) | 395 | (setq entries (list entries) |
| 407 | listified t)) | 396 | listified t)) |
| 408 | (eshell-for entry entries | 397 | (dolist (entry entries) |
| 409 | (unless (and exclude (string-match exclude entry)) | 398 | (unless (and exclude (string-match exclude entry)) |
| 410 | (setq p predicates valid (null p)) | 399 | (setq p predicates valid (null p)) |
| 411 | (while p | 400 | (while p |
diff --git a/lisp/eshell/esh-var.el b/lisp/eshell/esh-var.el index 4c42b305ec2..69004a841f1 100644 --- a/lisp/eshell/esh-var.el +++ b/lisp/eshell/esh-var.el | |||
| @@ -109,7 +109,6 @@ | |||
| 109 | 109 | ||
| 110 | (eval-when-compile | 110 | (eval-when-compile |
| 111 | (require 'pcomplete) | 111 | (require 'pcomplete) |
| 112 | (require 'esh-test) | ||
| 113 | (require 'esh-util) | 112 | (require 'esh-util) |
| 114 | (require 'esh-opt) | 113 | (require 'esh-opt) |
| 115 | (require 'esh-mode)) | 114 | (require 'esh-mode)) |
| @@ -126,8 +125,9 @@ variable value, a subcommand, or even the result of a Lisp form." | |||
| 126 | 125 | ||
| 127 | ;;; User Variables: | 126 | ;;; User Variables: |
| 128 | 127 | ||
| 129 | (defcustom eshell-var-load-hook '(eshell-var-initialize) | 128 | (defcustom eshell-var-load-hook nil |
| 130 | "A list of functions to call when loading `eshell-var'." | 129 | "A list of functions to call when loading `eshell-var'." |
| 130 | :version "24.1" ; removed eshell-var-initialize | ||
| 131 | :type 'hook | 131 | :type 'hook |
| 132 | :group 'eshell-var) | 132 | :group 'eshell-var) |
| 133 | 133 | ||
| @@ -351,8 +351,7 @@ This function is explicit for adding to `eshell-parse-argument-hook'." | |||
| 351 | '((?h "help" nil nil "show this usage screen") | 351 | '((?h "help" nil nil "show this usage screen") |
| 352 | :external "env" | 352 | :external "env" |
| 353 | :usage "<no arguments>") | 353 | :usage "<no arguments>") |
| 354 | (eshell-for setting (sort (eshell-environment-variables) | 354 | (dolist (setting (sort (eshell-environment-variables) 'string-lessp)) |
| 355 | 'string-lessp) | ||
| 356 | (eshell-buffered-print setting "\n")) | 355 | (eshell-buffered-print setting "\n")) |
| 357 | (eshell-flush))) | 356 | (eshell-flush))) |
| 358 | 357 | ||
| @@ -374,7 +373,7 @@ This function is explicit for adding to `eshell-parse-argument-hook'." | |||
| 374 | This involves setting any variable aliases which affect the | 373 | This involves setting any variable aliases which affect the |
| 375 | environment, as specified in `eshell-variable-aliases-list'." | 374 | environment, as specified in `eshell-variable-aliases-list'." |
| 376 | (let ((process-environment (eshell-copy-environment))) | 375 | (let ((process-environment (eshell-copy-environment))) |
| 377 | (eshell-for var-alias eshell-variable-aliases-list | 376 | (dolist (var-alias eshell-variable-aliases-list) |
| 378 | (if (nth 2 var-alias) | 377 | (if (nth 2 var-alias) |
| 379 | (setenv (car var-alias) | 378 | (setenv (car var-alias) |
| 380 | (eshell-stringify | 379 | (eshell-stringify |
| @@ -477,30 +476,6 @@ Possible options are: | |||
| 477 | (t | 476 | (t |
| 478 | (error "Invalid variable reference"))))) | 477 | (error "Invalid variable reference"))))) |
| 479 | 478 | ||
| 480 | (eshell-deftest var interp-cmd | ||
| 481 | "Interpolate command result" | ||
| 482 | (eshell-command-result-p "+ ${+ 1 2} 3" "6\n")) | ||
| 483 | |||
| 484 | (eshell-deftest var interp-lisp | ||
| 485 | "Interpolate Lisp form evalution" | ||
| 486 | (eshell-command-result-p "+ $(+ 1 2) 3" "6\n")) | ||
| 487 | |||
| 488 | (eshell-deftest var interp-concat | ||
| 489 | "Interpolate and concat command" | ||
| 490 | (eshell-command-result-p "+ ${+ 1 2}3 3" "36\n")) | ||
| 491 | |||
| 492 | (eshell-deftest var interp-concat-lisp | ||
| 493 | "Interpolate and concat Lisp form" | ||
| 494 | (eshell-command-result-p "+ $(+ 1 2)3 3" "36\n")) | ||
| 495 | |||
| 496 | (eshell-deftest var interp-concat2 | ||
| 497 | "Interpolate and concat two commands" | ||
| 498 | (eshell-command-result-p "+ ${+ 1 2}${+ 1 2} 3" "36\n")) | ||
| 499 | |||
| 500 | (eshell-deftest var interp-concat-lisp2 | ||
| 501 | "Interpolate and concat two Lisp forms" | ||
| 502 | (eshell-command-result-p "+ $(+ 1 2)$(+ 1 2) 3" "36\n")) | ||
| 503 | |||
| 504 | (defun eshell-parse-indices () | 479 | (defun eshell-parse-indices () |
| 505 | "Parse and return a list of list of indices." | 480 | "Parse and return a list of list of indices." |
| 506 | (let (indices) | 481 | (let (indices) |
| @@ -623,7 +598,7 @@ For example, to retrieve the second element of a user's record in | |||
| 623 | "Generate list of applicable variables." | 598 | "Generate list of applicable variables." |
| 624 | (let ((argname pcomplete-stub) | 599 | (let ((argname pcomplete-stub) |
| 625 | completions) | 600 | completions) |
| 626 | (eshell-for alias eshell-variable-aliases-list | 601 | (dolist (alias eshell-variable-aliases-list) |
| 627 | (if (string-match (concat "^" argname) (car alias)) | 602 | (if (string-match (concat "^" argname) (car alias)) |
| 628 | (setq completions (cons (car alias) completions)))) | 603 | (setq completions (cons (car alias) completions)))) |
| 629 | (sort | 604 | (sort |
diff --git a/lisp/eshell/eshell.el b/lisp/eshell/eshell.el index 7690a102a9b..1a9d7c97b83 100644 --- a/lisp/eshell/eshell.el +++ b/lisp/eshell/eshell.el | |||
| @@ -280,26 +280,12 @@ shells such as bash, zsh, rc, 4dos." | |||
| 280 | :type 'string | 280 | :type 'string |
| 281 | :group 'eshell) | 281 | :group 'eshell) |
| 282 | 282 | ||
| 283 | (eshell-deftest mode same-window-buffer-names | ||
| 284 | "`eshell-buffer-name' is a member of `same-window-buffer-names'" | ||
| 285 | (member eshell-buffer-name same-window-buffer-names)) | ||
| 286 | |||
| 287 | (defcustom eshell-directory-name | 283 | (defcustom eshell-directory-name |
| 288 | (locate-user-emacs-file "eshell/" ".eshell/") | 284 | (locate-user-emacs-file "eshell/" ".eshell/") |
| 289 | "The directory where Eshell control files should be kept." | 285 | "The directory where Eshell control files should be kept." |
| 290 | :type 'directory | 286 | :type 'directory |
| 291 | :group 'eshell) | 287 | :group 'eshell) |
| 292 | 288 | ||
| 293 | (eshell-deftest mode eshell-directory-exists | ||
| 294 | "`eshell-directory-name' exists and is writable" | ||
| 295 | (file-writable-p eshell-directory-name)) | ||
| 296 | |||
| 297 | (eshell-deftest mode eshell-directory-modes | ||
| 298 | "`eshell-directory-name' has correct access protections" | ||
| 299 | (or (eshell-under-windows-p) | ||
| 300 | (= (file-modes eshell-directory-name) | ||
| 301 | eshell-private-directory-modes))) | ||
| 302 | |||
| 303 | ;;;_* Running Eshell | 289 | ;;;_* Running Eshell |
| 304 | ;; | 290 | ;; |
| 305 | ;; There are only three commands used to invoke Eshell. The first two | 291 | ;; There are only three commands used to invoke Eshell. The first two |
| @@ -450,10 +436,6 @@ corresponding to a successful execution." | |||
| 450 | (set status-var eshell-last-command-status)) | 436 | (set status-var eshell-last-command-status)) |
| 451 | (cadr result)))))) | 437 | (cadr result)))))) |
| 452 | 438 | ||
| 453 | (eshell-deftest mode simple-command-result | ||
| 454 | "`eshell-command-result' works with a simple command." | ||
| 455 | (= (eshell-command-result "+ 1 2") 3)) | ||
| 456 | |||
| 457 | ;;;_* Reporting bugs | 439 | ;;;_* Reporting bugs |
| 458 | ;; | 440 | ;; |
| 459 | ;; If you do encounter a bug, on any system, please report | 441 | ;; If you do encounter a bug, on any system, please report |
| @@ -474,7 +456,7 @@ Emacs." | |||
| 474 | ;; if the user set `eshell-prefer-to-shell' to t, but never loaded | 456 | ;; if the user set `eshell-prefer-to-shell' to t, but never loaded |
| 475 | ;; Eshell, then `eshell-subgroups' will be unbound | 457 | ;; Eshell, then `eshell-subgroups' will be unbound |
| 476 | (when (fboundp 'eshell-subgroups) | 458 | (when (fboundp 'eshell-subgroups) |
| 477 | (eshell-for module (eshell-subgroups 'eshell) | 459 | (dolist (module (eshell-subgroups 'eshell)) |
| 478 | ;; this really only unloads as many modules as possible, | 460 | ;; this really only unloads as many modules as possible, |
| 479 | ;; since other `require' references (such as by customizing | 461 | ;; since other `require' references (such as by customizing |
| 480 | ;; `eshell-prefer-to-shell' to a non-nil value) might make it | 462 | ;; `eshell-prefer-to-shell' to a non-nil value) might make it |
diff --git a/lisp/files.el b/lisp/files.el index 8849e264151..ffc0b33119f 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -983,7 +983,8 @@ accessible." | |||
| 983 | nil))) | 983 | nil))) |
| 984 | 984 | ||
| 985 | (defun file-truename (filename &optional counter prev-dirs) | 985 | (defun file-truename (filename &optional counter prev-dirs) |
| 986 | "Return the truename of FILENAME, which should be absolute. | 986 | "Return the truename of FILENAME. |
| 987 | If FILENAME is not absolute, first expands it against `default-directory'. | ||
| 987 | The truename of a file name is found by chasing symbolic links | 988 | The truename of a file name is found by chasing symbolic links |
| 988 | both at the level of the file and at the level of the directories | 989 | both at the level of the file and at the level of the directories |
| 989 | containing it, until no links are left at any level. | 990 | containing it, until no links are left at any level. |
| @@ -1893,8 +1894,8 @@ the various files." | |||
| 1893 | (not nonexistent) | 1894 | (not nonexistent) |
| 1894 | ;; It is confusing to ask whether to visit | 1895 | ;; It is confusing to ask whether to visit |
| 1895 | ;; non-literally if they have the file in | 1896 | ;; non-literally if they have the file in |
| 1896 | ;; hexl-mode. | 1897 | ;; hexl-mode or image-mode. |
| 1897 | (not (eq major-mode 'hexl-mode))) | 1898 | (not (memq major-mode '(hexl-mode image-mode)))) |
| 1898 | (if (buffer-modified-p) | 1899 | (if (buffer-modified-p) |
| 1899 | (if (y-or-n-p | 1900 | (if (y-or-n-p |
| 1900 | (format | 1901 | (format |
| @@ -3868,7 +3869,9 @@ BACKUPNAME is the backup file name, which is the old file renamed." | |||
| 3868 | (set-file-selinux-context to-name context))) | 3869 | (set-file-selinux-context to-name context))) |
| 3869 | 3870 | ||
| 3870 | (defvar file-name-version-regexp | 3871 | (defvar file-name-version-regexp |
| 3871 | "\\(?:~\\|\\.~[-[:alnum:]:#@^._]+~\\)" | 3872 | "\\(?:~\\|\\.~[-[:alnum:]:#@^._]+\\(?:~[[:digit:]]+\\)?~\\)" |
| 3873 | ;; The last ~[[:digit]]+ matches relative versions in git, | ||
| 3874 | ;; e.g. `foo.js.~HEAD~1~'. | ||
| 3872 | "Regular expression matching the backup/version part of a file name. | 3875 | "Regular expression matching the backup/version part of a file name. |
| 3873 | Used by `file-name-sans-versions'.") | 3876 | Used by `file-name-sans-versions'.") |
| 3874 | 3877 | ||
| @@ -4608,14 +4611,14 @@ See `save-some-buffers-action-alist' if you want to | |||
| 4608 | change the additional actions you can take on files." | 4611 | change the additional actions you can take on files." |
| 4609 | (interactive "P") | 4612 | (interactive "P") |
| 4610 | (save-window-excursion | 4613 | (save-window-excursion |
| 4611 | (let* (queried some-automatic | 4614 | (let* (queried autosaved-buffers |
| 4612 | files-done abbrevs-done) | 4615 | files-done abbrevs-done) |
| 4613 | (dolist (buffer (buffer-list)) | 4616 | (dolist (buffer (buffer-list)) |
| 4614 | ;; First save any buffers that we're supposed to save unconditionally. | 4617 | ;; First save any buffers that we're supposed to save unconditionally. |
| 4615 | ;; That way the following code won't ask about them. | 4618 | ;; That way the following code won't ask about them. |
| 4616 | (with-current-buffer buffer | 4619 | (with-current-buffer buffer |
| 4617 | (when (and buffer-save-without-query (buffer-modified-p)) | 4620 | (when (and buffer-save-without-query (buffer-modified-p)) |
| 4618 | (setq some-automatic t) | 4621 | (push (buffer-name) autosaved-buffers) |
| 4619 | (save-buffer)))) | 4622 | (save-buffer)))) |
| 4620 | ;; Ask about those buffers that merit it, | 4623 | ;; Ask about those buffers that merit it, |
| 4621 | ;; and record the number thus saved. | 4624 | ;; and record the number thus saved. |
| @@ -4661,9 +4664,15 @@ change the additional actions you can take on files." | |||
| 4661 | (setq abbrevs-changed nil) | 4664 | (setq abbrevs-changed nil) |
| 4662 | (setq abbrevs-done t))) | 4665 | (setq abbrevs-done t))) |
| 4663 | (or queried (> files-done 0) abbrevs-done | 4666 | (or queried (> files-done 0) abbrevs-done |
| 4664 | (message (if some-automatic | 4667 | (cond |
| 4665 | "(Some special files were saved without asking)" | 4668 | ((null autosaved-buffers) |
| 4666 | "(No files need saving)")))))) | 4669 | (message "(No files need saving)")) |
| 4670 | ((= (length autosaved-buffers) 1) | ||
| 4671 | (message "(Saved %s)" (car autosaved-buffers))) | ||
| 4672 | (t | ||
| 4673 | (message "(Saved %d files: %s)" | ||
| 4674 | (length autosaved-buffers) | ||
| 4675 | (mapconcat 'identity autosaved-buffers ", ")))))))) | ||
| 4667 | 4676 | ||
| 4668 | (defun not-modified (&optional arg) | 4677 | (defun not-modified (&optional arg) |
| 4669 | "Mark current buffer as unmodified, not needing to be saved. | 4678 | "Mark current buffer as unmodified, not needing to be saved. |
| @@ -4822,7 +4831,7 @@ given. With a prefix argument, TRASH is nil." | |||
| 4822 | (let* ((trashing (and delete-by-moving-to-trash | 4831 | (let* ((trashing (and delete-by-moving-to-trash |
| 4823 | (null current-prefix-arg))) | 4832 | (null current-prefix-arg))) |
| 4824 | (dir (expand-file-name | 4833 | (dir (expand-file-name |
| 4825 | (read-file-name | 4834 | (read-directory-name |
| 4826 | (if trashing | 4835 | (if trashing |
| 4827 | "Move directory to trash: " | 4836 | "Move directory to trash: " |
| 4828 | "Delete directory: ") | 4837 | "Delete directory: ") |
| @@ -4890,7 +4899,7 @@ directly into NEWNAME instead." | |||
| 4890 | (let ((dir (read-directory-name | 4899 | (let ((dir (read-directory-name |
| 4891 | "Copy directory: " default-directory default-directory t nil))) | 4900 | "Copy directory: " default-directory default-directory t nil))) |
| 4892 | (list dir | 4901 | (list dir |
| 4893 | (read-file-name | 4902 | (read-directory-name |
| 4894 | (format "Copy directory %s to: " dir) | 4903 | (format "Copy directory %s to: " dir) |
| 4895 | default-directory default-directory nil nil) | 4904 | default-directory default-directory nil nil) |
| 4896 | current-prefix-arg t nil))) | 4905 | current-prefix-arg t nil))) |
| @@ -5589,7 +5598,7 @@ Prefix arg (second arg if noninteractive) means supply -l switch to `ls'. | |||
| 5589 | Actions controlled by variables `list-directory-brief-switches' | 5598 | Actions controlled by variables `list-directory-brief-switches' |
| 5590 | and `list-directory-verbose-switches'." | 5599 | and `list-directory-verbose-switches'." |
| 5591 | (interactive (let ((pfx current-prefix-arg)) | 5600 | (interactive (let ((pfx current-prefix-arg)) |
| 5592 | (list (read-file-name (if pfx "List directory (verbose): " | 5601 | (list (read-directory-name (if pfx "List directory (verbose): " |
| 5593 | "List directory (brief): ") | 5602 | "List directory (brief): ") |
| 5594 | nil default-directory nil) | 5603 | nil default-directory nil) |
| 5595 | pfx))) | 5604 | pfx))) |
diff --git a/lisp/find-file.el b/lisp/find-file.el index 7ace6ce01dc..e4285523184 100644 --- a/lisp/find-file.el +++ b/lisp/find-file.el | |||
| @@ -183,7 +183,7 @@ To override this, give an argument to `ff-find-other-file'." | |||
| 183 | ;;;###autoload | 183 | ;;;###autoload |
| 184 | (defvar ff-special-constructs | 184 | (defvar ff-special-constructs |
| 185 | `( | 185 | `( |
| 186 | ;; C/C++ include, for NeXTSTEP too | 186 | ;; C/C++ include, for NeXTstep too |
| 187 | (,(purecopy "^\#\\s *\\(include\\|import\\)\\s +[<\"]\\(.*\\)[>\"]") . | 187 | (,(purecopy "^\#\\s *\\(include\\|import\\)\\s +[<\"]\\(.*\\)[>\"]") . |
| 188 | (lambda () | 188 | (lambda () |
| 189 | (buffer-substring (match-beginning 2) (match-end 2)))) | 189 | (buffer-substring (match-beginning 2) (match-end 2)))) |
| @@ -494,7 +494,7 @@ If optional IN-OTHER-WINDOW is non-nil, find the file in another window." | |||
| 494 | 494 | ||
| 495 | (setq name | 495 | (setq name |
| 496 | (expand-file-name | 496 | (expand-file-name |
| 497 | (read-file-name | 497 | (read-directory-name |
| 498 | (format "Find or create %s in: " default-name) | 498 | (format "Find or create %s in: " default-name) |
| 499 | default-directory default-name nil))) | 499 | default-directory default-name nil))) |
| 500 | 500 | ||
diff --git a/lisp/generic-x.el b/lisp/generic-x.el index e23af4dff78..bce03331a29 100644 --- a/lisp/generic-x.el +++ b/lisp/generic-x.el | |||
| @@ -229,7 +229,8 @@ This hook will be installed if the variable | |||
| 229 | prototype-generic-mode | 229 | prototype-generic-mode |
| 230 | resolve-conf-generic-mode | 230 | resolve-conf-generic-mode |
| 231 | samba-generic-mode | 231 | samba-generic-mode |
| 232 | x-resource-generic-mode) | 232 | x-resource-generic-mode |
| 233 | xmodmap-generic-mode) | ||
| 233 | "List of generic modes that are defined by default on Unix.") | 234 | "List of generic modes that are defined by default on Unix.") |
| 234 | 235 | ||
| 235 | (defconst generic-other-modes | 236 | (defconst generic-other-modes |
| @@ -370,6 +371,15 @@ your changes into effect." | |||
| 370 | nil | 371 | nil |
| 371 | "Generic mode for X Resource configuration files.")) | 372 | "Generic mode for X Resource configuration files.")) |
| 372 | 373 | ||
| 374 | (if (memq 'xmodmap-generic-mode generic-extras-enable-list) | ||
| 375 | (define-generic-mode xmodmap-generic-mode | ||
| 376 | '(?!) | ||
| 377 | '("add" "clear" "keycode" "keysym" "remove" "pointer") | ||
| 378 | nil | ||
| 379 | '("[xX]modmap\\(rc\\)?\\'") | ||
| 380 | nil | ||
| 381 | "Simple mode for xmodmap files.")) | ||
| 382 | |||
| 373 | ;;; Hosts | 383 | ;;; Hosts |
| 374 | (when (memq 'hosts-generic-mode generic-extras-enable-list) | 384 | (when (memq 'hosts-generic-mode generic-extras-enable-list) |
| 375 | 385 | ||
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 4562d544a58..c14c79a92cb 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,53 @@ | |||
| 1 | 2011-03-05 Antoine Levitt <antoine.levitt@gmail.com> | ||
| 2 | |||
| 3 | * gnus.el (gnus-interactive): Use read-directory-name. | ||
| 4 | |||
| 5 | * gnus-uu.el (gnus-uu-decode-uu-and-save) | ||
| 6 | (gnus-uu-decode-unshar-and-save, gnus-uu-decode-save) | ||
| 7 | (gnus-uu-decode-binhex, gnus-uu-decode-yenc) | ||
| 8 | (gnus-uu-decode-save-view, gnus-uu-decode-postscript-and-save): | ||
| 9 | Likewise. | ||
| 10 | |||
| 11 | * gnus-group.el (gnus-group-make-directory-group): Likewise. | ||
| 12 | |||
| 13 | 2011-03-05 Lars Magne Ingebrigtsen <larsi@gnus.org> | ||
| 14 | |||
| 15 | * gnus-sum.el (gnus-update-read-articles): Fix typo. | ||
| 16 | |||
| 17 | * gnus.el (gnus-valid-select-methods): Mark nnimap as a backend that | ||
| 18 | really have server-side marks. | ||
| 19 | |||
| 20 | * gnus-sum.el (gnus-propagate-marks): Change default back to nil again, | ||
| 21 | since most backends do not usefully have server-side marks. | ||
| 22 | (gnus-update-read-articles): Propagate marks to all backends that | ||
| 23 | really have server-side marks. | ||
| 24 | |||
| 25 | 2011-03-05 Antoine Levitt <antoine.levitt@gmail.com> | ||
| 26 | |||
| 27 | * message.el (message-cite-reply-position, message-cite-style): New | ||
| 28 | variables. | ||
| 29 | (message-yank-original): Use the new citation styles. | ||
| 30 | |||
| 31 | 2011-03-04 Daiki Ueno <ueno@unixuser.org> | ||
| 32 | |||
| 33 | * message.el (message-options): Revert the change that's a workaround | ||
| 34 | for XEmacs buffer-local issue; don't mark it buffer-local when running | ||
| 35 | under XEmacs. | ||
| 36 | |||
| 37 | 2011-03-03 Tassilo Horn <tassilo@member.fsf.org> | ||
| 38 | |||
| 39 | * nnimap.el (nnimap-parse-flags): Add a workaround for FETCH lines with | ||
| 40 | numbers too big to be `read'. | ||
| 41 | |||
| 42 | 2011-03-02 Teodor Zlatanov <tzz@lifelogs.com> | ||
| 43 | |||
| 44 | * message.el (message-options): Make buffer-local two ways to attempt | ||
| 45 | to fix a XEmacs bug. | ||
| 46 | |||
| 47 | 2011-03-02 Julien Danjou <julien@danjou.info> | ||
| 48 | |||
| 49 | * gnus-art.el (gnus-with-article-buffer): Fix buffer live check. | ||
| 50 | |||
| 1 | 2011-03-01 Julien Danjou <julien@danjou.info> | 51 | 2011-03-01 Julien Danjou <julien@danjou.info> |
| 2 | 52 | ||
| 3 | * gnus-art.el (list-identifier): Add list-identifier as a parameter | 53 | * gnus-art.el (list-identifier): Add list-identifier as a parameter |
| @@ -787,7 +837,7 @@ | |||
| 787 | 837 | ||
| 788 | * shr.el: Revert change that made headings use different-sized faces. | 838 | * shr.el: Revert change that made headings use different-sized faces. |
| 789 | The Emacs display engine isn't advanced enough that, for instance, | 839 | The Emacs display engine isn't advanced enough that, for instance, |
| 790 | tables can comfortably use differntly-sized faces. | 840 | tables can comfortably use differently-sized faces. |
| 791 | 841 | ||
| 792 | 2011-01-25 Lars Ingebrigtsen <larsi@gnus.org> | 842 | 2011-01-25 Lars Ingebrigtsen <larsi@gnus.org> |
| 793 | 843 | ||
| @@ -1839,7 +1889,7 @@ | |||
| 1839 | 1889 | ||
| 1840 | 2010-11-24 Lars Magne Ingebrigtsen <larsi@gnus.org> | 1890 | 2010-11-24 Lars Magne Ingebrigtsen <larsi@gnus.org> |
| 1841 | 1891 | ||
| 1842 | * shr.el (shr-color-check): Protect against non-existant colour names. | 1892 | * shr.el (shr-color-check): Protect against non-existent colour names. |
| 1843 | 1893 | ||
| 1844 | 2010-11-24 Julien Danjou <julien@danjou.info> | 1894 | 2010-11-24 Julien Danjou <julien@danjou.info> |
| 1845 | 1895 | ||
| @@ -3153,7 +3203,7 @@ | |||
| 3153 | This makes nnimap work properly on Courier again. | 3203 | This makes nnimap work properly on Courier again. |
| 3154 | 3204 | ||
| 3155 | * gnus.el (gnus-carpal): The carpal mode has been removed, but define | 3205 | * gnus.el (gnus-carpal): The carpal mode has been removed, but define |
| 3156 | the variable for backwards compatability. | 3206 | the variable for backwards compatibility. |
| 3157 | 3207 | ||
| 3158 | * mm-decode.el (mm-save-part): If given a non-directory result, expand | 3208 | * mm-decode.el (mm-save-part): If given a non-directory result, expand |
| 3159 | the file name before using to avoid setting mm-default-directory to | 3209 | the file name before using to avoid setting mm-default-directory to |
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el index 7469c4445c6..c64138b43d7 100644 --- a/lisp/gnus/gnus-art.el +++ b/lisp/gnus/gnus-art.el | |||
| @@ -1743,7 +1743,7 @@ Initialized from `text-mode-syntax-table.") | |||
| 1743 | (put 'gnus-with-article-headers 'edebug-form-spec '(body)) | 1743 | (put 'gnus-with-article-headers 'edebug-form-spec '(body)) |
| 1744 | 1744 | ||
| 1745 | (defmacro gnus-with-article-buffer (&rest forms) | 1745 | (defmacro gnus-with-article-buffer (&rest forms) |
| 1746 | `(when (buffer-live-p gnus-article-buffer) | 1746 | `(when (buffer-live-p (get-buffer gnus-article-buffer)) |
| 1747 | (with-current-buffer gnus-article-buffer | 1747 | (with-current-buffer gnus-article-buffer |
| 1748 | (let ((inhibit-read-only t)) | 1748 | (let ((inhibit-read-only t)) |
| 1749 | ,@forms)))) | 1749 | ,@forms)))) |
diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el index 832cd758b61..9ed3cf02a49 100644 --- a/lisp/gnus/gnus-group.el +++ b/lisp/gnus/gnus-group.el | |||
| @@ -3102,7 +3102,7 @@ The user will be prompted for a directory. The contents of this | |||
| 3102 | directory will be used as a newsgroup. The directory should contain | 3102 | directory will be used as a newsgroup. The directory should contain |
| 3103 | mail messages or news articles in files that have numeric names." | 3103 | mail messages or news articles in files that have numeric names." |
| 3104 | (interactive | 3104 | (interactive |
| 3105 | (list (read-file-name "Create group from directory: "))) | 3105 | (list (read-directory-name "Create group from directory: "))) |
| 3106 | (unless (file-exists-p dir) | 3106 | (unless (file-exists-p dir) |
| 3107 | (error "No such directory")) | 3107 | (error "No such directory")) |
| 3108 | (unless (file-directory-p dir) | 3108 | (unless (file-directory-p dir) |
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index abe6367f0d0..a8786e39c7b 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el | |||
| @@ -1234,7 +1234,7 @@ For example: ((1 . cn-gb-2312) (2 . big5))." | |||
| 1234 | :type 'boolean | 1234 | :type 'boolean |
| 1235 | :group 'gnus-summary-marks) | 1235 | :group 'gnus-summary-marks) |
| 1236 | 1236 | ||
| 1237 | (defcustom gnus-propagate-marks t | 1237 | (defcustom gnus-propagate-marks nil |
| 1238 | "If non-nil, Gnus will store and retrieve marks from the backends. | 1238 | "If non-nil, Gnus will store and retrieve marks from the backends. |
| 1239 | This means that marks will be stored both in .newsrc.eld and in | 1239 | This means that marks will be stored both in .newsrc.eld and in |
| 1240 | the backend, and will slow operation down somewhat." | 1240 | the backend, and will slow operation down somewhat." |
| @@ -12435,7 +12435,10 @@ UNREAD is a sorted list." | |||
| 12435 | (save-excursion | 12435 | (save-excursion |
| 12436 | (let (setmarkundo) | 12436 | (let (setmarkundo) |
| 12437 | ;; Propagate the read marks to the backend. | 12437 | ;; Propagate the read marks to the backend. |
| 12438 | (when (and gnus-propagate-marks | 12438 | (when (and (or gnus-propagate-marks |
| 12439 | (gnus-method-option-p | ||
| 12440 | (gnus-find-method-for-group group) | ||
| 12441 | 'server-marks)) | ||
| 12439 | (gnus-check-backend-function 'request-set-mark group)) | 12442 | (gnus-check-backend-function 'request-set-mark group)) |
| 12440 | (let ((del (gnus-remove-from-range (gnus-info-read info) read)) | 12443 | (let ((del (gnus-remove-from-range (gnus-info-read info) read)) |
| 12441 | (add (gnus-remove-from-range read (gnus-info-read info)))) | 12444 | (add (gnus-remove-from-range read (gnus-info-read info)))) |
diff --git a/lisp/gnus/gnus-uu.el b/lisp/gnus/gnus-uu.el index d6aad539029..05ba3595479 100644 --- a/lisp/gnus/gnus-uu.el +++ b/lisp/gnus/gnus-uu.el | |||
| @@ -366,7 +366,7 @@ didn't work, and overwrite existing files. Otherwise, ask each time." | |||
| 366 | (interactive | 366 | (interactive |
| 367 | (list current-prefix-arg | 367 | (list current-prefix-arg |
| 368 | (file-name-as-directory | 368 | (file-name-as-directory |
| 369 | (read-file-name "Uudecode and save in dir: " | 369 | (read-directory-name "Uudecode and save in dir: " |
| 370 | gnus-uu-default-dir | 370 | gnus-uu-default-dir |
| 371 | gnus-uu-default-dir t)))) | 371 | gnus-uu-default-dir t)))) |
| 372 | (gnus-uu-decode-with-method 'gnus-uu-uustrip-article n dir nil nil t)) | 372 | (gnus-uu-decode-with-method 'gnus-uu-uustrip-article n dir nil nil t)) |
| @@ -381,7 +381,7 @@ didn't work, and overwrite existing files. Otherwise, ask each time." | |||
| 381 | (interactive | 381 | (interactive |
| 382 | (list current-prefix-arg | 382 | (list current-prefix-arg |
| 383 | (file-name-as-directory | 383 | (file-name-as-directory |
| 384 | (read-file-name "Unshar and save in dir: " | 384 | (read-directory-name "Unshar and save in dir: " |
| 385 | gnus-uu-default-dir | 385 | gnus-uu-default-dir |
| 386 | gnus-uu-default-dir t)))) | 386 | gnus-uu-default-dir t)))) |
| 387 | (gnus-uu-decode-with-method 'gnus-uu-unshar-article n dir nil 'scan t)) | 387 | (gnus-uu-decode-with-method 'gnus-uu-unshar-article n dir nil 'scan t)) |
| @@ -390,12 +390,11 @@ didn't work, and overwrite existing files. Otherwise, ask each time." | |||
| 390 | "Saves the current article." | 390 | "Saves the current article." |
| 391 | (interactive | 391 | (interactive |
| 392 | (list current-prefix-arg | 392 | (list current-prefix-arg |
| 393 | (read-file-name | 393 | (if gnus-uu-save-separate-articles |
| 394 | (if gnus-uu-save-separate-articles | 394 | (read-directory-name |
| 395 | "Save articles in dir: " | 395 | "Save articles in dir: " gnus-uu-default-dir gnus-uu-default-dir) |
| 396 | "Save articles in file: ") | 396 | (read-file-name |
| 397 | gnus-uu-default-dir | 397 | "Save article in file: " gnus-uu-default-dir gnus-uu-default-dir)))) |
| 398 | gnus-uu-default-dir))) | ||
| 399 | (setq gnus-uu-saved-article-name file) | 398 | (setq gnus-uu-saved-article-name file) |
| 400 | (gnus-uu-decode-with-method 'gnus-uu-save-article n nil t)) | 399 | (gnus-uu-decode-with-method 'gnus-uu-save-article n nil t)) |
| 401 | 400 | ||
| @@ -404,7 +403,7 @@ didn't work, and overwrite existing files. Otherwise, ask each time." | |||
| 404 | (interactive | 403 | (interactive |
| 405 | (list current-prefix-arg | 404 | (list current-prefix-arg |
| 406 | (file-name-as-directory | 405 | (file-name-as-directory |
| 407 | (read-file-name "Unbinhex and save in dir: " | 406 | (read-directory-name "Unbinhex and save in dir: " |
| 408 | gnus-uu-default-dir | 407 | gnus-uu-default-dir |
| 409 | gnus-uu-default-dir)))) | 408 | gnus-uu-default-dir)))) |
| 410 | (setq gnus-uu-binhex-article-name | 409 | (setq gnus-uu-binhex-article-name |
| @@ -416,7 +415,7 @@ didn't work, and overwrite existing files. Otherwise, ask each time." | |||
| 416 | (interactive | 415 | (interactive |
| 417 | (list current-prefix-arg | 416 | (list current-prefix-arg |
| 418 | (file-name-as-directory | 417 | (file-name-as-directory |
| 419 | (read-file-name "yEnc decode and save in dir: " | 418 | (read-directory-name "yEnc decode and save in dir: " |
| 420 | gnus-uu-default-dir | 419 | gnus-uu-default-dir |
| 421 | gnus-uu-default-dir)))) | 420 | gnus-uu-default-dir)))) |
| 422 | (setq gnus-uu-yenc-article-name nil) | 421 | (setq gnus-uu-yenc-article-name nil) |
| @@ -458,10 +457,11 @@ didn't work, and overwrite existing files. Otherwise, ask each time." | |||
| 458 | "Saves and views the current article." | 457 | "Saves and views the current article." |
| 459 | (interactive | 458 | (interactive |
| 460 | (list current-prefix-arg | 459 | (list current-prefix-arg |
| 461 | (read-file-name (if gnus-uu-save-separate-articles | 460 | (if gnus-uu-save-separate-articles |
| 462 | "Save articles is dir: " | 461 | (read-directory-name "Save articles in dir: " |
| 463 | "Save articles in file: ") | 462 | gnus-uu-default-dir gnus-uu-default-dir) |
| 464 | gnus-uu-default-dir gnus-uu-default-dir))) | 463 | (read-file-name "Save articles in file: " |
| 464 | gnus-uu-default-dir gnus-uu-default-dir)))) | ||
| 465 | (let ((gnus-view-pseudos (or gnus-view-pseudos 'automatic))) | 465 | (let ((gnus-view-pseudos (or gnus-view-pseudos 'automatic))) |
| 466 | (gnus-uu-decode-save n file))) | 466 | (gnus-uu-decode-save n file))) |
| 467 | 467 | ||
| @@ -742,7 +742,7 @@ When called interactively, prompt for REGEXP." | |||
| 742 | (interactive | 742 | (interactive |
| 743 | (list current-prefix-arg | 743 | (list current-prefix-arg |
| 744 | (file-name-as-directory | 744 | (file-name-as-directory |
| 745 | (read-file-name "Save in dir: " | 745 | (read-directory-name "Save in dir: " |
| 746 | gnus-uu-default-dir | 746 | gnus-uu-default-dir |
| 747 | gnus-uu-default-dir t)))) | 747 | gnus-uu-default-dir t)))) |
| 748 | (gnus-uu-decode-with-method 'gnus-uu-decode-postscript-article | 748 | (gnus-uu-decode-with-method 'gnus-uu-decode-postscript-article |
diff --git a/lisp/gnus/gnus.el b/lisp/gnus/gnus.el index a5c727925f6..57d085a0380 100644 --- a/lisp/gnus/gnus.el +++ b/lisp/gnus/gnus.el | |||
| @@ -1607,7 +1607,8 @@ slower." | |||
| 1607 | ("nnweb" none) | 1607 | ("nnweb" none) |
| 1608 | ("nnrss" none) | 1608 | ("nnrss" none) |
| 1609 | ("nnagent" post-mail) | 1609 | ("nnagent" post-mail) |
| 1610 | ("nnimap" post-mail address prompt-address physical-address respool) | 1610 | ("nnimap" post-mail address prompt-address physical-address respool |
| 1611 | server-marks) | ||
| 1611 | ("nnmaildir" mail respool address) | 1612 | ("nnmaildir" mail respool address) |
| 1612 | ("nnnil" none)) | 1613 | ("nnnil" none)) |
| 1613 | "*An alist of valid select methods. | 1614 | "*An alist of valid select methods. |
| @@ -2545,7 +2546,7 @@ a string, be sure to use a valid format, see RFC 2616." | |||
| 2545 | (defvar gnus-extended-servers nil) | 2546 | (defvar gnus-extended-servers nil) |
| 2546 | 2547 | ||
| 2547 | ;; The carpal mode has been removed, but define the variable for | 2548 | ;; The carpal mode has been removed, but define the variable for |
| 2548 | ;; backwards compatability. | 2549 | ;; backwards compatibility. |
| 2549 | (defvar gnus-carpal nil) | 2550 | (defvar gnus-carpal nil) |
| 2550 | (make-obsolete-variable 'gnus-carpal nil "Emacs 24.1") | 2551 | (make-obsolete-variable 'gnus-carpal nil "Emacs 24.1") |
| 2551 | 2552 | ||
| @@ -3267,7 +3268,7 @@ g -- Group name." | |||
| 3267 | ((= c ?d) | 3268 | ((= c ?d) |
| 3268 | (point)) | 3269 | (point)) |
| 3269 | ((= c ?D) | 3270 | ((= c ?D) |
| 3270 | (read-file-name prompt nil default-directory 'lambda)) | 3271 | (read-directory-name prompt nil default-directory 'lambda)) |
| 3271 | ((= c ?f) | 3272 | ((= c ?f) |
| 3272 | (read-file-name prompt nil nil 'lambda)) | 3273 | (read-file-name prompt nil nil 'lambda)) |
| 3273 | ((= c ?F) | 3274 | ((= c ?F) |
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 58daf1baf94..08c59b00bfc 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el | |||
| @@ -129,17 +129,6 @@ | |||
| 129 | :group 'message-buffers | 129 | :group 'message-buffers |
| 130 | :type '(choice function (const nil))) | 130 | :type '(choice function (const nil))) |
| 131 | 131 | ||
| 132 | (defcustom message-cite-style nil | ||
| 133 | "The overall style to be used when yanking cited text. | ||
| 134 | Values are either `traditional' (cited text first), | ||
| 135 | `top-post' (cited text at the bottom), or nil (don't override the | ||
| 136 | individual message variables)." | ||
| 137 | :version "24.1" | ||
| 138 | :group 'message-various | ||
| 139 | :type '(choice (const :tag "None" :value nil) | ||
| 140 | (const :tag "Traditional" :value traditional) | ||
| 141 | (const :tag "Top-post" :value top-post))) | ||
| 142 | |||
| 143 | (defcustom message-fcc-handler-function 'message-output | 132 | (defcustom message-fcc-handler-function 'message-output |
| 144 | "*A function called to save outgoing articles. | 133 | "*A function called to save outgoing articles. |
| 145 | This function will be called with the name of the file to store the | 134 | This function will be called with the name of the file to store the |
| @@ -1088,6 +1077,71 @@ needed." | |||
| 1088 | :link '(custom-manual "(message)Insertion Variables") | 1077 | :link '(custom-manual "(message)Insertion Variables") |
| 1089 | :group 'message-insertion) | 1078 | :group 'message-insertion) |
| 1090 | 1079 | ||
| 1080 | (defcustom message-cite-reply-position 'traditional | ||
| 1081 | "*Where the reply should be positioned. | ||
| 1082 | If `traditional', reply inline. | ||
| 1083 | If `above', reply above quoted text. | ||
| 1084 | If `below', reply below quoted text. | ||
| 1085 | |||
| 1086 | Note: Many newsgroups frown upon nontraditional reply styles. You | ||
| 1087 | probably want to set this variable only for specific groups, | ||
| 1088 | e.g. using `gnus-posting-styles': | ||
| 1089 | |||
| 1090 | (eval (set (make-local-variable 'message-cite-reply-above) 'above))" | ||
| 1091 | :type '(choice (const :tag "Reply inline" 'traditional) | ||
| 1092 | (const :tag "Reply above" 'above) | ||
| 1093 | (const :tag "Reply below" 'below)) | ||
| 1094 | :group 'message-insertion) | ||
| 1095 | |||
| 1096 | (defcustom message-cite-style nil | ||
| 1097 | "*The overall style to be used when yanking cited text. | ||
| 1098 | Value is either `nil' (no variable overrides) or a let-style list | ||
| 1099 | of pairs (VARIABLE VALUE) that will be bound in | ||
| 1100 | `message-yank-original' to do the quoting. | ||
| 1101 | |||
| 1102 | Presets to impersonate popular mail agents are found in the | ||
| 1103 | message-cite-style-* variables. This variable is intended for | ||
| 1104 | use in `gnus-posting-styles', such as: | ||
| 1105 | |||
| 1106 | ((posting-from-work-p) (eval (set (make-local-variable 'message-cite-style) message-cite-style-outlook)))" | ||
| 1107 | :version "24.1" | ||
| 1108 | :group 'message-insertion | ||
| 1109 | :type '(choice (const :tag "Do not override variables" :value nil) | ||
| 1110 | (const :tag "MS Outlook" :value message-cite-style-outlook) | ||
| 1111 | (const :tag "Mozilla Thunderbird" :value message-cite-style-thunderbird) | ||
| 1112 | (const :tag "Gmail" :value message-cite-style-gmail) | ||
| 1113 | (variable :tag "User-specified"))) | ||
| 1114 | |||
| 1115 | (defconst message-cite-style-outlook | ||
| 1116 | '((message-cite-function 'message-cite-original) | ||
| 1117 | (message-citation-line-function 'message-insert-formatted-citation-line) | ||
| 1118 | (message-cite-reply-position 'above) | ||
| 1119 | (message-yank-prefix "") | ||
| 1120 | (message-yank-cited-prefix "") | ||
| 1121 | (message-yank-empty-prefix "") | ||
| 1122 | (message-citation-line-format "\n\n-----------------------\nOn %a, %b %d %Y, %N wrote:\n")) | ||
| 1123 | "Message citation style used by MS Outlook. Use with message-cite-style.") | ||
| 1124 | |||
| 1125 | (defconst message-cite-style-thunderbird | ||
| 1126 | '((message-cite-function 'message-cite-original) | ||
| 1127 | (message-citation-line-function 'message-insert-formatted-citation-line) | ||
| 1128 | (message-cite-reply-position 'above) | ||
| 1129 | (message-yank-prefix "> ") | ||
| 1130 | (message-yank-cited-prefix ">") | ||
| 1131 | (message-yank-empty-prefix ">") | ||
| 1132 | (message-citation-line-format "On %D %R %p, %N wrote:")) | ||
| 1133 | "Message citation style used by Mozilla Thunderbird. Use with message-cite-style.") | ||
| 1134 | |||
| 1135 | (defconst message-cite-style-gmail | ||
| 1136 | '((message-cite-function 'message-cite-original) | ||
| 1137 | (message-citation-line-function 'message-insert-formatted-citation-line) | ||
| 1138 | (message-cite-reply-position 'above) | ||
| 1139 | (message-yank-prefix " ") | ||
| 1140 | (message-yank-cited-prefix " ") | ||
| 1141 | (message-yank-empty-prefix " ") | ||
| 1142 | (message-citation-line-format "On %e %B %Y %R, %f wrote:\n")) | ||
| 1143 | "Message citation style used by Gmail. Use with message-cite-style.") | ||
| 1144 | |||
| 1091 | (defcustom message-distribution-function nil | 1145 | (defcustom message-distribution-function nil |
| 1092 | "*Function called to return a Distribution header." | 1146 | "*Function called to return a Distribution header." |
| 1093 | :group 'message-news | 1147 | :group 'message-news |
| @@ -1814,7 +1868,12 @@ You must have the \"hashcash\" binary installed, see `hashcash-path'." | |||
| 1814 | 1868 | ||
| 1815 | (defvar message-options nil | 1869 | (defvar message-options nil |
| 1816 | "Some saved answers when sending message.") | 1870 | "Some saved answers when sending message.") |
| 1817 | (make-variable-buffer-local 'message-options) | 1871 | ;; FIXME: On XEmacs this causes problems since let-binding like: |
| 1872 | ;; (let ((message-options message-options)) ...) | ||
| 1873 | ;; as in `message-send' and `mml-preview' loses to buffer-local | ||
| 1874 | ;; variable initialization. | ||
| 1875 | (unless (featurep 'xemacs) | ||
| 1876 | (make-variable-buffer-local 'message-options)) | ||
| 1818 | 1877 | ||
| 1819 | (defvar message-send-mail-real-function nil | 1878 | (defvar message-send-mail-real-function nil |
| 1820 | "Internal send mail function.") | 1879 | "Internal send mail function.") |
| @@ -3645,17 +3704,6 @@ To use this automatically, you may add this function to | |||
| 3645 | (while (re-search-forward citexp nil t) | 3704 | (while (re-search-forward citexp nil t) |
| 3646 | (replace-match (if remove "" "\n")))))) | 3705 | (replace-match (if remove "" "\n")))))) |
| 3647 | 3706 | ||
| 3648 | (defvar message-cite-reply-above nil | ||
| 3649 | "If non-nil, start own text above the quote. | ||
| 3650 | |||
| 3651 | Note: Top posting is bad netiquette. Don't use it unless you | ||
| 3652 | really must. You probably want to set variable only for specific | ||
| 3653 | groups, e.g. using `gnus-posting-styles': | ||
| 3654 | |||
| 3655 | (eval (set (make-local-variable 'message-cite-reply-above) t)) | ||
| 3656 | |||
| 3657 | This variable has no effect in news postings.") | ||
| 3658 | |||
| 3659 | (defun message-yank-original (&optional arg) | 3707 | (defun message-yank-original (&optional arg) |
| 3660 | "Insert the message being replied to, if any. | 3708 | "Insert the message being replied to, if any. |
| 3661 | Puts point before the text and mark after. | 3709 | Puts point before the text and mark after. |
| @@ -3669,49 +3717,49 @@ prefix, and don't delete any headers." | |||
| 3669 | (interactive "P") | 3717 | (interactive "P") |
| 3670 | (let ((modified (buffer-modified-p)) | 3718 | (let ((modified (buffer-modified-p)) |
| 3671 | body-text) | 3719 | body-text) |
| 3672 | (when (and message-reply-buffer | 3720 | ;; eval the let forms contained in message-cite-style |
| 3673 | message-cite-function) | 3721 | (eval |
| 3674 | (when message-cite-reply-above | 3722 | `(let ,message-cite-style |
| 3675 | (if (and (not (message-news-p)) | 3723 | (when (and message-reply-buffer |
| 3676 | (or (eq message-cite-reply-above 'is-evil) | 3724 | message-cite-function) |
| 3677 | (y-or-n-p "\ | 3725 | (when (equal message-cite-reply-position 'above) |
| 3678 | Top posting is bad netiquette. Please don't top post unless you really must. | ||
| 3679 | Really top post? "))) | ||
| 3680 | (save-excursion | 3726 | (save-excursion |
| 3681 | (setq body-text | 3727 | (setq body-text |
| 3682 | (buffer-substring (message-goto-body) | 3728 | (buffer-substring (message-goto-body) |
| 3683 | (point-max))) | 3729 | (point-max))) |
| 3684 | (delete-region (message-goto-body) (point-max))) | 3730 | (delete-region (message-goto-body) (point-max)))) |
| 3685 | (set (make-local-variable 'message-cite-reply-above) nil))) | 3731 | (if (bufferp message-reply-buffer) |
| 3686 | (if (bufferp message-reply-buffer) | 3732 | (delete-windows-on message-reply-buffer t)) |
| 3687 | (delete-windows-on message-reply-buffer t)) | 3733 | (push-mark (save-excursion |
| 3688 | (push-mark (save-excursion | 3734 | (cond |
| 3689 | (cond | 3735 | ((bufferp message-reply-buffer) |
| 3690 | ((bufferp message-reply-buffer) | 3736 | (insert-buffer-substring message-reply-buffer)) |
| 3691 | (insert-buffer-substring message-reply-buffer)) | 3737 | ((and (consp message-reply-buffer) |
| 3692 | ((and (consp message-reply-buffer) | 3738 | (functionp (car message-reply-buffer))) |
| 3693 | (functionp (car message-reply-buffer))) | 3739 | (apply (car message-reply-buffer) |
| 3694 | (apply (car message-reply-buffer) | 3740 | (cdr message-reply-buffer)))) |
| 3695 | (cdr message-reply-buffer)))) | 3741 | (unless (bolp) |
| 3696 | (unless (bolp) | 3742 | (insert ?\n)) |
| 3697 | (insert ?\n)) | 3743 | (point))) |
| 3698 | (point))) | 3744 | (unless arg |
| 3699 | (unless arg | 3745 | (funcall message-cite-function) |
| 3700 | (funcall message-cite-function) | 3746 | (unless (eq (char-before (mark t)) ?\n) |
| 3701 | (unless (eq (char-before (mark t)) ?\n) | 3747 | (let ((pt (point))) |
| 3702 | (let ((pt (point))) | 3748 | (goto-char (mark t)) |
| 3703 | (goto-char (mark t)) | 3749 | (insert-before-markers ?\n) |
| 3704 | (insert-before-markers ?\n) | 3750 | (goto-char pt)))) |
| 3705 | (goto-char pt)))) | 3751 | (case message-cite-reply-position |
| 3706 | (when message-cite-reply-above | 3752 | ('above |
| 3707 | (message-goto-body) | 3753 | (message-goto-body) |
| 3708 | (insert body-text) | 3754 | (insert body-text) |
| 3709 | (insert (if (bolp) "\n" "\n\n")) | 3755 | (insert (if (bolp) "\n" "\n\n")) |
| 3710 | (message-goto-body)) | 3756 | (message-goto-body)) |
| 3711 | ;; Add a `message-setup-very-last-hook' here? | 3757 | ('below |
| 3712 | ;; Add `gnus-article-highlight-citation' here? | 3758 | (message-goto-signature))) |
| 3713 | (unless modified | 3759 | ;; Add a `message-setup-very-last-hook' here? |
| 3714 | (setq message-checksum (message-checksum)))))) | 3760 | ;; Add `gnus-article-highlight-citation' here? |
| 3761 | (unless modified | ||
| 3762 | (setq message-checksum (message-checksum)))))))) | ||
| 3715 | 3763 | ||
| 3716 | (defun message-yank-buffer (buffer) | 3764 | (defun message-yank-buffer (buffer) |
| 3717 | "Insert BUFFER into the current buffer and quote it." | 3765 | "Insert BUFFER into the current buffer and quote it." |
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index c579261e356..aa4ecbc3b0f 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el | |||
| @@ -1496,10 +1496,22 @@ textual parts.") | |||
| 1496 | (setq start (point)) | 1496 | (setq start (point)) |
| 1497 | (goto-char end)) | 1497 | (goto-char end)) |
| 1498 | (while (re-search-forward "^\\* [0-9]+ FETCH " start t) | 1498 | (while (re-search-forward "^\\* [0-9]+ FETCH " start t) |
| 1499 | (setq elems (read (current-buffer))) | 1499 | (let ((p (point))) |
| 1500 | (push (cons (cadr (memq 'UID elems)) | 1500 | ;; FIXME: For FETCH lines like "* 2971 FETCH (FLAGS (%Recent) UID |
| 1501 | (cadr (memq 'FLAGS elems))) | 1501 | ;; 12509 MODSEQ (13419098521433281274))" we get an |
| 1502 | articles)) | 1502 | ;; overflow-error. The handler simply deletes that large number |
| 1503 | ;; and reads again. But maybe there's a better fix... | ||
| 1504 | (setq elems (condition-case nil (read (current-buffer)) | ||
| 1505 | (overflow-error | ||
| 1506 | ;; After an overflow-error, point is just after | ||
| 1507 | ;; the too large number. So delete it and try | ||
| 1508 | ;; again. | ||
| 1509 | (delete-region (point) (progn (backward-word) (point))) | ||
| 1510 | (goto-char p) | ||
| 1511 | (read (current-buffer))))) | ||
| 1512 | (push (cons (cadr (memq 'UID elems)) | ||
| 1513 | (cadr (memq 'FLAGS elems))) | ||
| 1514 | articles))) | ||
| 1503 | (push (nconc (list group uidnext totalp permanent-flags uidvalidity | 1515 | (push (nconc (list group uidnext totalp permanent-flags uidvalidity |
| 1504 | vanished highestmodseq) | 1516 | vanished highestmodseq) |
| 1505 | articles) | 1517 | articles) |
diff --git a/lisp/help-mode.el b/lisp/help-mode.el index 724b0186679..51d18235e1b 100644 --- a/lisp/help-mode.el +++ b/lisp/help-mode.el | |||
| @@ -409,13 +409,16 @@ restore it properly when going back." | |||
| 409 | (defun help-buffer () | 409 | (defun help-buffer () |
| 410 | "Return the name of a buffer for inserting help. | 410 | "Return the name of a buffer for inserting help. |
| 411 | If `help-xref-following' is non-nil, this is the name of the | 411 | If `help-xref-following' is non-nil, this is the name of the |
| 412 | current buffer. | 412 | current buffer. Signal an error if this buffer is not derived |
| 413 | Otherwise, it is *Help*; if no buffer with that name currently | 413 | from `help-mode'. |
| 414 | exists, it is created." | 414 | Otherwise, return \"*Help*\", creating a buffer with that name if |
| 415 | it does not already exist." | ||
| 415 | (buffer-name ;for with-output-to-temp-buffer | 416 | (buffer-name ;for with-output-to-temp-buffer |
| 416 | (if help-xref-following | 417 | (if (not help-xref-following) |
| 417 | (current-buffer) | 418 | (get-buffer-create "*Help*") |
| 418 | (get-buffer-create "*Help*")))) | 419 | (unless (derived-mode-p 'help-mode) |
| 420 | (error "Current buffer is not in Help mode")) | ||
| 421 | (current-buffer)))) | ||
| 419 | 422 | ||
| 420 | (defvar help-xref-override-view-map | 423 | (defvar help-xref-override-view-map |
| 421 | (let ((map (make-sparse-keymap))) | 424 | (let ((map (make-sparse-keymap))) |
diff --git a/lisp/image-dired.el b/lisp/image-dired.el index 8fa6963b3d7..efe8262645d 100644 --- a/lisp/image-dired.el +++ b/lisp/image-dired.el | |||
| @@ -384,7 +384,7 @@ Used together with `image-dired-cmd-read-exif-data-program-options'." | |||
| 384 | "%p -s -s -s -%t \"%f\"" | 384 | "%p -s -s -s -%t \"%f\"" |
| 385 | "Format of command used to read EXIF data. | 385 | "Format of command used to read EXIF data. |
| 386 | Available options are %p which is replaced by | 386 | Available options are %p which is replaced by |
| 387 | `image-dired-cmd-write-exif-data-options', %f which is replaced | 387 | `image-dired-cmd-write-exif-data-program', %f which is replaced |
| 388 | by the image file name and %t which is replaced by the tag name." | 388 | by the image file name and %t which is replaced by the tag name." |
| 389 | :type 'string | 389 | :type 'string |
| 390 | :group 'image-dired) | 390 | :group 'image-dired) |
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 77ae87b5449..0548f24b1dd 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el | |||
| @@ -309,7 +309,6 @@ The default value matches citations like `foo-bar>' plus whitespace." | |||
| 309 | (define-key map [remap split-line] 'mail-split-line) | 309 | (define-key map [remap split-line] 'mail-split-line) |
| 310 | (define-key map "\C-c\C-q" 'mail-fill-yanked-message) | 310 | (define-key map "\C-c\C-q" 'mail-fill-yanked-message) |
| 311 | (define-key map "\C-c\C-w" 'mail-signature) | 311 | (define-key map "\C-c\C-w" 'mail-signature) |
| 312 | (define-key map "\C-c\C-v" 'mail-sent-via) | ||
| 313 | (define-key map "\C-c\C-c" 'mail-send-and-exit) | 312 | (define-key map "\C-c\C-c" 'mail-send-and-exit) |
| 314 | (define-key map "\C-c\C-s" 'mail-send) | 313 | (define-key map "\C-c\C-s" 'mail-send) |
| 315 | (define-key map "\C-c\C-i" 'mail-attach-file) | 314 | (define-key map "\C-c\C-i" 'mail-attach-file) |
| @@ -349,9 +348,6 @@ The default value matches citations like `foo-bar>' plus whitespace." | |||
| 349 | (define-key map [menu-bar headers expand-aliases] | 348 | (define-key map [menu-bar headers expand-aliases] |
| 350 | '("Expand Aliases" . expand-mail-aliases)) | 349 | '("Expand Aliases" . expand-mail-aliases)) |
| 351 | 350 | ||
| 352 | (define-key map [menu-bar headers sent-via] | ||
| 353 | '("Sent-Via" . mail-sent-via)) | ||
| 354 | |||
| 355 | (define-key map [menu-bar headers mail-reply-to] | 351 | (define-key map [menu-bar headers mail-reply-to] |
| 356 | '("Mail-Reply-To" . mail-mail-reply-to)) | 352 | '("Mail-Reply-To" . mail-mail-reply-to)) |
| 357 | 353 | ||
| @@ -665,7 +661,6 @@ Here are commands that move to a header field (and create it if there isn't): | |||
| 665 | \\[mail-signature] mail-signature (insert `mail-signature-file' file). | 661 | \\[mail-signature] mail-signature (insert `mail-signature-file' file). |
| 666 | \\[mail-yank-original] mail-yank-original (insert current message, in Rmail). | 662 | \\[mail-yank-original] mail-yank-original (insert current message, in Rmail). |
| 667 | \\[mail-fill-yanked-message] mail-fill-yanked-message (fill what was yanked). | 663 | \\[mail-fill-yanked-message] mail-fill-yanked-message (fill what was yanked). |
| 668 | \\[mail-sent-via] mail-sent-via (add a sent-via field for each To or CC). | ||
| 669 | Turning on Mail mode runs the normal hooks `text-mode-hook' and | 664 | Turning on Mail mode runs the normal hooks `text-mode-hook' and |
| 670 | `mail-mode-hook' (in that order)." | 665 | `mail-mode-hook' (in that order)." |
| 671 | (make-local-variable 'mail-reply-action) | 666 | (make-local-variable 'mail-reply-action) |
| @@ -1346,6 +1341,9 @@ just append to the file, in Babyl format if necessary." | |||
| 1346 | (point))))) | 1341 | (point))))) |
| 1347 | ;; Insert a copy, with altered header field name. | 1342 | ;; Insert a copy, with altered header field name. |
| 1348 | (insert-before-markers "Sent-via:" to-line)))))) | 1343 | (insert-before-markers "Sent-via:" to-line)))))) |
| 1344 | |||
| 1345 | (make-obsolete 'mail-sent-via "nobody can remember what it is for." "24.1") | ||
| 1346 | |||
| 1349 | 1347 | ||
| 1350 | (defun mail-to () | 1348 | (defun mail-to () |
| 1351 | "Move point to end of To field, creating it if necessary." | 1349 | "Move point to end of To field, creating it if necessary." |
diff --git a/lisp/man.el b/lisp/man.el index 0b3ac537c5b..c8c2f8653e2 100644 --- a/lisp/man.el +++ b/lisp/man.el | |||
| @@ -623,36 +623,32 @@ and the `Man-section-translations-alist' variables)." | |||
| 623 | (concat Man-specified-section-option section " " name)))) | 623 | (concat Man-specified-section-option section " " name)))) |
| 624 | 624 | ||
| 625 | (defun Man-support-local-filenames () | 625 | (defun Man-support-local-filenames () |
| 626 | "Check the availability of `-l' option of the man command. | 626 | "Return non-nil if the man command supports local filenames. |
| 627 | This option allows `man' to interpret command line arguments | 627 | Different man programs support this feature in different ways. |
| 628 | as local filenames. | 628 | The default Debian man program (\"man-db\") has a `--local-file' |
| 629 | Return the value of the variable `Man-support-local-filenames' | 629 | \(or `-l') option for this purpose. The default Red Hat man |
| 630 | if it was set to nil or t before the call of this function. | 630 | program has no such option, but interprets any name containing |
| 631 | If t, the man command supports `-l' option. If nil, it doesn't. | 631 | a \"/\" as a local filename. The function returns either `man-db' |
| 632 | Otherwise, if the value of `Man-support-local-filenames' | 632 | `man', or nil." |
| 633 | is neither t nor nil, then determine a new value, set it | 633 | (if (eq Man-support-local-filenames 'auto-detect) |
| 634 | to the variable `Man-support-local-filenames' and return | 634 | (setq Man-support-local-filenames |
| 635 | a new value." | 635 | (with-temp-buffer |
| 636 | (if (or (not Man-support-local-filenames) | 636 | (let ((default-directory |
| 637 | (eq Man-support-local-filenames t)) | 637 | ;; Ensure that `default-directory' exists and is readable. |
| 638 | Man-support-local-filenames | 638 | (if (and (file-directory-p default-directory) |
| 639 | (setq Man-support-local-filenames | 639 | (file-readable-p default-directory)) |
| 640 | (with-temp-buffer | 640 | default-directory |
| 641 | (and (equal (condition-case nil | 641 | (expand-file-name "~/")))) |
| 642 | (let ((default-directory | 642 | (ignore-errors |
| 643 | ;; Assure that `default-directory' exists | 643 | (call-process manual-program nil t nil "--help"))) |
| 644 | ;; and is readable. | 644 | (cond ((search-backward "--local-file" nil 'move) |
| 645 | (if (and (file-directory-p default-directory) | 645 | 'man-db) |
| 646 | (file-readable-p default-directory)) | 646 | ;; This feature seems to be present in at least ver 1.4f, |
| 647 | default-directory | 647 | ;; which is about 20 years old. |
| 648 | (expand-file-name "~/")))) | 648 | ;; I don't know if this version has an official name? |
| 649 | (call-process manual-program nil t nil "--help")) | 649 | ((looking-at "^man, versione? [1-9]") |
| 650 | (error nil)) | 650 | 'man)))) |
| 651 | 0) | 651 | Man-support-local-filenames)) |
| 652 | (progn | ||
| 653 | (goto-char (point-min)) | ||
| 654 | (search-forward "--local-file" nil t)) | ||
| 655 | t))))) | ||
| 656 | 652 | ||
| 657 | 653 | ||
| 658 | ;; ====================================================================== | 654 | ;; ====================================================================== |
diff --git a/lisp/mh-e/ChangeLog b/lisp/mh-e/ChangeLog index f3d1682127e..4b904ed2b7a 100644 --- a/lisp/mh-e/ChangeLog +++ b/lisp/mh-e/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2011-03-05 Antoine Levitt <antoine.levitt@gmail.com> | ||
| 2 | |||
| 3 | * mh-funcs.el (mh-store-msg, mh-store-buffer): | ||
| 4 | * mh-mime.el (mh-mime-save-parts): Use read-directory-name. | ||
| 5 | |||
| 1 | 2011-01-13 Chong Yidong <cyd@stupidchicken.com> | 6 | 2011-01-13 Chong Yidong <cyd@stupidchicken.com> |
| 2 | 7 | ||
| 3 | * mh-comp.el (mh-user-agent-compose): New arg RETURN-ACTION. | 8 | * mh-comp.el (mh-user-agent-compose): New arg RETURN-ACTION. |
diff --git a/lisp/mh-e/mh-funcs.el b/lisp/mh-e/mh-funcs.el index ad508416501..c3f301e649d 100644 --- a/lisp/mh-e/mh-funcs.el +++ b/lisp/mh-e/mh-funcs.el | |||
| @@ -286,7 +286,7 @@ to \"Directory\", and then enter the name of the directory for | |||
| 286 | storing the content of these messages." | 286 | storing the content of these messages." |
| 287 | (interactive (list (let ((udir (or mh-store-default-directory | 287 | (interactive (list (let ((udir (or mh-store-default-directory |
| 288 | default-directory))) | 288 | default-directory))) |
| 289 | (read-file-name "Store message in directory: " | 289 | (read-directory-name "Store message in directory: " |
| 290 | udir udir nil)))) | 290 | udir udir nil)))) |
| 291 | (let ((msg-file-to-store (mh-msg-filename (mh-get-msg-num t)))) | 291 | (let ((msg-file-to-store (mh-msg-filename (mh-get-msg-num t)))) |
| 292 | (with-current-buffer (get-buffer-create mh-temp-buffer) | 292 | (with-current-buffer (get-buffer-create mh-temp-buffer) |
| @@ -300,7 +300,7 @@ storing the content of these messages." | |||
| 300 | See `mh-store-msg' for a description of DIRECTORY." | 300 | See `mh-store-msg' for a description of DIRECTORY." |
| 301 | (interactive (list (let ((udir (or mh-store-default-directory | 301 | (interactive (list (let ((udir (or mh-store-default-directory |
| 302 | default-directory))) | 302 | default-directory))) |
| 303 | (read-file-name "Store buffer in directory: " | 303 | (read-directory-name "Store buffer in directory: " |
| 304 | udir udir nil)))) | 304 | udir udir nil)))) |
| 305 | (let ((store-directory (expand-file-name directory)) | 305 | (let ((store-directory (expand-file-name directory)) |
| 306 | (sh-start (save-excursion | 306 | (sh-start (save-excursion |
diff --git a/lisp/mh-e/mh-mime.el b/lisp/mh-e/mh-mime.el index de0f49e41db..ba994e73a91 100644 --- a/lisp/mh-e/mh-mime.el +++ b/lisp/mh-e/mh-mime.el | |||
| @@ -390,11 +390,11 @@ do the work." | |||
| 390 | (equal nil mh-mime-save-parts-default-directory) | 390 | (equal nil mh-mime-save-parts-default-directory) |
| 391 | (equal t mh-mime-save-parts-default-directory)) | 391 | (equal t mh-mime-save-parts-default-directory)) |
| 392 | (not mh-mime-save-parts-directory)) | 392 | (not mh-mime-save-parts-directory)) |
| 393 | (read-file-name "Store in directory: " nil nil t nil)) | 393 | (read-directory-name "Store in directory: " nil nil t)) |
| 394 | ((and (or prompt | 394 | ((and (or prompt |
| 395 | (equal t mh-mime-save-parts-default-directory)) | 395 | (equal t mh-mime-save-parts-default-directory)) |
| 396 | mh-mime-save-parts-directory) | 396 | mh-mime-save-parts-directory) |
| 397 | (read-file-name (format | 397 | (read-directory-name (format |
| 398 | "Store in directory (default %s): " | 398 | "Store in directory (default %s): " |
| 399 | mh-mime-save-parts-directory) | 399 | mh-mime-save-parts-directory) |
| 400 | "" mh-mime-save-parts-directory t "")) | 400 | "" mh-mime-save-parts-directory t "")) |
diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el index f0d36451b5c..8c9ead479e8 100644 --- a/lisp/net/ange-ftp.el +++ b/lisp/net/ange-ftp.el | |||
| @@ -4071,7 +4071,7 @@ directory, so that Emacs will know its current contents." | |||
| 4071 | (ange-ftp-get-files dir t)))) | 4071 | (ange-ftp-get-files dir t)))) |
| 4072 | 4072 | ||
| 4073 | (defun ange-ftp-make-directory (dir &optional parents) | 4073 | (defun ange-ftp-make-directory (dir &optional parents) |
| 4074 | (interactive (list (expand-file-name (read-file-name "Make directory: ")))) | 4074 | (interactive (list (expand-file-name (read-directory-name "Make directory: ")))) |
| 4075 | (if parents | 4075 | (if parents |
| 4076 | (let ((parent (file-name-directory (directory-file-name dir)))) | 4076 | (let ((parent (file-name-directory (directory-file-name dir)))) |
| 4077 | (or (file-exists-p parent) | 4077 | (or (file-exists-p parent) |
diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el index 660eb3b968e..24dbfc0c30a 100644 --- a/lisp/net/browse-url.el +++ b/lisp/net/browse-url.el | |||
| @@ -798,7 +798,12 @@ first, if that exists." | |||
| 798 | (let ((process-environment (copy-sequence process-environment)) | 798 | (let ((process-environment (copy-sequence process-environment)) |
| 799 | (function (or (and (string-match "\\`mailto:" url) | 799 | (function (or (and (string-match "\\`mailto:" url) |
| 800 | browse-url-mailto-function) | 800 | browse-url-mailto-function) |
| 801 | browse-url-browser-function))) | 801 | browse-url-browser-function)) |
| 802 | ;; Ensure that `default-directory' exists and is readable (b#6077). | ||
| 803 | (default-directory (if (and (file-directory-p default-directory) | ||
| 804 | (file-readable-p default-directory)) | ||
| 805 | default-directory | ||
| 806 | (expand-file-name "~/")))) | ||
| 802 | ;; When connected to various displays, be careful to use the display of | 807 | ;; When connected to various displays, be careful to use the display of |
| 803 | ;; the currently selected frame, rather than the original start display, | 808 | ;; the currently selected frame, rather than the original start display, |
| 804 | ;; which may not even exist any more. | 809 | ;; which may not even exist any more. |
diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el index 1d419dbfa18..1e3ee91092d 100644 --- a/lisp/net/rcirc.el +++ b/lisp/net/rcirc.el | |||
| @@ -204,12 +204,14 @@ The ARGUMENTS for each METHOD symbol are: | |||
| 204 | `nickserv': NICK PASSWORD [NICKSERV-NICK] | 204 | `nickserv': NICK PASSWORD [NICKSERV-NICK] |
| 205 | `chanserv': NICK CHANNEL PASSWORD | 205 | `chanserv': NICK CHANNEL PASSWORD |
| 206 | `bitlbee': NICK PASSWORD | 206 | `bitlbee': NICK PASSWORD |
| 207 | `quakenet': ACCOUNT PASSWORD | ||
| 207 | 208 | ||
| 208 | Examples: | 209 | Examples: |
| 209 | ((\"freenode\" nickserv \"bob\" \"p455w0rd\") | 210 | ((\"freenode\" nickserv \"bob\" \"p455w0rd\") |
| 210 | (\"freenode\" chanserv \"bob\" \"#bobland\" \"passwd99\") | 211 | (\"freenode\" chanserv \"bob\" \"#bobland\" \"passwd99\") |
| 211 | (\"bitlbee\" bitlbee \"robert\" \"sekrit\") | 212 | (\"bitlbee\" bitlbee \"robert\" \"sekrit\") |
| 212 | (\"dal.net\" nickserv \"bob\" \"sekrit\" \"NickServ@services.dal.net\"))" | 213 | (\"dal.net\" nickserv \"bob\" \"sekrit\" \"NickServ@services.dal.net\") |
| 214 | (\"quakenet.org\" quakenet \"bobby\" \"sekrit\"))" | ||
| 213 | :type '(alist :key-type (string :tag "Server") | 215 | :type '(alist :key-type (string :tag "Server") |
| 214 | :value-type (choice (list :tag "NickServ" | 216 | :value-type (choice (list :tag "NickServ" |
| 215 | (const nickserv) | 217 | (const nickserv) |
| @@ -223,7 +225,11 @@ Examples: | |||
| 223 | (list :tag "BitlBee" | 225 | (list :tag "BitlBee" |
| 224 | (const bitlbee) | 226 | (const bitlbee) |
| 225 | (string :tag "Nick") | 227 | (string :tag "Nick") |
| 226 | (string :tag "Password")))) | 228 | (string :tag "Password")) |
| 229 | (list :tag "QuakeNet" | ||
| 230 | (const quakenet) | ||
| 231 | (string :tag "Account") | ||
| 232 | (string :tag "Password")))) | ||
| 227 | :group 'rcirc) | 233 | :group 'rcirc) |
| 228 | 234 | ||
| 229 | (defcustom rcirc-auto-authenticate-flag t | 235 | (defcustom rcirc-auto-authenticate-flag t |
| @@ -232,6 +238,13 @@ See also `rcirc-authinfo'." | |||
| 232 | :type 'boolean | 238 | :type 'boolean |
| 233 | :group 'rcirc) | 239 | :group 'rcirc) |
| 234 | 240 | ||
| 241 | (defcustom rcirc-authenticate-before-join t | ||
| 242 | "*Non-nil means authenticate to services before joining channels. | ||
| 243 | Currently only works with NickServ on some networks." | ||
| 244 | :version "24.1" | ||
| 245 | :type 'boolean | ||
| 246 | :group 'rcirc) | ||
| 247 | |||
| 235 | (defcustom rcirc-prompt "> " | 248 | (defcustom rcirc-prompt "> " |
| 236 | "Prompt string to use in IRC buffers. | 249 | "Prompt string to use in IRC buffers. |
| 237 | 250 | ||
| @@ -282,6 +295,9 @@ Called with 5 arguments, PROCESS, SENDER, RESPONSE, TARGET and TEXT." | |||
| 282 | :type 'hook | 295 | :type 'hook |
| 283 | :group 'rcirc) | 296 | :group 'rcirc) |
| 284 | 297 | ||
| 298 | (defvar rcirc-authenticated-hook nil | ||
| 299 | "Hook run after successfully authenticated.") | ||
| 300 | |||
| 285 | (defcustom rcirc-always-use-server-buffer-flag nil | 301 | (defcustom rcirc-always-use-server-buffer-flag nil |
| 286 | "Non-nil means messages without a channel target will go to the server buffer." | 302 | "Non-nil means messages without a channel target will go to the server buffer." |
| 287 | :type 'boolean | 303 | :type 'boolean |
| @@ -524,6 +540,8 @@ If ARG is non-nil, instead prompt for connection parameters." | |||
| 524 | (setq rcirc-timeout-timer nil) | 540 | (setq rcirc-timeout-timer nil) |
| 525 | (make-local-variable 'rcirc-user-disconnect) | 541 | (make-local-variable 'rcirc-user-disconnect) |
| 526 | (setq rcirc-user-disconnect nil) | 542 | (setq rcirc-user-disconnect nil) |
| 543 | (make-local-variable 'rcirc-user-authenticated) | ||
| 544 | (setq rcirc-user-authenticated nil) | ||
| 527 | (make-local-variable 'rcirc-connecting) | 545 | (make-local-variable 'rcirc-connecting) |
| 528 | (setq rcirc-connecting t) | 546 | (setq rcirc-connecting t) |
| 529 | 547 | ||
| @@ -2104,7 +2122,8 @@ CHANNELS is a comma- or space-separated string of channel names." | |||
| 2104 | (let* ((split-channels (split-string channels "[ ,]" t)) | 2122 | (let* ((split-channels (split-string channels "[ ,]" t)) |
| 2105 | (buffers (mapcar (lambda (ch) | 2123 | (buffers (mapcar (lambda (ch) |
| 2106 | (rcirc-get-buffer-create process ch)) | 2124 | (rcirc-get-buffer-create process ch)) |
| 2107 | split-channels))) | 2125 | split-channels)) |
| 2126 | (channels (mapconcat 'identity split-channels ","))) | ||
| 2108 | (rcirc-send-string process (concat "JOIN " channels)) | 2127 | (rcirc-send-string process (concat "JOIN " channels)) |
| 2109 | (when (not (eq (selected-window) (minibuffer-window))) | 2128 | (when (not (eq (selected-window) (minibuffer-window))) |
| 2110 | (dolist (b buffers) ;; order the new channel buffers in the buffer list | 2129 | (dolist (b buffers) ;; order the new channel buffers in the buffer list |
| @@ -2427,10 +2446,23 @@ keywords when no KEYWORD is given." | |||
| 2427 | (setq rcirc-server-name sender) | 2446 | (setq rcirc-server-name sender) |
| 2428 | (setq rcirc-nick (car args)) | 2447 | (setq rcirc-nick (car args)) |
| 2429 | (rcirc-update-prompt) | 2448 | (rcirc-update-prompt) |
| 2430 | (when rcirc-auto-authenticate-flag (rcirc-authenticate)) | 2449 | (if rcirc-auto-authenticate-flag |
| 2450 | (if rcirc-authenticate-before-join | ||
| 2451 | (progn | ||
| 2452 | (with-rcirc-process-buffer process | ||
| 2453 | (add-hook 'rcirc-authenticated-hook 'rcirc-join-channels-post-auth t t)) | ||
| 2454 | (rcirc-authenticate)) | ||
| 2455 | (rcirc-authenticate) | ||
| 2456 | (rcirc-join-channels process rcirc-startup-channels)) | ||
| 2457 | (rcirc-join-channels process rcirc-startup-channels)))) | ||
| 2458 | |||
| 2459 | (defun rcirc-join-channels-post-auth (process) | ||
| 2460 | "Join `rcirc-startup-channels' after authenticating." | ||
| 2461 | (with-rcirc-process-buffer process | ||
| 2431 | (rcirc-join-channels process rcirc-startup-channels))) | 2462 | (rcirc-join-channels process rcirc-startup-channels))) |
| 2432 | 2463 | ||
| 2433 | (defun rcirc-handler-PRIVMSG (process sender args text) | 2464 | (defun rcirc-handler-PRIVMSG (process sender args text) |
| 2465 | (rcirc-check-auth-status process sender args text) | ||
| 2434 | (let ((target (if (rcirc-channel-p (car args)) | 2466 | (let ((target (if (rcirc-channel-p (car args)) |
| 2435 | (car args) | 2467 | (car args) |
| 2436 | sender)) | 2468 | sender)) |
| @@ -2443,6 +2475,7 @@ keywords when no KEYWORD is given." | |||
| 2443 | (rcirc-put-nick-channel process sender target rcirc-current-line)))) | 2475 | (rcirc-put-nick-channel process sender target rcirc-current-line)))) |
| 2444 | 2476 | ||
| 2445 | (defun rcirc-handler-NOTICE (process sender args text) | 2477 | (defun rcirc-handler-NOTICE (process sender args text) |
| 2478 | (rcirc-check-auth-status process sender args text) | ||
| 2446 | (let ((target (car args)) | 2479 | (let ((target (car args)) |
| 2447 | (message (cadr args))) | 2480 | (message (cadr args))) |
| 2448 | (if (string-match "^\C-a\\(.*\\)\C-a$" message) | 2481 | (if (string-match "^\C-a\\(.*\\)\C-a$" message) |
| @@ -2460,6 +2493,33 @@ keywords when no KEYWORD is given." | |||
| 2460 | sender))) | 2493 | sender))) |
| 2461 | message t)))) | 2494 | message t)))) |
| 2462 | 2495 | ||
| 2496 | (defun rcirc-check-auth-status (process sender args text) | ||
| 2497 | "Check if the user just authenticated. | ||
| 2498 | If authenticated, runs `rcirc-authenticated-hook' with PROCESS as | ||
| 2499 | the only argument." | ||
| 2500 | (with-rcirc-process-buffer process | ||
| 2501 | (when (and (not rcirc-user-authenticated) | ||
| 2502 | rcirc-authenticate-before-join | ||
| 2503 | rcirc-auto-authenticate-flag) | ||
| 2504 | (let ((target (car args)) | ||
| 2505 | (message (cadr args))) | ||
| 2506 | (when (or | ||
| 2507 | (and ;; nickserv | ||
| 2508 | (string= sender "NickServ") | ||
| 2509 | (string= target rcirc-nick) | ||
| 2510 | (member message | ||
| 2511 | (list | ||
| 2512 | (format "You are now identified for \C-b%s\C-b." rcirc-nick) | ||
| 2513 | "Password accepted - you are now recognized." | ||
| 2514 | ))) | ||
| 2515 | (and ;; quakenet | ||
| 2516 | (string= sender "Q") | ||
| 2517 | (string= target rcirc-nick) | ||
| 2518 | (string-match message "\\`You are now logged in as .+\\.\\'"))) | ||
| 2519 | (setq rcirc-user-authenticated t) | ||
| 2520 | (run-hook-with-args 'rcirc-authenticated-hook process) | ||
| 2521 | (remove-hook 'rcirc-authenticated-hook 'rcirc-join-channels-post-auth t)))))) | ||
| 2522 | |||
| 2463 | (defun rcirc-handler-WALLOPS (process sender args text) | 2523 | (defun rcirc-handler-WALLOPS (process sender args text) |
| 2464 | (rcirc-print process sender "WALLOPS" sender (car args) t)) | 2524 | (rcirc-print process sender "WALLOPS" sender (car args) t)) |
| 2465 | 2525 | ||
| @@ -2704,26 +2764,33 @@ Passwords are stored in `rcirc-authinfo' (which see)." | |||
| 2704 | (nick (caddr i)) | 2764 | (nick (caddr i)) |
| 2705 | (method (cadr i)) | 2765 | (method (cadr i)) |
| 2706 | (args (cdddr i))) | 2766 | (args (cdddr i))) |
| 2707 | (when (and (string-match server rcirc-server) | 2767 | (when (and (string-match server rcirc-server)) |
| 2708 | (string-match nick rcirc-nick)) | 2768 | (if (and (memq method '(nickserv chanserv bitlbee)) |
| 2709 | (cond ((equal method 'nickserv) | 2769 | (string-match nick rcirc-nick)) |
| 2710 | (rcirc-send-privmsg | 2770 | ;; the following methods rely on the user's nickname. |
| 2711 | process | 2771 | (case method |
| 2772 | (nickserv | ||
| 2773 | (rcirc-send-privmsg | ||
| 2774 | process | ||
| 2712 | (or (cadr args) "NickServ") | 2775 | (or (cadr args) "NickServ") |
| 2713 | (concat "identify " (car args)))) | 2776 | (concat "IDENTIFY " (car args)))) |
| 2714 | ((equal method 'chanserv) | 2777 | (chanserv |
| 2715 | (rcirc-send-privmsg | 2778 | (rcirc-send-privmsg |
| 2716 | process | 2779 | process |
| 2717 | "ChanServ" | 2780 | "ChanServ" |
| 2718 | (format "identify %s %s" (car args) (cadr args)))) | 2781 | (format "IDENTIFY %s %s" (car args) (cadr args)))) |
| 2719 | ((equal method 'bitlbee) | 2782 | (bitlbee |
| 2720 | (rcirc-send-privmsg | 2783 | (rcirc-send-privmsg |
| 2721 | process | 2784 | process |
| 2722 | "&bitlbee" | 2785 | "&bitlbee" |
| 2723 | (concat "identify " (car args)))) | 2786 | (concat "IDENTIFY " (car args))))) |
| 2724 | (t | 2787 | ;; quakenet authentication doesn't rely on the user's nickname. |
| 2725 | (message "No %S authentication method defined" | 2788 | ;; the variable `nick' here represents the Q account name. |
| 2726 | method)))))))) | 2789 | (when (eq method 'quakenet) |
| 2790 | (rcirc-send-privmsg | ||
| 2791 | process | ||
| 2792 | "Q@CServe.quakenet.org" | ||
| 2793 | (format "AUTH %s %s" nick (car args)))))))))) | ||
| 2727 | 2794 | ||
| 2728 | (defun rcirc-handler-INVITE (process sender args text) | 2795 | (defun rcirc-handler-INVITE (process sender args text) |
| 2729 | (rcirc-print process sender "INVITE" nil (mapconcat 'identity args " ") t)) | 2796 | (rcirc-print process sender "INVITE" nil (mapconcat 'identity args " ") t)) |
diff --git a/lisp/net/soap-client.el b/lisp/net/soap-client.el index b4307223ba8..b5453733d1d 100644 --- a/lisp/net/soap-client.el +++ b/lisp/net/soap-client.el | |||
| @@ -2,9 +2,10 @@ | |||
| 2 | 2 | ||
| 3 | ;; Copyright (C) 2009-2011 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 2009-2011 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Author: Alexandru Harsanyi (AlexHarsanyi@gmail.com) | 5 | ;; Author: Alexandru Harsanyi <AlexHarsanyi@gmail.com> |
| 6 | ;; Created: December, 2009 | 6 | ;; Created: December, 2009 |
| 7 | ;; Keywords: soap, web-services, comm, hypermedia | 7 | ;; Keywords: soap, web-services, comm, hypermedia |
| 8 | ;; Package: soap-client | ||
| 8 | ;; Homepage: http://code.google.com/p/emacs-soap-client | 9 | ;; Homepage: http://code.google.com/p/emacs-soap-client |
| 9 | 10 | ||
| 10 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
| @@ -323,13 +324,18 @@ added to the namespace." | |||
| 323 | ;; if name is nil, use TARGET as a name... | 324 | ;; if name is nil, use TARGET as a name... |
| 324 | (cond ((soap-element-p target) | 325 | (cond ((soap-element-p target) |
| 325 | (setq name (soap-element-name target))) | 326 | (setq name (soap-element-name target))) |
| 327 | ((consp target) ; a fq name: (namespace . name) | ||
| 328 | (setq name (cdr target))) | ||
| 326 | ((stringp target) | 329 | ((stringp target) |
| 327 | (cond ((string-match "^\\(.*\\):\\(.*\\)$" target) | 330 | (cond ((string-match "^\\(.*\\):\\(.*\\)$" target) |
| 328 | (setq name (match-string 2 target))) | 331 | (setq name (match-string 2 target))) |
| 329 | (t | 332 | (t |
| 330 | (setq name target)))))) | 333 | (setq name target)))))) |
| 331 | 334 | ||
| 332 | (assert name) ; by now, name should be valid | 335 | ;; by now, name should be valid |
| 336 | (assert (and name (not (equal name ""))) | ||
| 337 | nil | ||
| 338 | "Cannot determine name for namespace link") | ||
| 333 | (push (make-soap-namespace-link :name name :target target) | 339 | (push (make-soap-namespace-link :name name :target target) |
| 334 | (gethash name (soap-namespace-elements ns)))) | 340 | (gethash name (soap-namespace-elements ns)))) |
| 335 | 341 | ||
| @@ -890,7 +896,11 @@ Return a SOAP-NAMESPACE containing the elements." | |||
| 890 | (when (consp c) ; skip string nodes, which are whitespace | 896 | (when (consp c) ; skip string nodes, which are whitespace |
| 891 | (let ((node-name (soap-l2wk (xml-node-name c)))) | 897 | (let ((node-name (soap-l2wk (xml-node-name c)))) |
| 892 | (cond | 898 | (cond |
| 893 | ((eq node-name 'xsd:sequence) | 899 | ;; The difference between xsd:all and xsd:sequence is that fields |
| 900 | ;; in xsd:all are not ordered and they can occur only once. We | ||
| 901 | ;; don't care about that difference in soap-client.el | ||
| 902 | ((or (eq node-name 'xsd:sequence) | ||
| 903 | (eq node-name 'xsd:all)) | ||
| 894 | (setq type (soap-parse-complex-type-sequence c))) | 904 | (setq type (soap-parse-complex-type-sequence c))) |
| 895 | ((eq node-name 'xsd:complexContent) | 905 | ((eq node-name 'xsd:complexContent) |
| 896 | (setq type (soap-parse-complex-type-complex-content c))) | 906 | (setq type (soap-parse-complex-type-complex-content c))) |
| @@ -909,9 +919,10 @@ NODE is assumed to be an xsd:sequence node. In that case, each | |||
| 909 | of its children is assumed to be a sequence element. Each | 919 | of its children is assumed to be a sequence element. Each |
| 910 | sequence element is parsed constructing the corresponding type. | 920 | sequence element is parsed constructing the corresponding type. |
| 911 | A list of these types is returned." | 921 | A list of these types is returned." |
| 912 | (assert (eq (soap-l2wk (xml-node-name node)) 'xsd:sequence) | 922 | (assert (let ((n (soap-l2wk (xml-node-name node)))) |
| 923 | (memq n '(xsd:sequence xsd:all))) | ||
| 913 | nil | 924 | nil |
| 914 | "soap-parse-sequence: expecting xsd:sequence node, got %s" | 925 | "soap-parse-sequence: expecting xsd:sequence or xsd:all node, got %s" |
| 915 | (soap-l2wk (xml-node-name node))) | 926 | (soap-l2wk (xml-node-name node))) |
| 916 | (let (elements) | 927 | (let (elements) |
| 917 | (dolist (e (soap-xml-get-children1 node 'xsd:element)) | 928 | (dolist (e (soap-xml-get-children1 node 'xsd:element)) |
diff --git a/lisp/net/soap-inspect.el b/lisp/net/soap-inspect.el index 7cce9844d76..8f67d02dc6f 100644 --- a/lisp/net/soap-inspect.el +++ b/lisp/net/soap-inspect.el | |||
| @@ -2,9 +2,10 @@ | |||
| 2 | 2 | ||
| 3 | ;; Copyright (C) 2010-2011 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 2010-2011 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Author: Alexandru Harsanyi (AlexHarsanyi@gmail.com) | 5 | ;; Author: Alexandru Harsanyi <AlexHarsanyi@gmail.com> |
| 6 | ;; Created: October 2010 | 6 | ;; Created: October 2010 |
| 7 | ;; Keywords: soap, web-services, comm, hypermedia | 7 | ;; Keywords: soap, web-services, comm, hypermedia |
| 8 | ;; Package: soap-client | ||
| 8 | ;; Homepage: http://code.google.com/p/emacs-soap-client | 9 | ;; Homepage: http://code.google.com/p/emacs-soap-client |
| 9 | 10 | ||
| 10 | ;; This file is part of GNU Emacs. | 11 | ;; This file is part of GNU Emacs. |
diff --git a/lisp/net/tramp-cache.el b/lisp/net/tramp-cache.el index a98e523a68b..f8bc594e959 100644 --- a/lisp/net/tramp-cache.el +++ b/lisp/net/tramp-cache.el | |||
| @@ -353,7 +353,8 @@ KEY identifies the connection, it is either a process or a vector." | |||
| 353 | (write-region | 353 | (write-region |
| 354 | (point-min) (point-max) tramp-persistency-file-name)))))) | 354 | (point-min) (point-max) tramp-persistency-file-name)))))) |
| 355 | 355 | ||
| 356 | (add-hook 'kill-emacs-hook 'tramp-dump-connection-properties) | 356 | (unless noninteractive |
| 357 | (add-hook 'kill-emacs-hook 'tramp-dump-connection-properties)) | ||
| 357 | (add-hook 'tramp-cache-unload-hook | 358 | (add-hook 'tramp-cache-unload-hook |
| 358 | '(lambda () | 359 | '(lambda () |
| 359 | (remove-hook 'kill-emacs-hook | 360 | (remove-hook 'kill-emacs-hook |
diff --git a/lisp/obsolete/fast-lock.el b/lisp/obsolete/fast-lock.el index 68d06ef34bc..a59e7871458 100644 --- a/lisp/obsolete/fast-lock.el +++ b/lisp/obsolete/fast-lock.el | |||
| @@ -840,7 +840,8 @@ See `fast-lock-get-face-properties'." | |||
| 840 | 840 | ||
| 841 | (add-hook 'after-save-hook 'fast-lock-save-cache-after-save-file) | 841 | (add-hook 'after-save-hook 'fast-lock-save-cache-after-save-file) |
| 842 | (add-hook 'kill-buffer-hook 'fast-lock-save-cache-before-kill-buffer) | 842 | (add-hook 'kill-buffer-hook 'fast-lock-save-cache-before-kill-buffer) |
| 843 | (add-hook 'kill-emacs-hook 'fast-lock-save-caches-before-kill-emacs) | 843 | (unless noninteractive |
| 844 | (add-hook 'kill-emacs-hook 'fast-lock-save-caches-before-kill-emacs)) | ||
| 844 | 845 | ||
| 845 | ;;;###autoload | 846 | ;;;###autoload |
| 846 | (when (fboundp 'add-minor-mode) | 847 | (when (fboundp 'add-minor-mode) |
diff --git a/lisp/org/ChangeLog b/lisp/org/ChangeLog index 68d957584c6..e75821b6860 100644 --- a/lisp/org/ChangeLog +++ b/lisp/org/ChangeLog | |||
| @@ -1,13 +1,15 @@ | |||
| 1 | 2011-02-28 Juanma Barranquero <lekktu@gmail.com> | 1 | 2011-03-06 Juanma Barranquero <lekktu@gmail.com> |
| 2 | 2 | ||
| 3 | * org.el (org-maybe-keyword-time-regexp): | 3 | * org.el (org-blank-before-new-entry, org-context-in-file-links) |
| 4 | * org-icalendar.el (org-icalendar-store-UID): | 4 | (org-refile-targets, org-log-repeat, org-insert-link) |
| 5 | * org-agenda.el (org-agenda-scheduled-leaders) | 5 | (org-speed-command-default-hook, org-speed-command-hook) |
| 6 | (org-agenda-deadline-leaders, org-agenda-filter-preset): | 6 | (org-in-regexps-block-p, org-yank-generic, org-goto-first-child): |
| 7 | * org-table.el (org-table-current-line-types) | ||
| 8 | (org-table-current-begin-line, org-table-current-begin-pos): | ||
| 9 | (org-table-current-field-formula): | ||
| 10 | Fix typos in docstrings. | 7 | Fix typos in docstrings. |
| 8 | (org-toggle-pretty-entities): Fix typo in message. | ||
| 9 | |||
| 10 | 2011-03-06 Juanma Barranquero <lekktu@gmail.com> | ||
| 11 | |||
| 12 | * org-id.el: Don't set `kill-emacs-hook' on noninteractive sessions. | ||
| 11 | 13 | ||
| 12 | 2011-02-10 Stefan Monnier <monnier@iro.umontreal.ca> | 14 | 2011-02-10 Stefan Monnier <monnier@iro.umontreal.ca> |
| 13 | 15 | ||
| @@ -59,7 +61,7 @@ | |||
| 59 | 2010-12-11 Nicolas Goaziou <n.goaziou@gmail.com> | 61 | 2010-12-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 60 | 62 | ||
| 61 | * org-inlinetask.el (org-inlinetask-export-templates): Add | 63 | * org-inlinetask.el (org-inlinetask-export-templates): Add |
| 62 | Sébastien Vauban's suggestion for LaTeX export in docstring. This is | 64 | Sébastien Vauban's suggestion for LaTeX export in docstring. This is |
| 63 | not default as it requires an additional LaTeX package: "todonotes". | 65 | not default as it requires an additional LaTeX package: "todonotes". |
| 64 | 66 | ||
| 65 | 2010-12-11 Nicolas Goaziou <n.goaziou@gmail.com> | 67 | 2010-12-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| @@ -113,7 +115,7 @@ | |||
| 113 | 115 | ||
| 114 | * org.el (org-make-heading-search-string): Optionally limit number | 116 | * org.el (org-make-heading-search-string): Optionally limit number |
| 115 | of lines stored in file link search strings. | 117 | of lines stored in file link search strings. |
| 116 | (org-context-in-file-links) Add option to set to integer specifying | 118 | (org-context-in-file-links): Add option to set to integer specifying |
| 117 | number of lines. | 119 | number of lines. |
| 118 | 120 | ||
| 119 | 2010-12-11 Carsten Dominik <carsten.dominik@gmail.com> | 121 | 2010-12-11 Carsten Dominik <carsten.dominik@gmail.com> |
| @@ -290,7 +292,7 @@ | |||
| 290 | 2010-12-11 Julien Danjou <julien@danjou.info> | 292 | 2010-12-11 Julien Danjou <julien@danjou.info> |
| 291 | 293 | ||
| 292 | * org-agenda.el (org-format-agenda-item): Convert category to a string | 294 | * org-agenda.el (org-format-agenda-item): Convert category to a string |
| 293 | if it is a symbol. This fixes the following call to | 295 | if it is a symbol. This fixes the following call to |
| 294 | org-agenda-get-category-icon which fails if category is not a string. | 296 | org-agenda-get-category-icon which fails if category is not a string. |
| 295 | 297 | ||
| 296 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> | 298 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> |
| @@ -316,7 +318,7 @@ | |||
| 316 | 318 | ||
| 317 | * ob-python.el (org-babel-execute:python): Use a :return header | 319 | * ob-python.el (org-babel-execute:python): Use a :return header |
| 318 | argument for external evaluation in which the code block body need | 320 | argument for external evaluation in which the code block body need |
| 319 | be wrapped in a function | 321 | to be wrapped in a function. |
| 320 | 322 | ||
| 321 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> | 323 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> |
| 322 | 324 | ||
| @@ -325,7 +327,7 @@ | |||
| 325 | 327 | ||
| 326 | 2010-12-11 Carsten Dominik <carsten.dominik@gmail.com> | 328 | 2010-12-11 Carsten Dominik <carsten.dominik@gmail.com> |
| 327 | 329 | ||
| 328 | * org.el (org-edit-special): Edit formulas when in TBLMF line | 330 | * org.el (org-edit-special): Edit formulas when in TBLMF line. |
| 329 | 331 | ||
| 330 | 2010-12-11 Allen S. Rout <asr@ufl.edu> (tiny change) | 332 | 2010-12-11 Allen S. Rout <asr@ufl.edu> (tiny change) |
| 331 | 333 | ||
| @@ -405,7 +407,7 @@ | |||
| 405 | 407 | ||
| 406 | * org-macs.el (org-called-interactively-p): Wrap function call in | 408 | * org-macs.el (org-called-interactively-p): Wrap function call in |
| 407 | with-no-warnings. | 409 | with-no-warnings. |
| 408 | (with-silent-modifications) Declare macro for Emacs < 23.2. | 410 | (with-silent-modifications): Declare macro for Emacs < 23.2. |
| 409 | 411 | ||
| 410 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> | 412 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> |
| 411 | 413 | ||
| @@ -441,7 +443,7 @@ | |||
| 441 | 2010-12-11 Achim Gratz <Stromeko@Stromeko.DE> (tiny change) | 443 | 2010-12-11 Achim Gratz <Stromeko@Stromeko.DE> (tiny change) |
| 442 | 444 | ||
| 443 | * org-clock.el (org-get-clocktable): Previous patch incorrectly | 445 | * org-clock.el (org-get-clocktable): Previous patch incorrectly |
| 444 | required whitespace in front of #+BEGIN: and #+END: | 446 | required whitespace in front of #+BEGIN: and #+END:. |
| 445 | 447 | ||
| 446 | 2010-12-11 Dan Davison <dandavison7@gmail.com> | 448 | 2010-12-11 Dan Davison <dandavison7@gmail.com> |
| 447 | 449 | ||
| @@ -478,7 +480,7 @@ | |||
| 478 | 2010-12-11 Nicolas Goaziou <n.goaziou@gmail.com> | 480 | 2010-12-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 479 | 481 | ||
| 480 | * org.el (org-indent-line-function): Drawers and blocks have no | 482 | * org.el (org-indent-line-function): Drawers and blocks have no |
| 481 | influence on indentation of text below. Also fix indentation | 483 | influence on indentation of text below. Also fix indentation |
| 482 | problem with a block at column 0 and add a special case for | 484 | problem with a block at column 0 and add a special case for |
| 483 | literal examples. | 485 | literal examples. |
| 484 | 486 | ||
| @@ -491,7 +493,7 @@ | |||
| 491 | 493 | ||
| 492 | * ob-ref.el (org-babel-ref-resolve): Recognize `list' as a unique | 494 | * ob-ref.el (org-babel-ref-resolve): Recognize `list' as a unique |
| 493 | type of data | 495 | type of data |
| 494 | (org-babel-ref-at-ref-p): Recognize `list' as a unique type of data | 496 | (org-babel-ref-at-ref-p): Recognize `list' as a unique type of data. |
| 495 | 497 | ||
| 496 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> | 498 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> |
| 497 | 499 | ||
| @@ -521,7 +523,7 @@ | |||
| 521 | * org-clock.el (org-get-clocktable): | 523 | * org-clock.el (org-get-clocktable): |
| 522 | (org-in-clocktable-p): | 524 | (org-in-clocktable-p): |
| 523 | (org-clocktable-shift): | 525 | (org-clocktable-shift): |
| 524 | (org-clocktable-steps): Fix regexp to allow for indented clock tables | 526 | (org-clocktable-steps): Fix regexp to allow for indented clock tables. |
| 525 | 527 | ||
| 526 | 2010-12-11 Puneeth Chaganti <punchagan@gmail.com> | 528 | 2010-12-11 Puneeth Chaganti <punchagan@gmail.com> |
| 527 | 529 | ||
| @@ -536,7 +538,7 @@ | |||
| 536 | (org-export-latex-href-format): Rename the existing variable | 538 | (org-export-latex-href-format): Rename the existing variable |
| 537 | `org-export-latex-hyperref-format' as `org-export-latex-href-format' | 539 | `org-export-latex-hyperref-format' as `org-export-latex-href-format' |
| 538 | (org-export-latex-links): Use `org-export-latex-hyperref-format' and | 540 | (org-export-latex-links): Use `org-export-latex-hyperref-format' and |
| 539 | `org-export-latex-href-format' | 541 | `org-export-latex-href-format'. |
| 540 | 542 | ||
| 541 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> | 543 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> |
| 542 | 544 | ||
| @@ -546,7 +548,7 @@ | |||
| 546 | 2010-12-11 Nicolas Goaziou <n.goaziou@gmail.com> | 548 | 2010-12-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 547 | 549 | ||
| 548 | * org-exp.el (org-export-preprocess-string): delaying code block | 550 | * org-exp.el (org-export-preprocess-string): delaying code block |
| 549 | processing a bit to allow correct list parsing in the export string | 551 | processing a bit to allow correct list parsing in the export string. |
| 550 | 552 | ||
| 551 | 2010-12-11 Christopher Allan Webber <cwebber@dustycloud.org> | 553 | 2010-12-11 Christopher Allan Webber <cwebber@dustycloud.org> |
| 552 | 554 | ||
| @@ -586,7 +588,7 @@ | |||
| 586 | 588 | ||
| 587 | * org-exp.el (org-export-format-source-code-or-example): | 589 | * org-exp.el (org-export-format-source-code-or-example): |
| 588 | Remove hard-wired configuration of minted export | 590 | Remove hard-wired configuration of minted export |
| 589 | (org-export-latex-minted-with-line-numbers): Remove variable | 591 | (org-export-latex-minted-with-line-numbers): Remove variable. |
| 590 | 592 | ||
| 591 | 2010-12-11 Bastien Guerry <bzg@altern.org> | 593 | 2010-12-11 Bastien Guerry <bzg@altern.org> |
| 592 | 594 | ||
| @@ -603,7 +605,7 @@ | |||
| 603 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> | 605 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> |
| 604 | 606 | ||
| 605 | * ob-lob.el (org-babel-lob-get-info): including pass-through | 607 | * ob-lob.el (org-babel-lob-get-info): including pass-through |
| 606 | header arguments in results variable header argument string | 608 | header arguments in results variable header argument string. |
| 607 | 609 | ||
| 608 | 2010-12-11 David Maus <dmaus@ictsoc.de> | 610 | 2010-12-11 David Maus <dmaus@ictsoc.de> |
| 609 | 611 | ||
| @@ -651,11 +653,11 @@ | |||
| 651 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> | 653 | 2010-12-11 Eric Schulte <schulte.eric@gmail.com> |
| 652 | 654 | ||
| 653 | * ob-calc.el (org-babel-execute:calc): support for variables -- | 655 | * ob-calc.el (org-babel-execute:calc): support for variables -- |
| 654 | converts :var variables in calc variables | 656 | converts :var variables in calc variables. |
| 655 | 657 | ||
| 656 | 2010-12-11 Carsten Dominik <carsten.dominik@gmail.com> | 658 | 2010-12-11 Carsten Dominik <carsten.dominik@gmail.com> |
| 657 | 659 | ||
| 658 | * org.el (org-sparse-tree): Mention [r] in dispatch menu | 660 | * org.el (org-sparse-tree): Mention [r] in dispatch menu. |
| 659 | 661 | ||
| 660 | 2010-12-11 Carsten Dominik <carsten.dominik@gmail.com> | 662 | 2010-12-11 Carsten Dominik <carsten.dominik@gmail.com> |
| 661 | 663 | ||
| @@ -754,10 +756,10 @@ | |||
| 754 | 756 | ||
| 755 | * org-exp.el (org-export-format-source-code-or-example): | 757 | * org-exp.el (org-export-format-source-code-or-example): |
| 756 | Use minted for latex source code export if `org-export-latex-listings' | 758 | Use minted for latex source code export if `org-export-latex-listings' |
| 757 | has the value 'minted | 759 | has the value 'minted. |
| 758 | 760 | ||
| 759 | * org-latex.el (org-export-latex-listings): Document special value | 761 | * org-latex.el (org-export-latex-listings): Document special value |
| 760 | 'minted | 762 | 'minted. |
| 761 | 763 | ||
| 762 | * org-latex.el (org-export-latex-minted): Delete variable. | 764 | * org-latex.el (org-export-latex-minted): Delete variable. |
| 763 | 765 | ||
| @@ -797,10 +799,10 @@ | |||
| 797 | 2010-11-11 Łukasz Stelmach <lukasz.stelmach@iem.pw.edu.pl> | 799 | 2010-11-11 Łukasz Stelmach <lukasz.stelmach@iem.pw.edu.pl> |
| 798 | 800 | ||
| 799 | * org-agenda.el (org-agenda-get-sexps): Handle lists as return | 801 | * org-agenda.el (org-agenda-get-sexps): Handle lists as return |
| 800 | values from diary entries | 802 | values from diary entries. |
| 801 | 803 | ||
| 802 | * org-bbdb.el (org-bbdb-anniversaries): Handle lists of | 804 | * org-bbdb.el (org-bbdb-anniversaries): Handle lists of |
| 803 | anniversaries | 805 | anniversaries. |
| 804 | 806 | ||
| 805 | * org.el (org-diary-sexp-entry): Handle lists as return values | 807 | * org.el (org-diary-sexp-entry): Handle lists as return values |
| 806 | from diary entries. | 808 | from diary entries. |
| @@ -1045,90 +1047,90 @@ | |||
| 1045 | 1047 | ||
| 1046 | * ob-C.el (org-babel-C-execute): Remove call to | 1048 | * ob-C.el (org-babel-C-execute): Remove call to |
| 1047 | org-babel-process-params which should no longer be called from | 1049 | org-babel-process-params which should no longer be called from |
| 1048 | within a language file | 1050 | within a language file. |
| 1049 | 1051 | ||
| 1050 | * ob-R.el (org-babel-execute:R): Remove call to | 1052 | * ob-R.el (org-babel-execute:R): Remove call to |
| 1051 | org-babel-process-params which should no longer be called from | 1053 | org-babel-process-params which should no longer be called from |
| 1052 | within a language file | 1054 | within a language file |
| 1053 | (org-babel-R-variable-assignments): Remove call to | 1055 | (org-babel-R-variable-assignments): Remove call to |
| 1054 | org-babel-process-params which should no longer be called from | 1056 | org-babel-process-params which should no longer be called from |
| 1055 | within a language file | 1057 | within a language file. |
| 1056 | 1058 | ||
| 1057 | * ob-asymptote.el (org-babel-execute:asymptote): Remove call to | 1059 | * ob-asymptote.el (org-babel-execute:asymptote): Remove call to |
| 1058 | org-babel-process-params which should no longer be called from | 1060 | org-babel-process-params which should no longer be called from |
| 1059 | within a language file | 1061 | within a language file. |
| 1060 | 1062 | ||
| 1061 | * ob-clojure.el (org-babel-execute:clojure): Remove call to | 1063 | * ob-clojure.el (org-babel-execute:clojure): Remove call to |
| 1062 | org-babel-process-params which should no longer be called from | 1064 | org-babel-process-params which should no longer be called from |
| 1063 | within a language file | 1065 | within a language file. |
| 1064 | 1066 | ||
| 1065 | * ob-dot.el (org-babel-execute:dot): Remove call to | 1067 | * ob-dot.el (org-babel-execute:dot): Remove call to |
| 1066 | org-babel-process-params which should no longer be called from | 1068 | org-babel-process-params which should no longer be called from |
| 1067 | within a language file | 1069 | within a language file. |
| 1068 | 1070 | ||
| 1069 | * ob-emacs-lisp.el (org-babel-expand-body:emacs-lisp): Remove | 1071 | * ob-emacs-lisp.el (org-babel-expand-body:emacs-lisp): Remove |
| 1070 | call to org-babel-process-params which should no longer be called | 1072 | call to org-babel-process-params which should no longer be called |
| 1071 | from within a language file | 1073 | from within a language file |
| 1072 | (org-babel-execute:emacs-lisp): Remove call to | 1074 | (org-babel-execute:emacs-lisp): Remove call to |
| 1073 | org-babel-process-params which should no longer be called from | 1075 | org-babel-process-params which should no longer be called from |
| 1074 | within a language file | 1076 | within a language file. |
| 1075 | 1077 | ||
| 1076 | * ob-haskell.el (org-babel-execute:haskell): Remove call to | 1078 | * ob-haskell.el (org-babel-execute:haskell): Remove call to |
| 1077 | org-babel-process-params which should no longer be called from | 1079 | org-babel-process-params which should no longer be called from |
| 1078 | within a language file | 1080 | within a language file. |
| 1079 | 1081 | ||
| 1080 | * ob-js.el (org-babel-execute:js): Remove call to | 1082 | * ob-js.el (org-babel-execute:js): Remove call to |
| 1081 | org-babel-process-params which should no longer be called from | 1083 | org-babel-process-params which should no longer be called from |
| 1082 | within a language file | 1084 | within a language file. |
| 1083 | 1085 | ||
| 1084 | * ob-lisp.el (org-babel-execute:lisp): Remove call to | 1086 | * ob-lisp.el (org-babel-execute:lisp): Remove call to |
| 1085 | org-babel-process-params which should no longer be called from | 1087 | org-babel-process-params which should no longer be called from |
| 1086 | within a language file | 1088 | within a language file. |
| 1087 | 1089 | ||
| 1088 | * ob-ocaml.el (org-babel-execute:ocaml): Remove call to | 1090 | * ob-ocaml.el (org-babel-execute:ocaml): Remove call to |
| 1089 | org-babel-process-params which should no longer be called from | 1091 | org-babel-process-params which should no longer be called from |
| 1090 | within a language file | 1092 | within a language file. |
| 1091 | 1093 | ||
| 1092 | * ob-octave.el (org-babel-execute:octave): Remove call to | 1094 | * ob-octave.el (org-babel-execute:octave): Remove call to |
| 1093 | org-babel-process-params which should no longer be called from | 1095 | org-babel-process-params which should no longer be called from |
| 1094 | within a language file | 1096 | within a language file. |
| 1095 | 1097 | ||
| 1096 | * ob-perl.el (org-babel-execute:perl): Remove call to | 1098 | * ob-perl.el (org-babel-execute:perl): Remove call to |
| 1097 | org-babel-process-params which should no longer be called from | 1099 | org-babel-process-params which should no longer be called from |
| 1098 | within a language file | 1100 | within a language file. |
| 1099 | 1101 | ||
| 1100 | * ob-python.el (org-babel-execute:python): Remove call to | 1102 | * ob-python.el (org-babel-execute:python): Remove call to |
| 1101 | org-babel-process-params which should no longer be called from | 1103 | org-babel-process-params which should no longer be called from |
| 1102 | within a language file | 1104 | within a language file. |
| 1103 | 1105 | ||
| 1104 | * ob-ruby.el (org-babel-execute:ruby): Remove call to | 1106 | * ob-ruby.el (org-babel-execute:ruby): Remove call to |
| 1105 | org-babel-process-params which should no longer be called from | 1107 | org-babel-process-params which should no longer be called from |
| 1106 | within a language file | 1108 | within a language file. |
| 1107 | 1109 | ||
| 1108 | * ob-scheme.el (org-babel-execute:scheme): Remove call to | 1110 | * ob-scheme.el (org-babel-execute:scheme): Remove call to |
| 1109 | org-babel-process-params which should no longer be called from | 1111 | org-babel-process-params which should no longer be called from |
| 1110 | within a language file | 1112 | within a language file. |
| 1111 | 1113 | ||
| 1112 | * ob-screen.el (org-babel-execute:screen): Remove call to | 1114 | * ob-screen.el (org-babel-execute:screen): Remove call to |
| 1113 | org-babel-process-params which should no longer be called from | 1115 | org-babel-process-params which should no longer be called from |
| 1114 | within a language file | 1116 | within a language file |
| 1115 | (org-babel-prep-session:screen): Remove call to | 1117 | (org-babel-prep-session:screen): Remove call to |
| 1116 | org-babel-process-params which should no longer be called from | 1118 | org-babel-process-params which should no longer be called from |
| 1117 | within a language file | 1119 | within a language file. |
| 1118 | 1120 | ||
| 1119 | * ob-sh.el (org-babel-execute:sh): Remove call to | 1121 | * ob-sh.el (org-babel-execute:sh): Remove call to |
| 1120 | org-babel-process-params which should no longer be called from | 1122 | org-babel-process-params which should no longer be called from |
| 1121 | within a language file | 1123 | within a language file. |
| 1122 | 1124 | ||
| 1123 | * ob-sql.el (org-babel-execute:sql): Remove call to | 1125 | * ob-sql.el (org-babel-execute:sql): Remove call to |
| 1124 | org-babel-process-params which should no longer be called from | 1126 | org-babel-process-params which should no longer be called from |
| 1125 | within a language file | 1127 | within a language file. |
| 1126 | 1128 | ||
| 1127 | * ob-haskell.el (org-babel-execute:haskell): Remove reference to | 1129 | * ob-haskell.el (org-babel-execute:haskell): Remove reference to |
| 1128 | processed params | 1130 | processed params. |
| 1129 | 1131 | ||
| 1130 | * ob-clojure.el (org-babel-execute:clojure): Remove reference to | 1132 | * ob-clojure.el (org-babel-execute:clojure): Remove reference to |
| 1131 | processed params | 1133 | processed params. |
| 1132 | 1134 | ||
| 1133 | * ob-R.el (org-babel-execute:R): Remove reference to processed | 1135 | * ob-R.el (org-babel-execute:R): Remove reference to processed |
| 1134 | params. | 1136 | params. |
| @@ -1319,162 +1321,45 @@ | |||
| 1319 | 1321 | ||
| 1320 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 1322 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 1321 | 1323 | ||
| 1322 | * ob-C.el (org-babel-expand-body:c++): Remove obsoleted optional | 1324 | * ob-C.el (org-babel-expand-body:c++, org-babel-C-expand): |
| 1323 | third argument | 1325 | * ob-R.el (org-babel-expand-body:R, org-babel-execute:R) |
| 1324 | (org-babel-expand-body:c++): Remove obsoleted optional third | 1326 | (org-babel-R-variable-assignments): |
| 1325 | argument | 1327 | * ob-asymptote.el (org-babel-expand-body:asymptote) |
| 1326 | (org-babel-C-expand): Remove obsoleted optional third argument | 1328 | (org-babel-execute:asymptote): |
| 1327 | 1329 | * ob-clojure.el (org-babel-expand-body:clojure) | |
| 1328 | * ob-R.el: | 1330 | (org-babel-execute:clojure): |
| 1329 | (org-babel-expand-body:R): Remove obsoleted optional third | 1331 | * ob-css.el (org-babel-expand-body:css): |
| 1330 | argument | 1332 | * ob-ditaa.el (org-babel-expand-body:ditaa): |
| 1331 | (org-babel-execute:R): Remove obsoleted optional third argument | 1333 | * ob-dot.el (org-babel-expand-body:dot, org-babel-execute:dot): |
| 1332 | (org-babel-R-variable-assignments): Remove obsoleted optional | 1334 | * ob-emacs-lisp.el (org-babel-expand-body:emacs-lisp) |
| 1333 | third argument | 1335 | (org-babel-execute:emacs-lisp): |
| 1334 | 1336 | * ob-gnuplot.el (org-babel-expand-body:gnuplot) | |
| 1335 | * ob-asymptote.el: | 1337 | * ob-haskell.el (org-babel-expand-body:haskell) |
| 1336 | (org-babel-expand-body:asymptote): Remove obsoleted optional | 1338 | (org-babel-execute:haskell, org-babel-load-session:haskell) |
| 1337 | third argument | 1339 | (org-babel-prep-session:haskell): |
| 1338 | (org-babel-execute:asymptote): Remove obsoleted optional third | 1340 | * ob-js.el (org-babel-expand-body:js, org-babel-execute:js): |
| 1339 | argument | 1341 | * ob-latex.el (org-babel-expand-body:latex): |
| 1340 | 1342 | * ob-lisp.el (org-babel-expand-body:lisp, org-babel-execute:lisp): | |
| 1341 | * ob-clojure.el: | 1343 | * ob-mscgen.el (org-babel-expand-body:mscgen): |
| 1342 | (org-babel-expand-body:clojure): Remove obsoleted optional third | 1344 | * ob-ocaml.el (org-babel-expand-body:ocaml, org-babel-execute:ocaml): |
| 1343 | argument | 1345 | * ob-octave.el (org-babel-expand-body:matlab) |
| 1344 | (org-babel-execute:clojure): Remove obsoleted optional third | 1346 | (org-babel-expand-body:octave, org-babel-execute:octave) |
| 1345 | argument | 1347 | (org-babel-octave-variable-assignments): |
| 1346 | 1348 | * ob-org.el (org-babel-expand-body:org): | |
| 1347 | * ob-css.el: | 1349 | * ob-perl.el (org-babel-expand-body:perl, org-babel-execute:perl): |
| 1348 | (org-babel-expand-body:css): Remove obsoleted optional third | 1350 | * ob-plantuml.el (org-babel-expand-body:plantuml): |
| 1349 | argument | 1351 | * ob-python.el (org-babel-expand-body:python, org-babel-execute:python) |
| 1350 | 1352 | (org-babel-python-variable-assignments): | |
| 1351 | * ob-ditaa.el: | 1353 | * ob-ruby.el (org-babel-expand-body:ruby, org-babel-execute:ruby): |
| 1352 | (org-babel-expand-body:ditaa): Remove obsoleted optional third | 1354 | * ob-sass.el (org-babel-expand-body:sass): |
| 1353 | argument | 1355 | * ob-scheme.el (org-babel-expand-body:scheme, org-babel-execute:scheme): |
| 1354 | 1356 | * ob-screen.el (org-babel-expand-body:screen): | |
| 1355 | * ob-dot.el: | 1357 | * ob-sh.el (org-babel-expand-body:sh, org-babel-execute:sh) |
| 1356 | (org-babel-expand-body:dot): Remove obsoleted optional third | 1358 | (org-babel-sh-variable-assignments): |
| 1357 | argument | 1359 | * ob-sql.el (org-babel-expand-body:sql): |
| 1358 | (org-babel-execute:dot): Remove obsoleted optional third | 1360 | * ob-sqlite.el (org-babel-expand-body:sqlite, org-babel-execute:sqlite): |
| 1359 | argument | 1361 | * ob.el (org-babel-expand-body:generic): |
| 1360 | 1362 | Remove obsoleted optional third argument. | |
| 1361 | * ob-emacs-lisp.el: | ||
| 1362 | (org-babel-expand-body:emacs-lisp): Remove obsoleted optional | ||
| 1363 | third argument | ||
| 1364 | (org-babel-execute:emacs-lisp): Remove obsoleted optional third | ||
| 1365 | argument | ||
| 1366 | |||
| 1367 | * ob-gnuplot.el: | ||
| 1368 | (org-babel-expand-body:gnuplot): Remove obsoleted optional third | ||
| 1369 | argument | ||
| 1370 | |||
| 1371 | * ob-haskell.el: | ||
| 1372 | (org-babel-expand-body:haskell): Remove obsoleted optional third | ||
| 1373 | argument | ||
| 1374 | (org-babel-execute:haskell): Remove obsoleted optional third | ||
| 1375 | argument | ||
| 1376 | (org-babel-load-session:haskell): Remove obsoleted optional | ||
| 1377 | third | ||
| 1378 | (org-babel-prep-session:haskell): Remove obsoleted optional | ||
| 1379 | third | ||
| 1380 | |||
| 1381 | * ob-js.el: | ||
| 1382 | (org-babel-expand-body:js): Remove obsoleted optional third | ||
| 1383 | argument | ||
| 1384 | (org-babel-execute:js): Remove obsoleted optional third argument | ||
| 1385 | |||
| 1386 | * ob-latex.el: | ||
| 1387 | (org-babel-expand-body:latex): Remove obsoleted optional third | ||
| 1388 | argument | ||
| 1389 | |||
| 1390 | * ob-lisp.el: | ||
| 1391 | (org-babel-expand-body:lisp): Remove obsoleted optional third | ||
| 1392 | argument | ||
| 1393 | (org-babel-execute:lisp): Remove obsoleted optional third | ||
| 1394 | argument | ||
| 1395 | |||
| 1396 | * ob-mscgen.el: | ||
| 1397 | (org-babel-expand-body:mscgen): Remove obsoleted optional third | ||
| 1398 | argument | ||
| 1399 | |||
| 1400 | * ob-ocaml.el: | ||
| 1401 | (org-babel-expand-body:ocaml): Remove obsoleted optional third | ||
| 1402 | argument | ||
| 1403 | (org-babel-execute:ocaml): Remove obsoleted optional third | ||
| 1404 | argument | ||
| 1405 | |||
| 1406 | * ob-octave.el: | ||
| 1407 | (org-babel-expand-body:matlab): Remove obsoleted optional third | ||
| 1408 | argument | ||
| 1409 | (org-babel-expand-body:octave): Remove obsoleted optional third | ||
| 1410 | argument | ||
| 1411 | (org-babel-execute:octave): Remove obsoleted optional third | ||
| 1412 | argument | ||
| 1413 | (org-babel-octave-variable-assignments): Remove obsoleted | ||
| 1414 | optional third | ||
| 1415 | |||
| 1416 | * ob-org.el: | ||
| 1417 | (org-babel-expand-body:org): Remove obsoleted optional third | ||
| 1418 | argument | ||
| 1419 | |||
| 1420 | * ob-perl.el: | ||
| 1421 | (org-babel-expand-body:perl): Remove obsoleted optional third | ||
| 1422 | argument | ||
| 1423 | (org-babel-execute:perl): Remove obsoleted optional third | ||
| 1424 | argument | ||
| 1425 | |||
| 1426 | * ob-plantuml.el: | ||
| 1427 | (org-babel-expand-body:plantuml): Remove obsoleted optional | ||
| 1428 | third argument | ||
| 1429 | |||
| 1430 | * ob-python.el: | ||
| 1431 | (org-babel-expand-body:python): Remove obsoleted optional third | ||
| 1432 | argument | ||
| 1433 | (org-babel-execute:python): Remove obsoleted optional third | ||
| 1434 | argument | ||
| 1435 | (org-babel-python-variable-assignments): Remove obsoleted | ||
| 1436 | optional third | ||
| 1437 | |||
| 1438 | * ob-ruby.el: | ||
| 1439 | (org-babel-expand-body:ruby): Remove obsoleted optional third | ||
| 1440 | argument | ||
| 1441 | (org-babel-execute:ruby): Remove obsoleted optional third | ||
| 1442 | argument | ||
| 1443 | |||
| 1444 | * ob-sass.el: | ||
| 1445 | (org-babel-expand-body:sass): Remove obsoleted optional third | ||
| 1446 | argument | ||
| 1447 | |||
| 1448 | * ob-scheme.el: | ||
| 1449 | (org-babel-expand-body:scheme): Remove obsoleted optional third | ||
| 1450 | argument | ||
| 1451 | (org-babel-execute:scheme): Remove obsoleted optional third | ||
| 1452 | argument | ||
| 1453 | |||
| 1454 | * ob-screen.el: | ||
| 1455 | (org-babel-expand-body:screen): Remove obsoleted optional third | ||
| 1456 | argument | ||
| 1457 | |||
| 1458 | * ob-sh.el: | ||
| 1459 | (org-babel-expand-body:sh): Remove obsoleted optional third | ||
| 1460 | argument | ||
| 1461 | (org-babel-execute:sh): Remove obsoleted optional third argument | ||
| 1462 | (org-babel-sh-variable-assignments): Remove obsoleted optional | ||
| 1463 | third | ||
| 1464 | |||
| 1465 | * ob-sql.el: | ||
| 1466 | (org-babel-expand-body:sql): Remove obsoleted optional third | ||
| 1467 | argument | ||
| 1468 | |||
| 1469 | * ob-sqlite.el: | ||
| 1470 | (org-babel-expand-body:sqlite): Remove obsoleted optional third | ||
| 1471 | argument | ||
| 1472 | (org-babel-execute:sqlite): Remove obsoleted optional third | ||
| 1473 | argument | ||
| 1474 | |||
| 1475 | * ob.el: | ||
| 1476 | (org-babel-expand-body:generic): Remove obsoleted optional third | ||
| 1477 | argument. | ||
| 1478 | 1363 | ||
| 1479 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 1364 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 1480 | 1365 | ||
| @@ -1504,7 +1389,7 @@ | |||
| 1504 | 2010-11-11 Dan Davison <davison@stats.ox.ac.uk> | 1389 | 2010-11-11 Dan Davison <davison@stats.ox.ac.uk> |
| 1505 | 1390 | ||
| 1506 | * ob-sh.el (org-babel-sh-variable-assignments): Provide missing | 1391 | * ob-sh.el (org-babel-sh-variable-assignments): Provide missing |
| 1507 | docstring | 1392 | docstring. |
| 1508 | 1393 | ||
| 1509 | * ob-python.el (org-babel-python-variable-assignments): | 1394 | * ob-python.el (org-babel-python-variable-assignments): |
| 1510 | Provide missing docstring. | 1395 | Provide missing docstring. |
| @@ -1600,7 +1485,7 @@ | |||
| 1600 | 1485 | ||
| 1601 | 2010-11-11 Noorul Islam <noorul@noorul.com> | 1486 | 2010-11-11 Noorul Islam <noorul@noorul.com> |
| 1602 | 1487 | ||
| 1603 | * org-latex.el (org-export-latex-links) : Replaced hard coded | 1488 | * org-latex.el (org-export-latex-links): Replaced hard coded |
| 1604 | hyperref format with custom variable | 1489 | hyperref format with custom variable |
| 1605 | `org-export-latex-hyperref-format'. | 1490 | `org-export-latex-hyperref-format'. |
| 1606 | 1491 | ||
| @@ -1654,7 +1539,7 @@ | |||
| 1654 | 1539 | ||
| 1655 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 1540 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 1656 | 1541 | ||
| 1657 | * ob.el (org-babel-params-from-properties): Max line with at <=80 | 1542 | * ob.el (org-babel-params-from-properties): Max line with at <=80. |
| 1658 | 1543 | ||
| 1659 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 1544 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 1660 | 1545 | ||
| @@ -2034,11 +1919,11 @@ | |||
| 2034 | 1919 | ||
| 2035 | 2010-11-11 Jambunathan K <kjambunathan@gmail.com> (tiny change) | 1920 | 2010-11-11 Jambunathan K <kjambunathan@gmail.com> (tiny change) |
| 2036 | 1921 | ||
| 2037 | * org.el (org-speed-command-hook): New. Hook for installing | 1922 | * org.el (org-speed-command-hook): New. Hook for installing |
| 2038 | additional speed commands. Use this for enabling speed commands on | 1923 | additional speed commands. Use this for enabling speed commands on |
| 2039 | src blocks. | 1924 | src blocks. |
| 2040 | (org-speed-command-default-hook): The default hook for | 1925 | (org-speed-command-default-hook): The default hook for |
| 2041 | org-speed-command-hook. Factored out from org-self-insert-command | 1926 | org-speed-command-hook. Factored out from org-self-insert-command |
| 2042 | and mimics existing behaviour. | 1927 | and mimics existing behaviour. |
| 2043 | (org-self-insert-command): Modified to use org-speed-command-hook. | 1928 | (org-self-insert-command): Modified to use org-speed-command-hook. |
| 2044 | 1929 | ||
| @@ -2102,7 +1987,7 @@ | |||
| 2102 | 2010-11-11 Bastien Guerry <bzg@altern.org> | 1987 | 2010-11-11 Bastien Guerry <bzg@altern.org> |
| 2103 | 1988 | ||
| 2104 | * org-capture.el (org-capture-templates): Update docstring to | 1989 | * org-capture.el (org-capture-templates): Update docstring to |
| 2105 | advertize %:org-date. | 1990 | advertise %:org-date. |
| 2106 | 1991 | ||
| 2107 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 1992 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 2108 | 1993 | ||
| @@ -2179,7 +2064,7 @@ | |||
| 2179 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 2064 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 2180 | 2065 | ||
| 2181 | * ob.el (org-babel-demarcate-block): Interactive demarcation of | 2066 | * ob.el (org-babel-demarcate-block): Interactive demarcation of |
| 2182 | code blocks | 2067 | code blocks. |
| 2183 | 2068 | ||
| 2184 | * ob-keys.el (org-babel-key-bindings): Key bindings for block | 2069 | * ob-keys.el (org-babel-key-bindings): Key bindings for block |
| 2185 | demarcation. | 2070 | demarcation. |
| @@ -2234,7 +2119,7 @@ | |||
| 2234 | [[elisp:(org-agenda-list)]], org-prepare-agenda erases the buffer | 2119 | [[elisp:(org-agenda-list)]], org-prepare-agenda erases the buffer |
| 2235 | of the file containing the link, since that buffer is current | 2120 | of the file containing the link, since that buffer is current |
| 2236 | during org-prepare agenda (due to a with-current-buffer in | 2121 | during org-prepare agenda (due to a with-current-buffer in |
| 2237 | org-agenda-open-link). An additional test now ensures that the | 2122 | org-agenda-open-link). An additional test now ensures that the |
| 2238 | agenda buffer is in fact current when the buffer is erased and | 2123 | agenda buffer is in fact current when the buffer is erased and |
| 2239 | local variables for the agenda are set. | 2124 | local variables for the agenda are set. |
| 2240 | 2125 | ||
| @@ -2292,7 +2177,7 @@ | |||
| 2292 | 2177 | ||
| 2293 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 2178 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 2294 | 2179 | ||
| 2295 | * ob-C.el (org): No longer requires org | 2180 | * ob-C.el (org): No longer requires org. |
| 2296 | 2181 | ||
| 2297 | * ob-ledger.el (org): No longer requires org. | 2182 | * ob-ledger.el (org): No longer requires org. |
| 2298 | 2183 | ||
| @@ -2356,7 +2241,7 @@ | |||
| 2356 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 2241 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 2357 | 2242 | ||
| 2358 | * ob-keys.el (org-babel-key-bindings): Adding key-binding for | 2243 | * ob-keys.el (org-babel-key-bindings): Adding key-binding for |
| 2359 | `org-babel-goto-src-block-head' | 2244 | `org-babel-goto-src-block-head'. |
| 2360 | 2245 | ||
| 2361 | * ob.el (org-babel-goto-src-block-head): Jump to the head of the | 2246 | * ob.el (org-babel-goto-src-block-head): Jump to the head of the |
| 2362 | current code block. | 2247 | current code block. |
| @@ -2364,7 +2249,7 @@ | |||
| 2364 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 2249 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 2365 | 2250 | ||
| 2366 | * ob.el (org-babel-next-src-block): Now raising more informative | 2251 | * ob.el (org-babel-next-src-block): Now raising more informative |
| 2367 | error when no further code blocks can be found | 2252 | error when no further code blocks can be found. |
| 2368 | (org-babel-previous-src-block): Now raising more informative error | 2253 | (org-babel-previous-src-block): Now raising more informative error |
| 2369 | when no previous code blocks can be found. | 2254 | when no previous code blocks can be found. |
| 2370 | 2255 | ||
| @@ -2376,7 +2261,7 @@ | |||
| 2376 | 2261 | ||
| 2377 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 2262 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 2378 | 2263 | ||
| 2379 | * ob-plantuml.el (org-babel-execute:plantuml): | 2264 | * ob-plantuml.el (org-babel-execute:plantuml): ???? |
| 2380 | 2265 | ||
| 2381 | 2010-11-11 Dan Davison <davison@stats.ox.ac.uk> | 2266 | 2010-11-11 Dan Davison <davison@stats.ox.ac.uk> |
| 2382 | 2267 | ||
| @@ -2475,7 +2360,7 @@ | |||
| 2475 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2360 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2476 | 2361 | ||
| 2477 | * org-list.el (org-toggle-checkbox): Ignore items in drawers when | 2362 | * org-list.el (org-toggle-checkbox): Ignore items in drawers when |
| 2478 | used from an heading. Send an error when no item is in region. | 2363 | used from an heading. Send an error when no item is in region. |
| 2479 | 2364 | ||
| 2480 | 2010-11-11 Dan Davison <davison@stats.ox.ac.uk> | 2365 | 2010-11-11 Dan Davison <davison@stats.ox.ac.uk> |
| 2481 | 2366 | ||
| @@ -2528,7 +2413,7 @@ | |||
| 2528 | 2010-11-11 Dan Davison <davison@stats.ox.ac.uk> | 2413 | 2010-11-11 Dan Davison <davison@stats.ox.ac.uk> |
| 2529 | 2414 | ||
| 2530 | * org.el (org-fontify-meta-lines-and-blocks): Alter main regexp to | 2415 | * org.el (org-fontify-meta-lines-and-blocks): Alter main regexp to |
| 2531 | match code blocks with switches and header args. Call | 2416 | match code blocks with switches and header args. Call |
| 2532 | `org-src-font-lock-fontify-block' for automatic fontification of | 2417 | `org-src-font-lock-fontify-block' for automatic fontification of |
| 2533 | code in code blocks, controlled by variable | 2418 | code in code blocks, controlled by variable |
| 2534 | `org-src-fontify-natively'. | 2419 | `org-src-fontify-natively'. |
| @@ -2541,14 +2426,14 @@ | |||
| 2541 | 2426 | ||
| 2542 | 2010-11-11 Noorul Islam <noorul@noorul.com> (tiny change) | 2427 | 2010-11-11 Noorul Islam <noorul@noorul.com> (tiny change) |
| 2543 | 2428 | ||
| 2544 | * org-html.el (org-html-make-link): (Expand-file-name ) removes | 2429 | * org-html.el (org-html-make-link): (expand-file-name) removes |
| 2545 | one "/" from "///path-to-file", so add one. Anything other than | 2430 | one "/" from "///path-to-file", so add one. Anything other than |
| 2546 | 'file' type should be exported along with the type. | 2431 | 'file' type should be exported along with the type. |
| 2547 | 2432 | ||
| 2548 | 2010-11-11 Noorul Islam <noorul@noorul.com> (tiny change) | 2433 | 2010-11-11 Noorul Islam <noorul@noorul.com> (tiny change) |
| 2549 | 2434 | ||
| 2550 | * org.el (org-insert-subheading) : Fix compiler warning | 2435 | * org.el (org-insert-subheading): Fix compiler warning |
| 2551 | (org-insert-todo-subheading) : Fix compiler warning. | 2436 | (org-insert-todo-subheading): Fix compiler warning. |
| 2552 | 2437 | ||
| 2553 | 2010-11-11 Carsten Dominik <carsten.dominik@gmail.com> | 2438 | 2010-11-11 Carsten Dominik <carsten.dominik@gmail.com> |
| 2554 | 2439 | ||
| @@ -2589,7 +2474,7 @@ | |||
| 2589 | 2474 | ||
| 2590 | * org.el (org-indent-line-function): Indentation of source block | 2475 | * org.el (org-indent-line-function): Indentation of source block |
| 2591 | is left to `org-edit-src-exit' and shouldn't be modified by | 2476 | is left to `org-edit-src-exit' and shouldn't be modified by |
| 2592 | `org-indent-line-function'. Indentation of others blocks should be | 2477 | `org-indent-line-function'. Indentation of others blocks should be |
| 2593 | the same as the #+begin line. | 2478 | the same as the #+begin line. |
| 2594 | 2479 | ||
| 2595 | 2010-11-11 Dan Davison <davison@stats.ox.ac.uk> | 2480 | 2010-11-11 Dan Davison <davison@stats.ox.ac.uk> |
| @@ -2621,7 +2506,7 @@ | |||
| 2621 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2506 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2622 | 2507 | ||
| 2623 | * org-list.el (org-list-ending-method): New customizable variable | 2508 | * org-list.el (org-list-ending-method): New customizable variable |
| 2624 | to tell Org Mode how lists end. See docstring. | 2509 | to tell Org Mode how lists end. See docstring. |
| 2625 | 2510 | ||
| 2626 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2511 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2627 | 2512 | ||
| @@ -2660,14 +2545,14 @@ | |||
| 2660 | 2545 | ||
| 2661 | * org-list.el (org-list-insert-item-generic): A single item | 2546 | * org-list.el (org-list-insert-item-generic): A single item |
| 2662 | already counting blank lines in his body should be separated with | 2547 | already counting blank lines in his body should be separated with |
| 2663 | the next one by a blank line. Moreover, if user already provided | 2548 | the next one by a blank line. Moreover, if user already provided |
| 2664 | blank lines, follow his wishes. | 2549 | blank lines, follow his wishes. |
| 2665 | 2550 | ||
| 2666 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2551 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2667 | 2552 | ||
| 2668 | * org-list.el (org-indent-item-tree): When moving top item of a | 2553 | * org-list.el (org-indent-item-tree): When moving top item of a |
| 2669 | *-list to column 0, only the first item had its bullet changed to | 2554 | *-list to column 0, only the first item had its bullet changed to |
| 2670 | -. It now changes all items of the top-level list, as expected. | 2555 | -. It now changes all items of the top-level list, as expected. |
| 2671 | 2556 | ||
| 2672 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2557 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2673 | 2558 | ||
| @@ -2698,12 +2583,12 @@ | |||
| 2698 | change. | 2583 | change. |
| 2699 | 2584 | ||
| 2700 | * org-list.el (org-indent-item-tree): Prevent whole list from | 2585 | * org-list.el (org-indent-item-tree): Prevent whole list from |
| 2701 | being moved when user is not moving subtree. Thus) | 2586 | being moved when user is not moving subtree. Thus |
| 2702 | (`org-cycle-item-indentation' will not allow to move the list. | 2587 | `org-cycle-item-indentation' will not allow to move the list. |
| 2703 | 2588 | ||
| 2704 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2589 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2705 | 2590 | ||
| 2706 | * org-list.el (org-indent-item-tree): Remove region code. It was | 2591 | * org-list.el (org-indent-item-tree): Remove region code. It was |
| 2707 | prone to errors and undocumented. | 2592 | prone to errors and undocumented. |
| 2708 | 2593 | ||
| 2709 | * org-list.el (org-item-indent-positions): Better heuristics to | 2594 | * org-list.el (org-item-indent-positions): Better heuristics to |
| @@ -2719,7 +2604,7 @@ | |||
| 2719 | * org-list.el (org-list-bullet-string): Do not modify match-data. | 2604 | * org-list.el (org-list-bullet-string): Do not modify match-data. |
| 2720 | 2605 | ||
| 2721 | * org.el (org-toggle-item): Now working again when changing list | 2606 | * org.el (org-toggle-item): Now working again when changing list |
| 2722 | items into plain text. Moreover take into consideration | 2607 | items into plain text. Moreover take into consideration |
| 2723 | `org-list-two-spaces-after-bullet-regexp'. | 2608 | `org-list-two-spaces-after-bullet-regexp'. |
| 2724 | 2609 | ||
| 2725 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2610 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| @@ -2734,11 +2619,10 @@ | |||
| 2734 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2619 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2735 | 2620 | ||
| 2736 | * org-docbook.el (org-export-as-docbook): Use override="num" in | 2621 | * org-docbook.el (org-export-as-docbook): Use override="num" in |
| 2737 | any listitem matching [@start:num] | 2622 | any listitem matching [@start:num]. |
| 2738 | 2623 | ||
| 2739 | * org-html.el (org-export-as-html): Use value="num" in any li | 2624 | * org-html.el (org-export-as-html): Use value="num" in any li |
| 2740 | matching | 2625 | matching [@start:num]. |
| 2741 | [@start:num] | ||
| 2742 | 2626 | ||
| 2743 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2627 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2744 | 2628 | ||
| @@ -2814,14 +2698,14 @@ | |||
| 2814 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2698 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2815 | 2699 | ||
| 2816 | * org-list.el (org-indent-item-tree): Try to keep relative | 2700 | * org-list.el (org-indent-item-tree): Try to keep relative |
| 2817 | position on line. It can't if point is in white spaces before | 2701 | position on line. It can't if point is in white spaces before |
| 2818 | bullet because mixed tabs and spaces make some columns | 2702 | bullet because mixed tabs and spaces make some columns |
| 2819 | unattainable. | 2703 | unattainable. |
| 2820 | 2704 | ||
| 2821 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2705 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2822 | 2706 | ||
| 2823 | * org-list.el (org-cycle-item-indentation): Cycle when the whole | 2707 | * org-list.el (org-cycle-item-indentation): Cycle when the whole |
| 2824 | item only contains bullet and maybe a checkbox. Previously, TAB | 2708 | item only contains bullet and maybe a checkbox. Previously, TAB |
| 2825 | would cycle when the first line of the item was blank. | 2709 | would cycle when the first line of the item was blank. |
| 2826 | 2710 | ||
| 2827 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2711 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| @@ -2854,7 +2738,7 @@ | |||
| 2854 | 2738 | ||
| 2855 | * org-list.el (org-indent-item-tree): If indent rule is activated, | 2739 | * org-list.el (org-indent-item-tree): If indent rule is activated, |
| 2856 | it should be impossible to outdent an item having children without | 2740 | it should be impossible to outdent an item having children without |
| 2857 | moving its subtree. Improved reordering of lists modified by | 2741 | moving its subtree. Improved reordering of lists modified by |
| 2858 | cycling indentation. | 2742 | cycling indentation. |
| 2859 | 2743 | ||
| 2860 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2744 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| @@ -2875,7 +2759,7 @@ | |||
| 2875 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2759 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2876 | 2760 | ||
| 2877 | * org-list.el (org-list-insert-item-generic): When local search | 2761 | * org-list.el (org-list-insert-item-generic): When local search |
| 2878 | doesn't help, search the list globally for blank lines. Moreover, | 2762 | doesn't help, search the list globally for blank lines. Moreover, |
| 2879 | don't bother with new lists, and add 1 blank line. | 2763 | don't bother with new lists, and add 1 blank line. |
| 2880 | 2764 | ||
| 2881 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2765 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| @@ -2899,7 +2783,7 @@ | |||
| 2899 | heading. | 2783 | heading. |
| 2900 | 2784 | ||
| 2901 | * org-list.el (org-list-make-subtree): Add protection when used | 2785 | * org-list.el (org-list-make-subtree): Add protection when used |
| 2902 | outside of list | 2786 | outside of list. |
| 2903 | 2787 | ||
| 2904 | * org-list.el (org-insert-item): Remove useless hack now | 2788 | * org-list.el (org-insert-item): Remove useless hack now |
| 2905 | `org-in-item-p' is fixed. | 2789 | `org-in-item-p' is fixed. |
| @@ -2910,7 +2794,7 @@ | |||
| 2910 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2794 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2911 | 2795 | ||
| 2912 | * org-list.el (org-cycle-list-bullet): Prevent description items | 2796 | * org-list.el (org-cycle-list-bullet): Prevent description items |
| 2913 | from being numbered. String argument is also recognized now, as | 2797 | from being numbered. String argument is also recognized now, as |
| 2914 | long as it is a valid bullet. | 2798 | long as it is a valid bullet. |
| 2915 | 2799 | ||
| 2916 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2800 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| @@ -2979,8 +2863,8 @@ | |||
| 2979 | 2863 | ||
| 2980 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2864 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 2981 | 2865 | ||
| 2982 | * org-timer.el (org-timer-item): Refactoring. Compute timer string | 2866 | * org-timer.el (org-timer-item): Refactoring. Compute timer string |
| 2983 | before inserting it in the buffer | 2867 | before inserting it in the buffer. |
| 2984 | 2868 | ||
| 2985 | * org-timer.el (org-timer): Add an optional argument to return | 2869 | * org-timer.el (org-timer): Add an optional argument to return |
| 2986 | timer string instead of inserting it. | 2870 | timer string instead of inserting it. |
| @@ -3012,8 +2896,8 @@ | |||
| 3012 | a list prior to add a new item. | 2896 | a list prior to add a new item. |
| 3013 | 2897 | ||
| 3014 | * org-timer.el (org-timer-item): When in a timer list, insert a | 2898 | * org-timer.el (org-timer-item): When in a timer list, insert a |
| 3015 | new timer item like `org-insert-item'. If in another list, send an | 2899 | new timer item like `org-insert-item'. If in another list, send an |
| 3016 | error. Otherwise, start a new timer list. | 2900 | error. Otherwise, start a new timer list. |
| 3017 | 2901 | ||
| 3018 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2902 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 3019 | 2903 | ||
| @@ -3058,7 +2942,7 @@ | |||
| 3058 | 2942 | ||
| 3059 | * org-list.el (org-list-send-list): We cannot count on | 2943 | * org-list.el (org-list-send-list): We cannot count on |
| 3060 | `org-list-top-point' and `org-list-bottom-point' before buffer is | 2944 | `org-list-top-point' and `org-list-bottom-point' before buffer is |
| 3061 | narrowed. Find bounds of list otherwise. | 2945 | narrowed. Find bounds of list otherwise. |
| 3062 | 2946 | ||
| 3063 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2947 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 3064 | 2948 | ||
| @@ -3094,7 +2978,7 @@ | |||
| 3094 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2978 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 3095 | 2979 | ||
| 3096 | * org-docbook.el (org-export-as-docbook): Properly close any open | 2980 | * org-docbook.el (org-export-as-docbook): Properly close any open |
| 3097 | list when seeing ORG-LIST-END. Removed any reference to now | 2981 | list when seeing ORG-LIST-END. Removed any reference to now |
| 3098 | unneeded DIDCLOSE variable. | 2982 | unneeded DIDCLOSE variable. |
| 3099 | 2983 | ||
| 3100 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 2984 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| @@ -3132,7 +3016,7 @@ | |||
| 3132 | recognize lists. | 3016 | recognize lists. |
| 3133 | 3017 | ||
| 3134 | * org-latex.el (org-export-latex-lists): Better search for | 3018 | * org-latex.el (org-export-latex-lists): Better search for |
| 3135 | lists. It now only finds items not enclosed and not protected. | 3019 | lists. It now only finds items not enclosed and not protected. |
| 3136 | 3020 | ||
| 3137 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 3021 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 3138 | 3022 | ||
| @@ -3167,10 +3051,10 @@ | |||
| 3167 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 3051 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 3168 | 3052 | ||
| 3169 | * org-list.el (org-search-forward-unenclosed): Fix behavior when | 3053 | * org-list.el (org-search-forward-unenclosed): Fix behavior when |
| 3170 | last occurence was enclosed. | 3054 | last occurrence was enclosed. |
| 3171 | 3055 | ||
| 3172 | * org-list.el (org-search-backward-unenclosed): Fix behavior when | 3056 | * org-list.el (org-search-backward-unenclosed): Fix behavior when |
| 3173 | last occurence was enclosed. | 3057 | last occurrence was enclosed. |
| 3174 | 3058 | ||
| 3175 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 3059 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 3176 | 3060 | ||
| @@ -3206,8 +3090,8 @@ | |||
| 3206 | 3090 | ||
| 3207 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 3091 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 3208 | 3092 | ||
| 3209 | * org-html.el: preprocess buffer string and add ORG-LIST-END where | 3093 | * org-html.el: Preprocess buffer string and add ORG-LIST-END where |
| 3210 | needed. Lists should not end before seeing this. | 3094 | needed. Lists should not end before seeing this. |
| 3211 | 3095 | ||
| 3212 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 3096 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 3213 | 3097 | ||
| @@ -3280,7 +3164,7 @@ | |||
| 3280 | to evaluate code invisibly and block until output file exists. | 3164 | to evaluate code invisibly and block until output file exists. |
| 3281 | 3165 | ||
| 3282 | * ob-R.el (org-babel-R-evaluate-session): Use `ess-eval-buffer' to | 3166 | * ob-R.el (org-babel-R-evaluate-session): Use `ess-eval-buffer' to |
| 3283 | evaluate R code in session for :results value. Write result to | 3167 | evaluate R code in session for :results value. Write result to |
| 3284 | file invisibly using new function | 3168 | file invisibly using new function |
| 3285 | `org-babel-comint-eval-invisibly-and-wait-for-file'. | 3169 | `org-babel-comint-eval-invisibly-and-wait-for-file'. |
| 3286 | 3170 | ||
| @@ -3309,7 +3193,7 @@ | |||
| 3309 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 3193 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 3310 | 3194 | ||
| 3311 | * ob-scheme.el: very preliminary support for evaluating scheme | 3195 | * ob-scheme.el: very preliminary support for evaluating scheme |
| 3312 | code blocks | 3196 | code blocks. |
| 3313 | 3197 | ||
| 3314 | * org.el (org-babel-load-languages): Adding scheme. | 3198 | * org.el (org-babel-load-languages): Adding scheme. |
| 3315 | 3199 | ||
| @@ -3319,16 +3203,15 @@ | |||
| 3319 | 3203 | ||
| 3320 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 3204 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 3321 | 3205 | ||
| 3322 | * ob-R.el (ess-make-buffer-current): | 3206 | * ob-R.el (ess-make-buffer-current): Declared. |
| 3323 | Declared (ess-ask-for-ess-directory): | 3207 | (ess-ask-for-ess-directory): Declared. |
| 3324 | Declared (ess-local-process-name): | 3208 | (ess-local-process-name): Declared. |
| 3325 | Declared * ob-latex.el (org-babel-latex-tex-to-pdf): Capturing free | 3209 | * ob-latex.el (org-babel-latex-tex-to-pdf): Capturing free variable. |
| 3326 | variable | ||
| 3327 | 3210 | ||
| 3328 | * ob.el (org-edit-src-code): Fixing arguments | 3211 | * ob.el (org-edit-src-code): Fixing arguments. |
| 3329 | (org-edit-src-exit): | 3212 | (org-edit-src-exit): Declared. |
| 3330 | Declared (org-outline-overlay-data): | 3213 | (org-outline-overlay-data): Declared. |
| 3331 | Declared (org-set-outline-overlay-data): Declared. | 3214 | (org-set-outline-overlay-data): Declared. |
| 3332 | 3215 | ||
| 3333 | 2010-11-11 Glenn Morris <rgm@gnu.org> | 3216 | 2010-11-11 Glenn Morris <rgm@gnu.org> |
| 3334 | 3217 | ||
| @@ -3376,7 +3259,7 @@ | |||
| 3376 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 3259 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 3377 | 3260 | ||
| 3378 | * ob-exp.el (org-babel-exp-do-export): Remove hacky ":noeval", | 3261 | * ob-exp.el (org-babel-exp-do-export): Remove hacky ":noeval", |
| 3379 | which is now an alias to ":eval no" | 3262 | which is now an alias to ":eval no". |
| 3380 | 3263 | ||
| 3381 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> | 3264 | 2010-11-11 Eric Schulte <schulte.eric@gmail.com> |
| 3382 | 3265 | ||
| @@ -3559,7 +3442,7 @@ | |||
| 3559 | * ob.el (org-babel-do-in-edit-buffer): New macro to evaluate lisp | 3442 | * ob.el (org-babel-do-in-edit-buffer): New macro to evaluate lisp |
| 3560 | in the language major mode edit buffer. | 3443 | in the language major mode edit buffer. |
| 3561 | (org-babel-do-key-sequence-in-edit-buffer): New function to call | 3444 | (org-babel-do-key-sequence-in-edit-buffer): New function to call |
| 3562 | an arbitrary key sequence in the language major mode edit buffer | 3445 | an arbitrary key sequence in the language major mode edit buffer. |
| 3563 | 3446 | ||
| 3564 | * org-src.el (org-src-switch-to-buffer): Add new allowed value | 3447 | * org-src.el (org-src-switch-to-buffer): Add new allowed value |
| 3565 | 'switch-invisibly for `org-src-window-setup'. | 3448 | 'switch-invisibly for `org-src-window-setup'. |
| @@ -3585,7 +3468,7 @@ | |||
| 3585 | * org-src.el (org-edit-src-code): If at src block, store babel | 3468 | * org-src.el (org-edit-src-code): If at src block, store babel |
| 3586 | info as buffer local variable. | 3469 | info as buffer local variable. |
| 3587 | (org-src-associate-babel-session): New function to associate code | 3470 | (org-src-associate-babel-session): New function to associate code |
| 3588 | edit buffer with comint session. Does nothing unless a | 3471 | edit buffer with comint session. Does nothing unless a |
| 3589 | language-specific function named | 3472 | language-specific function named |
| 3590 | `org-babel-LANG-associate-session' exists. | 3473 | `org-babel-LANG-associate-session' exists. |
| 3591 | (org-src-babel-configure-edit-buffer): New function to be called | 3474 | (org-src-babel-configure-edit-buffer): New function to be called |
| @@ -3723,7 +3606,7 @@ | |||
| 3723 | 3606 | ||
| 3724 | 2010-11-11 Noorul Islam <noorul@noorul.com> | 3607 | 2010-11-11 Noorul Islam <noorul@noorul.com> |
| 3725 | 3608 | ||
| 3726 | * org.el: org-set-visibility-according-to-property () Use backward | 3609 | * org.el (org-set-visibility-according-to-property): Use backward |
| 3727 | search instead of forward, so that top hierarchy gets priority. | 3610 | search instead of forward, so that top hierarchy gets priority. |
| 3728 | 3611 | ||
| 3729 | 2010-11-11 Carsten Dominik <carsten.dominik@gmail.com> | 3612 | 2010-11-11 Carsten Dominik <carsten.dominik@gmail.com> |
| @@ -3809,7 +3692,7 @@ | |||
| 3809 | 2010-11-11 Dan Davison <davison@stats.ox.ac.uk> | 3692 | 2010-11-11 Dan Davison <davison@stats.ox.ac.uk> |
| 3810 | 3693 | ||
| 3811 | * ob-octave.el: Only (require 'matlab) when necessary. | 3694 | * ob-octave.el: Only (require 'matlab) when necessary. |
| 3812 | (org-babel-octave-initiate-session) (require) octave-inf or matlab | 3695 | (org-babel-octave-initiate-session): (require) octave-inf or matlab |
| 3813 | as appropriate. | 3696 | as appropriate. |
| 3814 | (org-babel-execute:matlab): Remove (require). | 3697 | (org-babel-execute:matlab): Remove (require). |
| 3815 | (org-babel-prep-session:matlab): Remove (require). | 3698 | (org-babel-prep-session:matlab): Remove (require). |
| @@ -3827,7 +3710,7 @@ | |||
| 3827 | 3710 | ||
| 3828 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> | 3711 | 2010-11-11 Nicolas Goaziou <n.goaziou@gmail.com> |
| 3829 | 3712 | ||
| 3830 | * org-latex.el (org-export-latex-tables): Add label if any | 3713 | * org-latex.el (org-export-latex-tables): Add label if any. |
| 3831 | 3714 | ||
| 3832 | * org-latex.el (org-export-latex-convert-table.el-table): | 3715 | * org-latex.el (org-export-latex-convert-table.el-table): |
| 3833 | Fix little mistake when inserting label. | 3716 | Fix little mistake when inserting label. |
| @@ -7328,7 +7211,7 @@ | |||
| 7328 | New customization variable for allowing the user to create an "auto | 7211 | New customization variable for allowing the user to create an "auto |
| 7329 | exclusion" filter for doing context-aware auto tag filtering. | 7212 | exclusion" filter for doing context-aware auto tag filtering. |
| 7330 | (org-agenda-filter-by-tag): Changes to support the use of | 7213 | (org-agenda-filter-by-tag): Changes to support the use of |
| 7331 | `org-agenda-auto-exclude-function'. See the new manual addition,. | 7214 | `org-agenda-auto-exclude-function'. See the new manual addition. |
| 7332 | 7215 | ||
| 7333 | 2009-11-13 John Wiegley <johnw@newartisans.com> | 7216 | 2009-11-13 John Wiegley <johnw@newartisans.com> |
| 7334 | 7217 | ||
| @@ -9398,7 +9281,7 @@ | |||
| 9398 | (org-export-latex-first-lines): New argument END, to force the end | 9281 | (org-export-latex-first-lines): New argument END, to force the end |
| 9399 | of the region. | 9282 | of the region. |
| 9400 | (org-export-region-as-latex): Use the property list. | 9283 | (org-export-region-as-latex): Use the property list. |
| 9401 | (org-export-as-latex): | 9284 | (org-export-as-latex): ???? |
| 9402 | 9285 | ||
| 9403 | * org-colview-xemacs.el (org-columns-remove-overlays) | 9286 | * org-colview-xemacs.el (org-columns-remove-overlays) |
| 9404 | (org-columns): Fix call to `local-variable-p'. | 9287 | (org-columns): Fix call to `local-variable-p'. |
| @@ -11772,7 +11655,7 @@ | |||
| 11772 | 11655 | ||
| 11773 | 2008-10-26 Carsten Dominik <dominik@science.uva.nl> | 11656 | 2008-10-26 Carsten Dominik <dominik@science.uva.nl> |
| 11774 | 11657 | ||
| 11775 | * org-agenda.el (org-agenda-filter-tags,org-agenda-filter-form): | 11658 | * org-agenda.el (org-agenda-filter-tags, org-agenda-filter-form): |
| 11776 | New variables. | 11659 | New variables. |
| 11777 | (org-prepare-agenda): Reset the filter tags. | 11660 | (org-prepare-agenda): Reset the filter tags. |
| 11778 | (org-agenda-filter-by-tag, org-agenda-filter-by-tag-show-all): | 11661 | (org-agenda-filter-by-tag, org-agenda-filter-by-tag-show-all): |
| @@ -12879,7 +12762,7 @@ | |||
| 12879 | 12762 | ||
| 12880 | * org.el (org-base-buffer): New function. | 12763 | * org.el (org-base-buffer): New function. |
| 12881 | 12764 | ||
| 12882 | * org-exp.el (org-icalendar-cleanup-string): Make sure '," | 12765 | * org-exp.el (org-icalendar-cleanup-string): Make sure "," |
| 12883 | and ";" are escaped. | 12766 | and ";" are escaped. |
| 12884 | (org-print-icalendar-entries): Also apply | 12767 | (org-print-icalendar-entries): Also apply |
| 12885 | `org-icalendar-cleanup-string' to the headline, not only to the | 12768 | `org-icalendar-cleanup-string' to the headline, not only to the |
diff --git a/lisp/org/org-id.el b/lisp/org/org-id.el index 2f64b8b0bb6..b979097dee3 100644 --- a/lisp/org/org-id.el +++ b/lisp/org/org-id.el | |||
| @@ -519,7 +519,8 @@ When CHECK is given, prepare detailed information about duplicate IDs." | |||
| 519 | (puthash id (abbreviate-file-name file) org-id-locations) | 519 | (puthash id (abbreviate-file-name file) org-id-locations) |
| 520 | (add-to-list 'org-id-files (abbreviate-file-name file)))) | 520 | (add-to-list 'org-id-files (abbreviate-file-name file)))) |
| 521 | 521 | ||
| 522 | (add-hook 'kill-emacs-hook 'org-id-locations-save) | 522 | (unless noninteractive |
| 523 | (add-hook 'kill-emacs-hook 'org-id-locations-save)) | ||
| 523 | 524 | ||
| 524 | (defun org-id-hash-to-alist (hash) | 525 | (defun org-id-hash-to-alist (hash) |
| 525 | "Turn an org-id hash into an alist, so that it can be written to a file." | 526 | "Turn an org-id hash into an alist, so that it can be written to a file." |
diff --git a/lisp/org/org.el b/lisp/org/org.el index 8f1ef9e5d60..076df5f0d07 100644 --- a/lisp/org/org.el +++ b/lisp/org/org.el | |||
| @@ -1078,7 +1078,7 @@ for the duration of the command." | |||
| 1078 | (plain-list-item . auto)) | 1078 | (plain-list-item . auto)) |
| 1079 | "Should `org-insert-heading' leave a blank line before new heading/item? | 1079 | "Should `org-insert-heading' leave a blank line before new heading/item? |
| 1080 | The value is an alist, with `heading' and `plain-list-item' as car, | 1080 | The value is an alist, with `heading' and `plain-list-item' as car, |
| 1081 | and a boolean flag as cdr. The cdr may lso be the symbol `auto', and then | 1081 | and a boolean flag as cdr. The cdr may lso be the symbol `auto', and then |
| 1082 | Org will look at the surrounding headings/items and try to make an | 1082 | Org will look at the surrounding headings/items and try to make an |
| 1083 | intelligent decision wether to insert a blank line or not. | 1083 | intelligent decision wether to insert a blank line or not. |
| 1084 | 1084 | ||
| @@ -1384,9 +1384,9 @@ nil Never use an ID to make a link, instead link using a text search for | |||
| 1384 | (defcustom org-context-in-file-links t | 1384 | (defcustom org-context-in-file-links t |
| 1385 | "Non-nil means file links from `org-store-link' contain context. | 1385 | "Non-nil means file links from `org-store-link' contain context. |
| 1386 | A search string will be added to the file name with :: as separator and | 1386 | A search string will be added to the file name with :: as separator and |
| 1387 | used to find the context when the link is activated by the command | 1387 | used to find the context when the link is activated by the command |
| 1388 | `org-open-at-point'. When this option is t, the entire active region | 1388 | `org-open-at-point'. When this option is t, the entire active region |
| 1389 | will be placed in the search string of the file link. If set to a | 1389 | will be placed in the search string of the file link. If set to a |
| 1390 | positive integer, only the first n lines of context will be stored. | 1390 | positive integer, only the first n lines of context will be stored. |
| 1391 | 1391 | ||
| 1392 | Using a prefix arg to the command \\[org-store-link] (`org-store-link') | 1392 | Using a prefix arg to the command \\[org-store-link] (`org-store-link') |
| @@ -1843,7 +1843,7 @@ This is list of cons cells. Each cell contains: | |||
| 1843 | - a cons cell (:level . N). Any headline of level N is considered a target. | 1843 | - a cons cell (:level . N). Any headline of level N is considered a target. |
| 1844 | Note that, when `org-odd-levels-only' is set, level corresponds to | 1844 | Note that, when `org-odd-levels-only' is set, level corresponds to |
| 1845 | order in hierarchy, not to the number of stars. | 1845 | order in hierarchy, not to the number of stars. |
| 1846 | - a cons cell (:maxlevel . N). Any headline with level <= N is a target. | 1846 | - a cons cell (:maxlevel . N). Any headline with level <= N is a target. |
| 1847 | Note that, when `org-odd-levels-only' is set, level corresponds to | 1847 | Note that, when `org-odd-levels-only' is set, level corresponds to |
| 1848 | order in hierarchy, not to the number of stars. | 1848 | order in hierarchy, not to the number of stars. |
| 1849 | 1849 | ||
| @@ -2418,7 +2418,7 @@ An auto-repeating task is immediately switched back to TODO when | |||
| 2418 | marked DONE. If you are not logging state changes (by adding \"@\" | 2418 | marked DONE. If you are not logging state changes (by adding \"@\" |
| 2419 | or \"!\" to the TODO keyword definition), or set `org-log-done' to | 2419 | or \"!\" to the TODO keyword definition), or set `org-log-done' to |
| 2420 | record a closing note, there will be no record of the task moving | 2420 | record a closing note, there will be no record of the task moving |
| 2421 | through DONE. This variable forces taking a note anyway. | 2421 | through DONE. This variable forces taking a note anyway. |
| 2422 | 2422 | ||
| 2423 | nil Don't force a record | 2423 | nil Don't force a record |
| 2424 | time Record a time stamp | 2424 | time Record a time stamp |
| @@ -2624,8 +2624,8 @@ See also `org-agenda-jump-prefer-future'." | |||
| 2624 | The default is to do the same as configured in `org-read-date-prefer-future'. | 2624 | The default is to do the same as configured in `org-read-date-prefer-future'. |
| 2625 | But you can alse set a deviating value here. | 2625 | But you can alse set a deviating value here. |
| 2626 | This may t or nil, or the symbol `org-read-date-prefer-future'." | 2626 | This may t or nil, or the symbol `org-read-date-prefer-future'." |
| 2627 | :group 'org-agenda | 2627 | :group 'org-agenda |
| 2628 | :group 'org-time | 2628 | :group 'org-time |
| 2629 | :type '(choice | 2629 | :type '(choice |
| 2630 | (const :tag "Use org-read-date-prefer-future" | 2630 | (const :tag "Use org-read-date-prefer-future" |
| 2631 | org-read-date-prefer-future) | 2631 | org-read-date-prefer-future) |
| @@ -5575,7 +5575,7 @@ needs to be inserted at a specific position in the font-lock sequence.") | |||
| 5575 | (org-set-local 'org-pretty-entities (not org-pretty-entities)) | 5575 | (org-set-local 'org-pretty-entities (not org-pretty-entities)) |
| 5576 | (org-restart-font-lock) | 5576 | (org-restart-font-lock) |
| 5577 | (if org-pretty-entities | 5577 | (if org-pretty-entities |
| 5578 | (message "Entities are displayed as UTF8 characers") | 5578 | (message "Entities are displayed as UTF8 characters") |
| 5579 | (save-restriction | 5579 | (save-restriction |
| 5580 | (widen) | 5580 | (widen) |
| 5581 | (org-decompose-region (point-min) (point-max)) | 5581 | (org-decompose-region (point-min) (point-max)) |
| @@ -8525,9 +8525,9 @@ according to FMT (default from `org-email-link-description-format')." | |||
| 8525 | (when (and string (integerp lines) (> lines 0)) | 8525 | (when (and string (integerp lines) (> lines 0)) |
| 8526 | (let ((slines (org-split-string s "\n"))) | 8526 | (let ((slines (org-split-string s "\n"))) |
| 8527 | (when (< lines (length slines)) | 8527 | (when (< lines (length slines)) |
| 8528 | (setq s (mapconcat | 8528 | (setq s (mapconcat |
| 8529 | 'identity | 8529 | 'identity |
| 8530 | (reverse (nthcdr (- (length slines) lines) | 8530 | (reverse (nthcdr (- (length slines) lines) |
| 8531 | (reverse slines))) "\n"))))) | 8531 | (reverse slines))) "\n"))))) |
| 8532 | (mapconcat 'identity (org-split-string s "[ \t]+") " "))) | 8532 | (mapconcat 'identity (org-split-string s "[ \t]+") " "))) |
| 8533 | 8533 | ||
| @@ -8672,8 +8672,8 @@ be displayed in the buffer instead of the link. | |||
| 8672 | If there is already a link at point, this command will allow you to edit link | 8672 | If there is already a link at point, this command will allow you to edit link |
| 8673 | and description parts. | 8673 | and description parts. |
| 8674 | 8674 | ||
| 8675 | With a \\[universal-argument] prefix, prompts for a file to link to. The file name can | 8675 | With a \\[universal-argument] prefix, prompts for a file to link to. The file name can |
| 8676 | be selected using completion. The path to the file will be relative to the | 8676 | be selected using completion. The path to the file will be relative to the |
| 8677 | current directory if the file is in the current directory or a subdirectory. | 8677 | current directory if the file is in the current directory or a subdirectory. |
| 8678 | Otherwise, the link will be the absolute path as completed in the minibuffer | 8678 | Otherwise, the link will be the absolute path as completed in the minibuffer |
| 8679 | \(i.e. normally ~/path/to/file). You can configure this behavior using the | 8679 | \(i.e. normally ~/path/to/file). You can configure this behavior using the |
| @@ -16498,8 +16498,8 @@ If not, return to the original position and throw an error." | |||
| 16498 | 16498 | ||
| 16499 | (defun org-speed-command-default-hook (keys) | 16499 | (defun org-speed-command-default-hook (keys) |
| 16500 | "Hook for activating single-letter speed commands. | 16500 | "Hook for activating single-letter speed commands. |
| 16501 | `org-speed-commands-default' specifies a minimal command set. Use | 16501 | `org-speed-commands-default' specifies a minimal command set. |
| 16502 | `org-speed-commands-user' for further customization." | 16502 | Use `org-speed-commands-user' for further customization." |
| 16503 | (when (or (and (bolp) (looking-at outline-regexp)) | 16503 | (when (or (and (bolp) (looking-at outline-regexp)) |
| 16504 | (and (functionp org-use-speed-commands) | 16504 | (and (functionp org-use-speed-commands) |
| 16505 | (funcall org-use-speed-commands))) | 16505 | (funcall org-use-speed-commands))) |
| @@ -16521,11 +16521,11 @@ Each hook takes a single argument, a user-pressed command key | |||
| 16521 | which is also a `self-insert-command' from the global map. | 16521 | which is also a `self-insert-command' from the global map. |
| 16522 | 16522 | ||
| 16523 | Within the hook, examine the cursor position and the command key | 16523 | Within the hook, examine the cursor position and the command key |
| 16524 | and return nil or a valid handler as appropriate. Handler could | 16524 | and return nil or a valid handler as appropriate. Handler could |
| 16525 | be one of an interactive command, a function, or a form. | 16525 | be one of an interactive command, a function, or a form. |
| 16526 | 16526 | ||
| 16527 | Set `org-use-speed-commands' to non-nil value to enable this | 16527 | Set `org-use-speed-commands' to non-nil value to enable this |
| 16528 | hook. The default setting is `org-speed-command-default-hook'." | 16528 | hook. The default setting is `org-speed-command-default-hook'." |
| 16529 | :group 'org-structure | 16529 | :group 'org-structure |
| 16530 | :type 'hook) | 16530 | :type 'hook) |
| 16531 | 16531 | ||
| @@ -18300,11 +18300,11 @@ really on, so that the block visually is on the match." | |||
| 18300 | (defun org-in-regexps-block-p (start-re end-re &optional bound) | 18300 | (defun org-in-regexps-block-p (start-re end-re &optional bound) |
| 18301 | "Return t if the current point is between matches of START-RE and END-RE. | 18301 | "Return t if the current point is between matches of START-RE and END-RE. |
| 18302 | This will also return t if point is on one of the two matches or | 18302 | This will also return t if point is on one of the two matches or |
| 18303 | in an unfinished block. END-RE can be a string or a form | 18303 | in an unfinished block. END-RE can be a string or a form |
| 18304 | returning a string. | 18304 | returning a string. |
| 18305 | 18305 | ||
| 18306 | An optional third argument bounds the search for START-RE. It | 18306 | An optional third argument bounds the search for START-RE. |
| 18307 | defaults to previous heading or `point-min'." | 18307 | It defaults to previous heading or `point-min'." |
| 18308 | (let ((pos (point)) | 18308 | (let ((pos (point)) |
| 18309 | (limit (or bound (save-excursion (outline-previous-heading))))) | 18309 | (limit (or bound (save-excursion (outline-previous-heading))))) |
| 18310 | (save-excursion | 18310 | (save-excursion |
| @@ -19040,7 +19040,7 @@ plainly yank the text as it is. | |||
| 19040 | "Perform some yank-like command. | 19040 | "Perform some yank-like command. |
| 19041 | 19041 | ||
| 19042 | This function implements the behavior described in the `org-yank' | 19042 | This function implements the behavior described in the `org-yank' |
| 19043 | documentation. However, it has been generalized to work for any | 19043 | documentation. However, it has been generalized to work for any |
| 19044 | interactive command with similar behavior." | 19044 | interactive command with similar behavior." |
| 19045 | 19045 | ||
| 19046 | ;; pretend to be command COMMAND | 19046 | ;; pretend to be command COMMAND |
| @@ -19247,7 +19247,7 @@ move point." | |||
| 19247 | 19247 | ||
| 19248 | (defun org-goto-first-child () | 19248 | (defun org-goto-first-child () |
| 19249 | "Goto the first child, even if it is invisible. | 19249 | "Goto the first child, even if it is invisible. |
| 19250 | Return t when a child was found. Otherwise don't move point and | 19250 | Return t when a child was found. Otherwise don't move point and |
| 19251 | return nil." | 19251 | return nil." |
| 19252 | (let (level (pos (point)) (re (concat "^" outline-regexp))) | 19252 | (let (level (pos (point)) (re (concat "^" outline-regexp))) |
| 19253 | (when (condition-case nil (org-back-to-heading t) (error nil)) | 19253 | (when (condition-case nil (org-back-to-heading t) (error nil)) |
diff --git a/lisp/outline.el b/lisp/outline.el index d43afd94a3c..cedc55b3336 100644 --- a/lisp/outline.el +++ b/lisp/outline.el | |||
| @@ -50,9 +50,9 @@ Note that Outline mode only checks this regexp at the start of a line, | |||
| 50 | so the regexp need not (and usually does not) start with `^'. | 50 | so the regexp need not (and usually does not) start with `^'. |
| 51 | The recommended way to set this is with a Local Variables: list | 51 | The recommended way to set this is with a Local Variables: list |
| 52 | in the file it applies to. See also `outline-heading-end-regexp'." | 52 | in the file it applies to. See also `outline-heading-end-regexp'." |
| 53 | :type '(choice regexp (const nil)) | 53 | :type 'regexp |
| 54 | :group 'outlines) | 54 | :group 'outlines) |
| 55 | ;;;###autoload(put 'outline-regexp 'safe-local-variable 'string-or-null-p) | 55 | ;;;###autoload(put 'outline-regexp 'safe-local-variable 'stringp) |
| 56 | 56 | ||
| 57 | (defcustom outline-heading-end-regexp "\n" | 57 | (defcustom outline-heading-end-regexp "\n" |
| 58 | "Regular expression to match the end of a heading line. | 58 | "Regular expression to match the end of a heading line. |
| @@ -62,6 +62,7 @@ The recommended way to set this is with a `Local Variables:' list | |||
| 62 | in the file it applies to." | 62 | in the file it applies to." |
| 63 | :type 'regexp | 63 | :type 'regexp |
| 64 | :group 'outlines) | 64 | :group 'outlines) |
| 65 | ;;;###autoload(put 'outline-heading-end-regexp 'safe-local-variable 'stringp) | ||
| 65 | 66 | ||
| 66 | (defvar outline-mode-prefix-map | 67 | (defvar outline-mode-prefix-map |
| 67 | (let ((map (make-sparse-keymap))) | 68 | (let ((map (make-sparse-keymap))) |
diff --git a/lisp/password-cache.el b/lisp/password-cache.el index a7f75a03add..941428d5291 100644 --- a/lisp/password-cache.el +++ b/lisp/password-cache.el | |||
| @@ -76,6 +76,7 @@ regulate cache behavior." | |||
| 76 | key | 76 | key |
| 77 | (symbol-value (intern-soft key password-data)))) | 77 | (symbol-value (intern-soft key password-data)))) |
| 78 | 78 | ||
| 79 | ;;;###autoload | ||
| 79 | (defun password-in-cache-p (key) | 80 | (defun password-in-cache-p (key) |
| 80 | "Check if KEY is in the cache." | 81 | "Check if KEY is in the cache." |
| 81 | (and password-cache | 82 | (and password-cache |
diff --git a/lisp/printing.el b/lisp/printing.el index 99ed8c04262..e66cca25933 100644 --- a/lisp/printing.el +++ b/lisp/printing.el | |||
| @@ -5707,8 +5707,8 @@ If menu binding was not done, calls `pr-menu-bind'." | |||
| 5707 | (let* ((dir-name (file-name-directory (or (buffer-file-name) | 5707 | (let* ((dir-name (file-name-directory (or (buffer-file-name) |
| 5708 | default-directory))) | 5708 | default-directory))) |
| 5709 | (fmt-prompt (concat "%s[" mess "] Directory to print: ")) | 5709 | (fmt-prompt (concat "%s[" mess "] Directory to print: ")) |
| 5710 | (dir (read-file-name (format fmt-prompt "") | 5710 | (dir (read-directory-name (format fmt-prompt "") |
| 5711 | "" dir-name nil dir-name)) | 5711 | "" dir-name nil dir-name)) |
| 5712 | prompt) | 5712 | prompt) |
| 5713 | (while (cond ((not (file-directory-p dir)) | 5713 | (while (cond ((not (file-directory-p dir)) |
| 5714 | (ding) | 5714 | (ding) |
| @@ -5718,8 +5718,8 @@ If menu binding was not done, calls `pr-menu-bind'." | |||
| 5718 | (setq prompt "Directory is unreadable! ")) | 5718 | (setq prompt "Directory is unreadable! ")) |
| 5719 | (t nil)) | 5719 | (t nil)) |
| 5720 | (setq dir-name (file-name-directory dir) | 5720 | (setq dir-name (file-name-directory dir) |
| 5721 | dir (read-file-name (format fmt-prompt prompt) | 5721 | dir (read-directory-name (format fmt-prompt prompt) |
| 5722 | "" dir-name nil dir-name))) | 5722 | "" dir-name nil dir-name))) |
| 5723 | (file-name-as-directory dir))) | 5723 | (file-name-as-directory dir))) |
| 5724 | 5724 | ||
| 5725 | 5725 | ||
diff --git a/lisp/progmodes/ada-prj.el b/lisp/progmodes/ada-prj.el index d7397144498..dd05ab8f310 100644 --- a/lisp/progmodes/ada-prj.el +++ b/lisp/progmodes/ada-prj.el | |||
| @@ -227,7 +227,7 @@ If FILE-NAME is nil, ask the user for the name." | |||
| 227 | ;; the user to select a directory | 227 | ;; the user to select a directory |
| 228 | (let ((use-dialog-box nil)) | 228 | (let ((use-dialog-box nil)) |
| 229 | (unless file-name | 229 | (unless file-name |
| 230 | (set 'file-name (read-file-name "Root directory: " nil nil t)))) | 230 | (set 'file-name (read-directory-name "Root directory: " nil nil t)))) |
| 231 | 231 | ||
| 232 | (set 'ada-prj-current-values | 232 | (set 'ada-prj-current-values |
| 233 | (plist-put ada-prj-current-values | 233 | (plist-put ada-prj-current-values |
diff --git a/lisp/progmodes/ebnf2ps.el b/lisp/progmodes/ebnf2ps.el index 9f8dd79e0fc..f7965d2cd01 100644 --- a/lisp/progmodes/ebnf2ps.el +++ b/lisp/progmodes/ebnf2ps.el | |||
| @@ -2229,8 +2229,8 @@ processed. | |||
| 2229 | 2229 | ||
| 2230 | See also `ebnf-print-buffer'." | 2230 | See also `ebnf-print-buffer'." |
| 2231 | (interactive | 2231 | (interactive |
| 2232 | (list (read-file-name "Directory containing EBNF files (print): " | 2232 | (list (read-directory-name "Directory containing EBNF files (print): " |
| 2233 | nil default-directory))) | 2233 | nil default-directory))) |
| 2234 | (ebnf-log-header "(ebnf-print-directory %S)" directory) | 2234 | (ebnf-log-header "(ebnf-print-directory %S)" directory) |
| 2235 | (ebnf-directory 'ebnf-print-buffer directory)) | 2235 | (ebnf-directory 'ebnf-print-buffer directory)) |
| 2236 | 2236 | ||
| @@ -2287,8 +2287,8 @@ processed. | |||
| 2287 | 2287 | ||
| 2288 | See also `ebnf-spool-buffer'." | 2288 | See also `ebnf-spool-buffer'." |
| 2289 | (interactive | 2289 | (interactive |
| 2290 | (list (read-file-name "Directory containing EBNF files (spool): " | 2290 | (list (read-directory-name "Directory containing EBNF files (spool): " |
| 2291 | nil default-directory))) | 2291 | nil default-directory))) |
| 2292 | (ebnf-log-header "(ebnf-spool-directory %S)" directory) | 2292 | (ebnf-log-header "(ebnf-spool-directory %S)" directory) |
| 2293 | (ebnf-directory 'ebnf-spool-buffer directory)) | 2293 | (ebnf-directory 'ebnf-spool-buffer directory)) |
| 2294 | 2294 | ||
| @@ -2340,8 +2340,8 @@ processed. | |||
| 2340 | 2340 | ||
| 2341 | See also `ebnf-eps-buffer'." | 2341 | See also `ebnf-eps-buffer'." |
| 2342 | (interactive | 2342 | (interactive |
| 2343 | (list (read-file-name "Directory containing EBNF files (EPS): " | 2343 | (list (read-directory-name "Directory containing EBNF files (EPS): " |
| 2344 | nil default-directory))) | 2344 | nil default-directory))) |
| 2345 | (ebnf-log-header "(ebnf-eps-directory %S)" directory) | 2345 | (ebnf-log-header "(ebnf-eps-directory %S)" directory) |
| 2346 | (ebnf-directory 'ebnf-eps-buffer directory)) | 2346 | (ebnf-directory 'ebnf-eps-buffer directory)) |
| 2347 | 2347 | ||
| @@ -2425,8 +2425,8 @@ are processed. | |||
| 2425 | 2425 | ||
| 2426 | See also `ebnf-syntax-buffer'." | 2426 | See also `ebnf-syntax-buffer'." |
| 2427 | (interactive | 2427 | (interactive |
| 2428 | (list (read-file-name "Directory containing EBNF files (syntax): " | 2428 | (list (read-directory-name "Directory containing EBNF files (syntax): " |
| 2429 | nil default-directory))) | 2429 | nil default-directory))) |
| 2430 | (ebnf-log-header "(ebnf-syntax-directory %S)" directory) | 2430 | (ebnf-log-header "(ebnf-syntax-directory %S)" directory) |
| 2431 | (ebnf-directory 'ebnf-syntax-buffer directory)) | 2431 | (ebnf-directory 'ebnf-syntax-buffer directory)) |
| 2432 | 2432 | ||
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el index 32ab52228f9..a4c9b7fccba 100644 --- a/lisp/progmodes/grep.el +++ b/lisp/progmodes/grep.el | |||
| @@ -72,7 +72,9 @@ SYMBOL should be one of `grep-command', `grep-template', | |||
| 72 | 72 | ||
| 73 | Some grep programs are able to surround matches with special | 73 | Some grep programs are able to surround matches with special |
| 74 | markers in grep output. Such markers can be used to highlight | 74 | markers in grep output. Such markers can be used to highlight |
| 75 | matches in grep mode. | 75 | matches in grep mode. This requires `font-lock-mode' to be active |
| 76 | in grep buffers, so if you have globally disabled font-lock-mode, | ||
| 77 | you will not get highlighting. | ||
| 76 | 78 | ||
| 77 | This option sets the environment variable GREP_COLORS to specify | 79 | This option sets the environment variable GREP_COLORS to specify |
| 78 | markers for highlighting and GREP_OPTIONS to add the --color | 80 | markers for highlighting and GREP_OPTIONS to add the --color |
| @@ -462,6 +464,8 @@ Set up `compilation-exit-message-function' and run `grep-setup-hook'." | |||
| 462 | (when (eq grep-highlight-matches 'auto-detect) | 464 | (when (eq grep-highlight-matches 'auto-detect) |
| 463 | (grep-compute-defaults)) | 465 | (grep-compute-defaults)) |
| 464 | (unless (or (eq grep-highlight-matches 'auto-detect) | 466 | (unless (or (eq grep-highlight-matches 'auto-detect) |
| 467 | ;; Uses font-lock to parse color escapes. (Bug#8084) | ||
| 468 | (null font-lock-mode) | ||
| 465 | (null grep-highlight-matches)) | 469 | (null grep-highlight-matches)) |
| 466 | ;; `setenv' modifies `process-environment' let-bound in `compilation-start' | 470 | ;; `setenv' modifies `process-environment' let-bound in `compilation-start' |
| 467 | ;; Any TERM except "dumb" allows GNU grep to use `--color=auto' | 471 | ;; Any TERM except "dumb" allows GNU grep to use `--color=auto' |
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index 6e175da1414..53918b903ee 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el | |||
| @@ -3218,7 +3218,7 @@ Treats actions as defuns." | |||
| 3218 | t) | 3218 | t) |
| 3219 | 3219 | ||
| 3220 | ;;;###autoload | 3220 | ;;;###autoload |
| 3221 | (define-derived-mode gdb-script-mode nil "GDB-Script" | 3221 | (define-derived-mode gdb-script-mode prog-mode "GDB-Script" |
| 3222 | "Major mode for editing GDB scripts." | 3222 | "Major mode for editing GDB scripts." |
| 3223 | (set (make-local-variable 'comment-start) "#") | 3223 | (set (make-local-variable 'comment-start) "#") |
| 3224 | (set (make-local-variable 'comment-start-skip) "#+\\s-*") | 3224 | (set (make-local-variable 'comment-start-skip) "#+\\s-*") |
diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el index 45d967e92d9..62472edfbe4 100644 --- a/lisp/progmodes/prolog.el +++ b/lisp/progmodes/prolog.el | |||
| @@ -1715,7 +1715,7 @@ If COMPILEP is non-nil, compile, otherwise consult." | |||
| 1715 | ;; Font-lock stuff | 1715 | ;; Font-lock stuff |
| 1716 | ;;------------------------------------------------------------------- | 1716 | ;;------------------------------------------------------------------- |
| 1717 | 1717 | ||
| 1718 | ;; Auxilliary functions | 1718 | ;; Auxiliary functions |
| 1719 | (defun prolog-make-keywords-regexp (keywords &optional protect) | 1719 | (defun prolog-make-keywords-regexp (keywords &optional protect) |
| 1720 | "Create regexp from the list of strings KEYWORDS. | 1720 | "Create regexp from the list of strings KEYWORDS. |
| 1721 | If PROTECT is non-nil, surround the result regexp by word breaks." | 1721 | If PROTECT is non-nil, surround the result regexp by word breaks." |
| @@ -3777,7 +3777,7 @@ If the point is not on a variable then insert underscore." | |||
| 3777 | 3777 | ||
| 3778 | 3778 | ||
| 3779 | (defun prolog-find-term (functor arity &optional prefix) | 3779 | (defun prolog-find-term (functor arity &optional prefix) |
| 3780 | "Go to the position at the start of the next occurance of a term. | 3780 | "Go to the position at the start of the next occurrence of a term. |
| 3781 | The term is specified with FUNCTOR and ARITY. The optional argument | 3781 | The term is specified with FUNCTOR and ARITY. The optional argument |
| 3782 | PREFIX is the prefix of the search regexp." | 3782 | PREFIX is the prefix of the search regexp." |
| 3783 | (let* (;; If prefix is not set then use the default "\\<" | 3783 | (let* (;; If prefix is not set then use the default "\\<" |
diff --git a/lisp/ps-print.el b/lisp/ps-print.el index 19431c30d68..b51eb944696 100644 --- a/lisp/ps-print.el +++ b/lisp/ps-print.el | |||
| @@ -6645,7 +6645,8 @@ If FACE is not a valid face name, use default face." | |||
| 6645 | (error "Unprinted PostScript")))) | 6645 | (error "Unprinted PostScript")))) |
| 6646 | 6646 | ||
| 6647 | (cond ((fboundp 'add-hook) | 6647 | (cond ((fboundp 'add-hook) |
| 6648 | (funcall 'add-hook 'kill-emacs-hook 'ps-kill-emacs-check)) | 6648 | (unless noninteractive |
| 6649 | (funcall 'add-hook 'kill-emacs-hook 'ps-kill-emacs-check))) | ||
| 6649 | (kill-emacs-hook | 6650 | (kill-emacs-hook |
| 6650 | (message "Won't override existing `kill-emacs-hook'")) | 6651 | (message "Won't override existing `kill-emacs-hook'")) |
| 6651 | (t | 6652 | (t |
diff --git a/lisp/recentf.el b/lisp/recentf.el index d0be69b51fc..9f9baad8dbd 100644 --- a/lisp/recentf.el +++ b/lisp/recentf.el | |||
| @@ -411,13 +411,14 @@ That is, if it doesn't match any of the `recentf-exclude' checks." | |||
| 411 | (checks recentf-exclude) | 411 | (checks recentf-exclude) |
| 412 | (keepit t)) | 412 | (keepit t)) |
| 413 | (while (and checks keepit) | 413 | (while (and checks keepit) |
| 414 | (setq keepit (condition-case nil | 414 | ;; If there was an error in a predicate, err on the side of |
| 415 | (not (if (stringp (car checks)) | 415 | ;; keeping the file. (Bug#5843) |
| 416 | ;; A regexp | 416 | (setq keepit (not (ignore-errors |
| 417 | (string-match (car checks) filename) | 417 | (if (stringp (car checks)) |
| 418 | ;; A predicate | 418 | ;; A regexp |
| 419 | (funcall (car checks) filename))) | 419 | (string-match (car checks) filename) |
| 420 | (error nil)) | 420 | ;; A predicate |
| 421 | (funcall (car checks) filename)))) | ||
| 421 | checks (cdr checks))) | 422 | checks (cdr checks))) |
| 422 | keepit)) | 423 | keepit)) |
| 423 | 424 | ||
diff --git a/lisp/saveplace.el b/lisp/saveplace.el index b7d43bd230a..c10b5cbb7ec 100644 --- a/lisp/saveplace.el +++ b/lisp/saveplace.el | |||
| @@ -300,7 +300,8 @@ may have changed\) back to `save-place-alist'." | |||
| 300 | 300 | ||
| 301 | (add-hook 'find-file-hook 'save-place-find-file-hook t) | 301 | (add-hook 'find-file-hook 'save-place-find-file-hook t) |
| 302 | 302 | ||
| 303 | (add-hook 'kill-emacs-hook 'save-place-kill-emacs-hook) | 303 | (unless noninteractive |
| 304 | (add-hook 'kill-emacs-hook 'save-place-kill-emacs-hook)) | ||
| 304 | 305 | ||
| 305 | (add-hook 'kill-buffer-hook 'save-place-to-alist) | 306 | (add-hook 'kill-buffer-hook 'save-place-to-alist) |
| 306 | 307 | ||
diff --git a/lisp/shell.el b/lisp/shell.el index ea89ce765c3..2f11cc6314c 100644 --- a/lisp/shell.el +++ b/lisp/shell.el | |||
| @@ -569,9 +569,9 @@ Otherwise, one argument `-i' is passed to the shell. | |||
| 569 | ;; of the current-buffer rather than of the *shell* buffer. | 569 | ;; of the current-buffer rather than of the *shell* buffer. |
| 570 | (setq default-directory | 570 | (setq default-directory |
| 571 | (expand-file-name | 571 | (expand-file-name |
| 572 | (read-file-name | 572 | (read-directory-name |
| 573 | "Default directory: " default-directory default-directory | 573 | "Default directory: " default-directory default-directory |
| 574 | t nil 'file-directory-p)))))))) | 574 | t nil)))))))) |
| 575 | (require 'ansi-color) | 575 | (require 'ansi-color) |
| 576 | (setq buffer (if (or buffer (not (derived-mode-p 'shell-mode)) | 576 | (setq buffer (if (or buffer (not (derived-mode-p 'shell-mode)) |
| 577 | (comint-check-proc (current-buffer))) | 577 | (comint-check-proc (current-buffer))) |
diff --git a/lisp/speedbar.el b/lisp/speedbar.el index dad2a4c82ac..d160a836359 100644 --- a/lisp/speedbar.el +++ b/lisp/speedbar.el | |||
| @@ -1622,7 +1622,7 @@ Files can be renamed to new names or moved to new directories." | |||
| 1622 | (let ((f (speedbar-line-file))) | 1622 | (let ((f (speedbar-line-file))) |
| 1623 | (if f | 1623 | (if f |
| 1624 | (let* ((basedir (file-name-directory f)) | 1624 | (let* ((basedir (file-name-directory f)) |
| 1625 | (nd (read-file-name "Create directory: " | 1625 | (nd (read-directory-name "Create directory: " |
| 1626 | basedir))) | 1626 | basedir))) |
| 1627 | ;; Make the directory | 1627 | ;; Make the directory |
| 1628 | (make-directory nd t) | 1628 | (make-directory nd t) |
diff --git a/lisp/textmodes/reftex.el b/lisp/textmodes/reftex.el index 6719a647c36..7e150bff997 100644 --- a/lisp/textmodes/reftex.el +++ b/lisp/textmodes/reftex.el | |||
| @@ -567,7 +567,7 @@ on the menu bar. | |||
| 567 | "Save RefTeX's parse file for this buffer if the information has changed." | 567 | "Save RefTeX's parse file for this buffer if the information has changed." |
| 568 | ;; Save the parsing information if it was modified. | 568 | ;; Save the parsing information if it was modified. |
| 569 | ;; This function should be installed in `kill-buffer-hook'. | 569 | ;; This function should be installed in `kill-buffer-hook'. |
| 570 | ;; We are careful to make sure nothing goes wring in this function. | 570 | ;; We are careful to make sure nothing goes wrong in this function. |
| 571 | (when (and (boundp 'reftex-mode) reftex-mode | 571 | (when (and (boundp 'reftex-mode) reftex-mode |
| 572 | (boundp 'reftex-save-parse-info) reftex-save-parse-info | 572 | (boundp 'reftex-save-parse-info) reftex-save-parse-info |
| 573 | (boundp 'reftex-docstruct-symbol) reftex-docstruct-symbol | 573 | (boundp 'reftex-docstruct-symbol) reftex-docstruct-symbol |
| @@ -2397,7 +2397,7 @@ IGNORE-WORDS List of words which should be removed from the string." | |||
| 2397 | (define-key reftex-mode-map | 2397 | (define-key reftex-mode-map |
| 2398 | reftex-extra-bindings-prefix | 2398 | reftex-extra-bindings-prefix |
| 2399 | reftex-extra-bindings-map)) | 2399 | reftex-extra-bindings-map)) |
| 2400 | 2400 | ||
| 2401 | 2401 | ||
| 2402 | ;;; ========================================================================= | 2402 | ;;; ========================================================================= |
| 2403 | ;;; | 2403 | ;;; |
| @@ -2568,7 +2568,8 @@ With optional NODE, go directly to that node." | |||
| 2568 | ;;; Install the kill-buffer and kill-emacs hooks ------------------------------ | 2568 | ;;; Install the kill-buffer and kill-emacs hooks ------------------------------ |
| 2569 | 2569 | ||
| 2570 | (add-hook 'kill-buffer-hook 'reftex-kill-buffer-hook) | 2570 | (add-hook 'kill-buffer-hook 'reftex-kill-buffer-hook) |
| 2571 | (add-hook 'kill-emacs-hook 'reftex-kill-emacs-hook) | 2571 | (unless noninteractive |
| 2572 | (add-hook 'kill-emacs-hook 'reftex-kill-emacs-hook)) | ||
| 2572 | 2573 | ||
| 2573 | ;;; Run Hook ------------------------------------------------------------------ | 2574 | ;;; Run Hook ------------------------------------------------------------------ |
| 2574 | 2575 | ||
diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el index 2229dc6c9e8..314fbf9671b 100644 --- a/lisp/textmodes/sgml-mode.el +++ b/lisp/textmodes/sgml-mode.el | |||
| @@ -427,7 +427,12 @@ a DOCTYPE or an XML declaration." | |||
| 427 | (format-mode-line mode-name)))))) | 427 | (format-mode-line mode-name)))))) |
| 428 | 428 | ||
| 429 | (defun sgml-fill-nobreak () | 429 | (defun sgml-fill-nobreak () |
| 430 | ;; Don't break between a tag name and its first argument. | 430 | "Don't break between a tag name and its first argument. |
| 431 | This function is designed for use in `fill-nobreak-predicate'. | ||
| 432 | |||
| 433 | <a href=\"some://where\" type=\"text/plain\"> | ||
| 434 | ^ ^ | ||
| 435 | | no break here | but still allowed here" | ||
| 431 | (save-excursion | 436 | (save-excursion |
| 432 | (skip-chars-backward " \t") | 437 | (skip-chars-backward " \t") |
| 433 | (and (not (zerop (skip-syntax-backward "w_"))) | 438 | (and (not (zerop (skip-syntax-backward "w_"))) |
diff --git a/lisp/time.el b/lisp/time.el index 1bc1cca1112..2e9dd252bd6 100644 --- a/lisp/time.el +++ b/lisp/time.el | |||
| @@ -157,7 +157,7 @@ LABEL is a string to display as the label of that TIMEZONE's time." | |||
| 157 | ;; Determine if zoneinfo style timezones are supported by testing that | 157 | ;; Determine if zoneinfo style timezones are supported by testing that |
| 158 | ;; America/New York and Europe/London return different timezones. | 158 | ;; America/New York and Europe/London return different timezones. |
| 159 | (let (gmt nyt) | 159 | (let (gmt nyt) |
| 160 | (set-time-zone-rule "America/New York") | 160 | (set-time-zone-rule "America/New_York") |
| 161 | (setq nyt (format-time-string "%z")) | 161 | (setq nyt (format-time-string "%z")) |
| 162 | (set-time-zone-rule "Europe/London") | 162 | (set-time-zone-rule "Europe/London") |
| 163 | (setq gmt (format-time-string "%z")) | 163 | (setq gmt (format-time-string "%z")) |
diff --git a/lisp/vc/diff-mode.el b/lisp/vc/diff-mode.el index 13d10f02b41..9ccb37f3a55 100644 --- a/lisp/vc/diff-mode.el +++ b/lisp/vc/diff-mode.el | |||
| @@ -1266,7 +1266,7 @@ a diff with \\[diff-reverse-direction]. | |||
| 1266 | 1266 | ||
| 1267 | ;; Set up `whitespace-mode' so that turning it on will show trailing | 1267 | ;; Set up `whitespace-mode' so that turning it on will show trailing |
| 1268 | ;; whitespace problems on the modified lines of the diff. | 1268 | ;; whitespace problems on the modified lines of the diff. |
| 1269 | (set (make-local-variable 'whitespace-style) '(trailing)) | 1269 | (set (make-local-variable 'whitespace-style) '(face trailing)) |
| 1270 | (set (make-local-variable 'whitespace-trailing-regexp) | 1270 | (set (make-local-variable 'whitespace-trailing-regexp) |
| 1271 | "^[-\+!<>].*?\\([\t ]+\\)$") | 1271 | "^[-\+!<>].*?\\([\t ]+\\)$") |
| 1272 | 1272 | ||
diff --git a/lisp/vc/ediff-init.el b/lisp/vc/ediff-init.el index ff1f7f6b017..0d904ec85c4 100644 --- a/lisp/vc/ediff-init.el +++ b/lisp/vc/ediff-init.el | |||
| @@ -560,7 +560,6 @@ See the documentation string of `ediff-focus-on-regexp-matches' for details.") | |||
| 560 | :group 'ediff) | 560 | :group 'ediff) |
| 561 | 561 | ||
| 562 | 562 | ||
| 563 | (ediff-defvar-local ediff-use-faces t "") | ||
| 564 | (defcustom ediff-use-faces t | 563 | (defcustom ediff-use-faces t |
| 565 | "If t, differences are highlighted using faces, if device supports faces. | 564 | "If t, differences are highlighted using faces, if device supports faces. |
| 566 | If nil, differences are highlighted using ASCII flags, ediff-before-flag | 565 | If nil, differences are highlighted using ASCII flags, ediff-before-flag |
| @@ -568,6 +567,7 @@ and ediff-after-flag. On a non-window system, differences are always | |||
| 568 | highlighted using ASCII flags." | 567 | highlighted using ASCII flags." |
| 569 | :type 'boolean | 568 | :type 'boolean |
| 570 | :group 'ediff-highlighting) | 569 | :group 'ediff-highlighting) |
| 570 | (ediff-defvar-local ediff-use-faces t "") | ||
| 571 | 571 | ||
| 572 | ;; this indicates that diff regions are word-size, so fine diffs are | 572 | ;; this indicates that diff regions are word-size, so fine diffs are |
| 573 | ;; permanently nixed; used in ediff-windows-wordwise and ediff-regions-wordwise | 573 | ;; permanently nixed; used in ediff-windows-wordwise and ediff-regions-wordwise |
| @@ -604,13 +604,13 @@ meaning of this variable." | |||
| 604 | :type 'boolean | 604 | :type 'boolean |
| 605 | :group 'ediff) | 605 | :group 'ediff) |
| 606 | 606 | ||
| 607 | (ediff-defvar-local ediff-highlight-all-diffs t "") | ||
| 608 | (defcustom ediff-highlight-all-diffs t | 607 | (defcustom ediff-highlight-all-diffs t |
| 609 | "If nil, only the selected differences are highlighted. | 608 | "If nil, only the selected differences are highlighted. |
| 610 | Otherwise, all difference regions are highlighted, but the selected region is | 609 | Otherwise, all difference regions are highlighted, but the selected region is |
| 611 | shown in brighter colors." | 610 | shown in brighter colors." |
| 612 | :type 'boolean | 611 | :type 'boolean |
| 613 | :group 'ediff-highlighting) | 612 | :group 'ediff-highlighting) |
| 613 | (ediff-defvar-local ediff-highlight-all-diffs t "") | ||
| 614 | 614 | ||
| 615 | 615 | ||
| 616 | ;; The suffix of the control buffer name. | 616 | ;; The suffix of the control buffer name. |
diff --git a/lisp/vc/emerge.el b/lisp/vc/emerge.el index ee34944e448..601b6b1e597 100644 --- a/lisp/vc/emerge.el +++ b/lisp/vc/emerge.el | |||
| @@ -1271,10 +1271,10 @@ Otherwise, the A or B file present is copied to the output file." | |||
| 1271 | (defun emerge-merge-directories (a-dir b-dir ancestor-dir output-dir) | 1271 | (defun emerge-merge-directories (a-dir b-dir ancestor-dir output-dir) |
| 1272 | (interactive | 1272 | (interactive |
| 1273 | (list | 1273 | (list |
| 1274 | (read-file-name "A directory: " nil nil 'confirm) | 1274 | (read-directory-name "A directory: " nil nil 'confirm) |
| 1275 | (read-file-name "B directory: " nil nil 'confirm) | 1275 | (read-directory-name "B directory: " nil nil 'confirm) |
| 1276 | (read-file-name "Ancestor directory (null for none): " nil nil 'confirm) | 1276 | (read-directory-name "Ancestor directory (null for none): " nil nil 'confirm) |
| 1277 | (read-file-name "Output directory (null for none): " nil nil 'confirm))) | 1277 | (read-directory-name "Output directory (null for none): " nil nil 'confirm))) |
| 1278 | ;; Check that we're not on a line | 1278 | ;; Check that we're not on a line |
| 1279 | (if (not (and (bolp) (eolp))) | 1279 | (if (not (and (bolp) (eolp))) |
| 1280 | (error "There is text on this line")) | 1280 | (error "There is text on this line")) |
diff --git a/lisp/vc/vc-bzr.el b/lisp/vc/vc-bzr.el index 5e6e054924c..a0a16601ed7 100644 --- a/lisp/vc/vc-bzr.el +++ b/lisp/vc/vc-bzr.el | |||
| @@ -182,10 +182,19 @@ in the repository root directory of FILE." | |||
| 182 | ;; format 3' in the first line. | 182 | ;; format 3' in the first line. |
| 183 | ;; If the `checkout/dirstate' file cannot be parsed, fall back to | 183 | ;; If the `checkout/dirstate' file cannot be parsed, fall back to |
| 184 | ;; running `vc-bzr-state'." | 184 | ;; running `vc-bzr-state'." |
| 185 | ;; | ||
| 186 | ;; The format of the dirstate file is explained in bzrlib/dirstate.py | ||
| 187 | ;; in the bzr distribution. Basically: | ||
| 188 | ;; header-line giving the version of the file format in use. | ||
| 189 | ;; a few lines of stuff | ||
| 190 | ;; entries, one per line, with null-separated fields. Each line: | ||
| 191 | ;; entry_key = dirname (may be empty), basename, file-id | ||
| 192 | ;; current = common ( = kind, fingerprint, size, executable ) | ||
| 193 | ;; + working ( = packed_stat ) | ||
| 194 | ;; parent = common ( as above ) + history ( = rev_id ) | ||
| 195 | ;; kinds = (r)elocated, (a)bsent, (d)irectory, (f)ile, (l)ink | ||
| 185 | (lexical-let ((root (vc-bzr-root file))) | 196 | (lexical-let ((root (vc-bzr-root file))) |
| 186 | (when root ; Short cut. | 197 | (when root ; Short cut. |
| 187 | ;; This looks at internal files. May break if they change | ||
| 188 | ;; their format. | ||
| 189 | (lexical-let ((dirstate (expand-file-name vc-bzr-admin-dirstate root))) | 198 | (lexical-let ((dirstate (expand-file-name vc-bzr-admin-dirstate root))) |
| 190 | (condition-case nil | 199 | (condition-case nil |
| 191 | (with-temp-buffer | 200 | (with-temp-buffer |
| @@ -210,13 +219,14 @@ in the repository root directory of FILE." | |||
| 210 | ;; was executable the last time bzr checked? | 219 | ;; was executable the last time bzr checked? |
| 211 | "[^\0]*\0" | 220 | "[^\0]*\0" |
| 212 | "[^\0]*\0" ;? | 221 | "[^\0]*\0" ;? |
| 213 | "\\([^\0]*\\)\0" ;"a/f/d" a=added? | 222 | ;; Parent information. Absent in a new repo. |
| 223 | "\\(?:\\([^\0]*\\)\0" ;"a/f/d" a=added? | ||
| 214 | "\\([^\0]*\\)\0" ;sha1 again? | 224 | "\\([^\0]*\\)\0" ;sha1 again? |
| 215 | "\\([^\0]*\\)\0" ;size again? | 225 | "\\([^\0]*\\)\0" ;size again? |
| 216 | ;; y/n. Whether or not the repo thinks | 226 | ;; y/n. Whether or not the repo thinks |
| 217 | ;; the file should be executable? | 227 | ;; the file should be executable? |
| 218 | "\\([^\0]*\\)\0" | 228 | "\\([^\0]*\\)\0" |
| 219 | "[^\0]*\0" ;last revid? | 229 | "[^\0]*\0\\)?" ;last revid? |
| 220 | ;; There are more fields when merges are pending. | 230 | ;; There are more fields when merges are pending. |
| 221 | ) | 231 | ) |
| 222 | nil t) | 232 | nil t) |
| @@ -226,7 +236,10 @@ in the repository root directory of FILE." | |||
| 226 | ;; conflict markers). | 236 | ;; conflict markers). |
| 227 | (cond | 237 | (cond |
| 228 | ((eq (char-after (match-beginning 1)) ?a) 'removed) | 238 | ((eq (char-after (match-beginning 1)) ?a) 'removed) |
| 229 | ((eq (char-after (match-beginning 4)) ?a) 'added) | 239 | ;; If there is no parent, this must be a new repo. |
| 240 | ;; If file is in dirstate, can only be added (b#8025). | ||
| 241 | ((or (not (match-beginning 4)) | ||
| 242 | (eq (char-after (match-beginning 4)) ?a)) 'added) | ||
| 230 | ((or (and (eq (string-to-number (match-string 3)) | 243 | ((or (and (eq (string-to-number (match-string 3)) |
| 231 | (nth 7 (file-attributes file))) | 244 | (nth 7 (file-attributes file))) |
| 232 | (equal (match-string 5) | 245 | (equal (match-string 5) |
| @@ -866,38 +879,40 @@ stream. Standard error output is discarded." | |||
| 866 | (result nil)) | 879 | (result nil)) |
| 867 | (goto-char (point-min)) | 880 | (goto-char (point-min)) |
| 868 | (while (not (eobp)) | 881 | (while (not (eobp)) |
| 869 | (setq status-str | 882 | ;; Bzr 2.3.0 added this if there are shelves. (Bug#8170) |
| 870 | (buffer-substring-no-properties (point) (+ (point) 3))) | 883 | (unless (looking-at "[1-9]+ shel\\(f\\|ves\\) exists?\\.") |
| 871 | (setq translated (cdr (assoc status-str translation))) | 884 | (setq status-str |
| 872 | (cond | 885 | (buffer-substring-no-properties (point) (+ (point) 3))) |
| 873 | ((eq translated 'conflict) | 886 | (setq translated (cdr (assoc status-str translation))) |
| 874 | ;; For conflicts the file appears twice in the listing: once | 887 | (cond |
| 875 | ;; with the M flag and once with the C flag, so take care | 888 | ((eq translated 'conflict) |
| 876 | ;; not to add it twice to `result'. Ugly. | 889 | ;; For conflicts the file appears twice in the listing: once |
| 877 | (let* ((file | 890 | ;; with the M flag and once with the C flag, so take care |
| 878 | (buffer-substring-no-properties | 891 | ;; not to add it twice to `result'. Ugly. |
| 879 | ;;For files with conflicts the format is: | 892 | (let* ((file |
| 880 | ;;C Text conflict in FILENAME | 893 | (buffer-substring-no-properties |
| 881 | ;; Bah. | 894 | ;;For files with conflicts the format is: |
| 882 | (+ (point) 21) (line-end-position))) | 895 | ;;C Text conflict in FILENAME |
| 883 | (entry (assoc file result))) | 896 | ;; Bah. |
| 884 | (when entry | 897 | (+ (point) 21) (line-end-position))) |
| 885 | (setf (nth 1 entry) 'conflict)))) | 898 | (entry (assoc file result))) |
| 886 | ((eq translated 'renamed) | 899 | (when entry |
| 887 | (re-search-forward "R[ M] \\(.*\\) => \\(.*\\)$" (line-end-position) t) | 900 | (setf (nth 1 entry) 'conflict)))) |
| 888 | (let ((new-name (file-relative-name (match-string 2) relative-dir)) | 901 | ((eq translated 'renamed) |
| 889 | (old-name (file-relative-name (match-string 1) relative-dir))) | 902 | (re-search-forward "R[ M] \\(.*\\) => \\(.*\\)$" (line-end-position) t) |
| 890 | (push (list new-name 'edited | 903 | (let ((new-name (file-relative-name (match-string 2) relative-dir)) |
| 891 | (vc-bzr-create-extra-fileinfo old-name)) result))) | 904 | (old-name (file-relative-name (match-string 1) relative-dir))) |
| 892 | ;; do nothing for non existent files | 905 | (push (list new-name 'edited |
| 893 | ((eq translated 'not-found)) | 906 | (vc-bzr-create-extra-fileinfo old-name)) result))) |
| 894 | (t | 907 | ;; do nothing for non existent files |
| 895 | (push (list (file-relative-name | 908 | ((eq translated 'not-found)) |
| 896 | (buffer-substring-no-properties | 909 | (t |
| 897 | (+ (point) 4) | 910 | (push (list (file-relative-name |
| 898 | (line-end-position)) relative-dir) | 911 | (buffer-substring-no-properties |
| 899 | translated) result))) | 912 | (+ (point) 4) |
| 900 | (forward-line)) | 913 | (line-end-position)) relative-dir) |
| 914 | translated) result)))) | ||
| 915 | (forward-line)) | ||
| 901 | (funcall update-function result))) | 916 | (funcall update-function result))) |
| 902 | 917 | ||
| 903 | (defun vc-bzr-dir-status (dir update-function) | 918 | (defun vc-bzr-dir-status (dir update-function) |
diff --git a/lisp/vc/vc-dir.el b/lisp/vc/vc-dir.el index 38fbaaedd32..d4970207b94 100644 --- a/lisp/vc/vc-dir.el +++ b/lisp/vc/vc-dir.el | |||
| @@ -265,6 +265,7 @@ See `run-hooks'." | |||
| 265 | (define-key map [C-up] 'vc-dir-previous-directory) | 265 | (define-key map [C-up] 'vc-dir-previous-directory) |
| 266 | ;; The remainder. | 266 | ;; The remainder. |
| 267 | (define-key map "f" 'vc-dir-find-file) | 267 | (define-key map "f" 'vc-dir-find-file) |
| 268 | (define-key map "e" 'vc-dir-find-file) ; dired-mode compatibility | ||
| 268 | (define-key map "\C-m" 'vc-dir-find-file) | 269 | (define-key map "\C-m" 'vc-dir-find-file) |
| 269 | (define-key map "o" 'vc-dir-find-file-other-window) | 270 | (define-key map "o" 'vc-dir-find-file-other-window) |
| 270 | (define-key map "\C-c\C-c" 'vc-dir-kill-dir-status-process) | 271 | (define-key map "\C-c\C-c" 'vc-dir-kill-dir-status-process) |
| @@ -1184,9 +1185,9 @@ These are the commands available for use in the file status buffer: | |||
| 1184 | ;; therefore it makes sense to always do that. | 1185 | ;; therefore it makes sense to always do that. |
| 1185 | ;; Otherwise if you do C-x v d -> C-x C-f -> C-c v d | 1186 | ;; Otherwise if you do C-x v d -> C-x C-f -> C-c v d |
| 1186 | ;; you may get a new *vc-dir* buffer, different from the original | 1187 | ;; you may get a new *vc-dir* buffer, different from the original |
| 1187 | (file-truename (read-file-name "VC status for directory: " | 1188 | (file-truename (read-directory-name "VC status for directory: " |
| 1188 | default-directory default-directory t | 1189 | default-directory default-directory t |
| 1189 | nil #'file-directory-p)) | 1190 | nil)) |
| 1190 | (if current-prefix-arg | 1191 | (if current-prefix-arg |
| 1191 | (intern | 1192 | (intern |
| 1192 | (completing-read | 1193 | (completing-read |
diff --git a/lisp/vc/vc-rcs.el b/lisp/vc/vc-rcs.el index d3a64f15f9e..488efaa3522 100644 --- a/lisp/vc/vc-rcs.el +++ b/lisp/vc/vc-rcs.el | |||
| @@ -25,14 +25,10 @@ | |||
| 25 | 25 | ||
| 26 | ;; See vc.el | 26 | ;; See vc.el |
| 27 | 27 | ||
| 28 | ;; Some features will not work with old RCS versions. Where | 28 | ;; Some features will not work with ancient RCS versions. Where |
| 29 | ;; appropriate, VC finds out which version you have, and allows or | 29 | ;; appropriate, VC finds out which version you have, and allows or |
| 30 | ;; disallows those features (stealing locks, for example, works only | 30 | ;; disallows those features. |
| 31 | ;; from 5.6.2 onwards). | 31 | |
| 32 | ;; Even initial checkins will fail if your RCS version is so old that ci | ||
| 33 | ;; doesn't understand -t-; this has been known to happen to people running | ||
| 34 | ;; NExTSTEP 3.0. | ||
| 35 | ;; | ||
| 36 | ;; You can support the RCS -x option by customizing vc-rcs-master-templates. | 32 | ;; You can support the RCS -x option by customizing vc-rcs-master-templates. |
| 37 | 33 | ||
| 38 | ;;; Code: | 34 | ;;; Code: |
| @@ -391,7 +387,7 @@ whether to remove it." | |||
| 391 | (vc-rcs-set-default-branch file | 387 | (vc-rcs-set-default-branch file |
| 392 | (if (vc-rcs-trunk-p new-version) nil | 388 | (if (vc-rcs-trunk-p new-version) nil |
| 393 | (vc-branch-part new-version))) | 389 | (vc-branch-part new-version))) |
| 394 | ;; If this is an old RCS release, we might have | 390 | ;; If this is an old (pre-1992!) RCS release, we might have |
| 395 | ;; to remove a remaining lock. | 391 | ;; to remove a remaining lock. |
| 396 | (if (not (vc-rcs-release-p "5.6.2")) | 392 | (if (not (vc-rcs-release-p "5.6.2")) |
| 397 | ;; exit status of 1 is also accepted. | 393 | ;; exit status of 1 is also accepted. |
diff --git a/lisp/vc/vc-svn.el b/lisp/vc/vc-svn.el index 20c7689f401..7362258a42d 100644 --- a/lisp/vc/vc-svn.el +++ b/lisp/vc/vc-svn.el | |||
| @@ -174,7 +174,9 @@ If you want to force an empty list of arguments, use t." | |||
| 174 | (while (re-search-forward re nil t) | 174 | (while (re-search-forward re nil t) |
| 175 | (let ((state (cdr (assq (aref (match-string 1) 0) state-map))) | 175 | (let ((state (cdr (assq (aref (match-string 1) 0) state-map))) |
| 176 | (propstat (cdr (assq (aref (match-string 2) 0) state-map))) | 176 | (propstat (cdr (assq (aref (match-string 2) 0) state-map))) |
| 177 | (filename (match-string 4))) | 177 | (filename (if (memq system-type '(windows-nt ms-dos)) |
| 178 | (replace-regexp-in-string "\\\\" "/" (match-string 4)) | ||
| 179 | (match-string 4)))) | ||
| 178 | (and (memq propstat '(conflict edited)) | 180 | (and (memq propstat '(conflict edited)) |
| 179 | (not (eq state 'conflict)) ; conflict always wins | 181 | (not (eq state 'conflict)) ; conflict always wins |
| 180 | (setq state propstat)) | 182 | (setq state propstat)) |
diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el index 02743847800..200291bd925 100644 --- a/lisp/vc/vc.el +++ b/lisp/vc/vc.el | |||
| @@ -1954,7 +1954,7 @@ checked out in that new branch." | |||
| 1954 | ;; For VC's that do not work at file level, it's pointless | 1954 | ;; For VC's that do not work at file level, it's pointless |
| 1955 | ;; to ask for a directory, branches are created at repository level. | 1955 | ;; to ask for a directory, branches are created at repository level. |
| 1956 | default-directory | 1956 | default-directory |
| 1957 | (read-file-name "Directory: " default-directory default-directory t)) | 1957 | (read-directory-name "Directory: " default-directory default-directory t)) |
| 1958 | (read-string (if current-prefix-arg "New branch name: " "New tag name: ")) | 1958 | (read-string (if current-prefix-arg "New branch name: " "New tag name: ")) |
| 1959 | current-prefix-arg))) | 1959 | current-prefix-arg))) |
| 1960 | (message "Making %s... " (if branchp "branch" "tag")) | 1960 | (message "Making %s... " (if branchp "branch" "tag")) |
| @@ -1980,7 +1980,7 @@ allowed and simply skipped)." | |||
| 1980 | ;; For VC's that do not work at file level, it's pointless | 1980 | ;; For VC's that do not work at file level, it's pointless |
| 1981 | ;; to ask for a directory, branches are created at repository level. | 1981 | ;; to ask for a directory, branches are created at repository level. |
| 1982 | default-directory | 1982 | default-directory |
| 1983 | (read-file-name "Directory: " default-directory default-directory t)) | 1983 | (read-directory-name "Directory: " default-directory default-directory t)) |
| 1984 | (read-string "Tag name to retrieve (default latest revisions): ")))) | 1984 | (read-string "Tag name to retrieve (default latest revisions): ")))) |
| 1985 | (let ((update (yes-or-no-p "Update any affected buffers? ")) | 1985 | (let ((update (yes-or-no-p "Update any affected buffers? ")) |
| 1986 | (msg (if (or (not name) (string= name "")) | 1986 | (msg (if (or (not name) (string= name "")) |
diff --git a/lisp/window.el b/lisp/window.el index af5d9a5b16b..c3f8de6f9dd 100644 --- a/lisp/window.el +++ b/lisp/window.el | |||
| @@ -106,11 +106,12 @@ even if it is active. Otherwise, the minibuffer is counted | |||
| 106 | when it is active. | 106 | when it is active. |
| 107 | 107 | ||
| 108 | The optional arg ALL-FRAMES t means count windows on all frames. | 108 | The optional arg ALL-FRAMES t means count windows on all frames. |
| 109 | If it is `visible', count windows on all visible frames. | 109 | If it is `visible', count windows on all visible frames on the |
| 110 | ALL-FRAMES nil or omitted means count only the selected frame, | 110 | current terminal. ALL-FRAMES nil or omitted means count only the |
| 111 | plus the minibuffer it uses (which may be on another frame). | 111 | selected frame, plus the minibuffer it uses (which may be on |
| 112 | ALL-FRAMES 0 means count all windows in all visible or iconified frames. | 112 | another frame). ALL-FRAMES 0 means count all windows in all |
| 113 | If ALL-FRAMES is anything else, count only the selected frame." | 113 | visible or iconified frames on the current terminal. If |
| 114 | ALL-FRAMES is anything else, count only the selected frame." | ||
| 114 | (let ((base-window (selected-window))) | 115 | (let ((base-window (selected-window))) |
| 115 | (if (and nomini (eq base-window (minibuffer-window))) | 116 | (if (and nomini (eq base-window (minibuffer-window))) |
| 116 | (setq base-window (next-window base-window))) | 117 | (setq base-window (next-window base-window))) |
| @@ -169,9 +170,9 @@ ALL-FRAMES nil or omitted means cycle through all windows on the | |||
| 169 | ALL-FRAMES t means cycle through all windows on all existing | 170 | ALL-FRAMES t means cycle through all windows on all existing |
| 170 | frames. | 171 | frames. |
| 171 | ALL-FRAMES `visible' means cycle through all windows on all | 172 | ALL-FRAMES `visible' means cycle through all windows on all |
| 172 | visible frames. | 173 | visible frames on the current terminal. |
| 173 | ALL-FRAMES 0 means cycle through all windows on all visible and | 174 | ALL-FRAMES 0 means cycle through all windows on all visible and |
| 174 | iconified frames. | 175 | iconified frames on the current terminal. |
| 175 | ALL-FRAMES a frame means cycle through all windows on that frame | 176 | ALL-FRAMES a frame means cycle through all windows on that frame |
| 176 | only. | 177 | only. |
| 177 | Anything else means cycle through all windows on the selected | 178 | Anything else means cycle through all windows on the selected |
| @@ -1067,9 +1068,11 @@ when the specified buffer is already displayed. If the buffer is | |||
| 1067 | already displayed in some window on one of these frames simply | 1068 | already displayed in some window on one of these frames simply |
| 1068 | return that window. Possible values of FRAME are: | 1069 | return that window. Possible values of FRAME are: |
| 1069 | 1070 | ||
| 1070 | `visible' - consider windows on all visible frames. | 1071 | `visible' - consider windows on all visible frames on the current |
| 1072 | terminal. | ||
| 1071 | 1073 | ||
| 1072 | 0 - consider windows on all visible or iconified frames. | 1074 | 0 - consider windows on all visible or iconified frames on the |
| 1075 | current terminal. | ||
| 1073 | 1076 | ||
| 1074 | t - consider windows on all frames. | 1077 | t - consider windows on all frames. |
| 1075 | 1078 | ||
| @@ -1079,7 +1082,7 @@ nil - consider windows on the selected frame \(actually the | |||
| 1079 | last non-minibuffer frame\) only. If, however, either | 1082 | last non-minibuffer frame\) only. If, however, either |
| 1080 | `display-buffer-reuse-frames' or `pop-up-frames' is non-nil | 1083 | `display-buffer-reuse-frames' or `pop-up-frames' is non-nil |
| 1081 | \(non-nil and not graphic-only on a text-only terminal), | 1084 | \(non-nil and not graphic-only on a text-only terminal), |
| 1082 | consider all visible or iconified frames." | 1085 | consider all visible or iconified frames on the current terminal." |
| 1083 | (interactive "BDisplay buffer:\nP") | 1086 | (interactive "BDisplay buffer:\nP") |
| 1084 | (let* ((can-use-selected-window | 1087 | (let* ((can-use-selected-window |
| 1085 | ;; The selected window is usable unless either NOT-THIS-WINDOW | 1088 | ;; The selected window is usable unless either NOT-THIS-WINDOW |
diff --git a/nextstep/ChangeLog b/nextstep/ChangeLog index 79d9a2f382c..d16785e56c1 100644 --- a/nextstep/ChangeLog +++ b/nextstep/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2011-03-03 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * GNUstep/Emacs.base/Resources/Info-gnustep.plist: | ||
| 4 | Refer to etc/NEXTSTEP rather than emacs-app.sf.net. | ||
| 5 | |||
| 1 | 2011-01-02 Glenn Morris <rgm@gnu.org> | 6 | 2011-01-02 Glenn Morris <rgm@gnu.org> |
| 2 | 7 | ||
| 3 | * Cocoa/Emacs.base/Contents/Info.plist: | 8 | * Cocoa/Emacs.base/Contents/Info.plist: |
diff --git a/nextstep/Cocoa/Emacs.xcodeproj/project.pbxproj b/nextstep/Cocoa/Emacs.xcodeproj/project.pbxproj index f4c5b050b69..fe5acce2c3c 100644 --- a/nextstep/Cocoa/Emacs.xcodeproj/project.pbxproj +++ b/nextstep/Cocoa/Emacs.xcodeproj/project.pbxproj | |||
| @@ -245,7 +245,7 @@ | |||
| 245 | name = Products; | 245 | name = Products; |
| 246 | sourceTree = "<group>"; | 246 | sourceTree = "<group>"; |
| 247 | }; | 247 | }; |
| 248 | 289FC26B00C69A287F000001 /* NeXTStep */ = { | 248 | 289FC26B00C69A287F000001 /* NeXTstep */ = { |
| 249 | isa = PBXGroup; | 249 | isa = PBXGroup; |
| 250 | children = ( | 250 | children = ( |
| 251 | 3C4D6D710DE50D5D00B20D4E /* nsfont.m */, | 251 | 3C4D6D710DE50D5D00B20D4E /* nsfont.m */, |
| @@ -257,13 +257,13 @@ | |||
| 257 | 090AF68100C61DCD7F000001 /* nsselect.m */, | 257 | 090AF68100C61DCD7F000001 /* nsselect.m */, |
| 258 | 090AF68300C61DCD7F000001 /* nsterm.m */, | 258 | 090AF68300C61DCD7F000001 /* nsterm.m */, |
| 259 | ); | 259 | ); |
| 260 | name = NeXTStep; | 260 | name = NeXTstep; |
| 261 | sourceTree = "<group>"; | 261 | sourceTree = "<group>"; |
| 262 | }; | 262 | }; |
| 263 | 29B97314FDCFA39411CA2CEA /* Emacs */ = { | 263 | 29B97314FDCFA39411CA2CEA /* Emacs */ = { |
| 264 | isa = PBXGroup; | 264 | isa = PBXGroup; |
| 265 | children = ( | 265 | children = ( |
| 266 | 289FC26B00C69A287F000001 /* NeXTStep */, | 266 | 289FC26B00C69A287F000001 /* NeXTstep */, |
| 267 | 3C15C23E0902E6B000A8542F /* emacs-hdr */, | 267 | 3C15C23E0902E6B000A8542F /* emacs-hdr */, |
| 268 | 3CDCED4D0902EA6800B2EF7E /* emacs-src */, | 268 | 3CDCED4D0902EA6800B2EF7E /* emacs-src */, |
| 269 | 29B97317FDCFA39411CA2CEA /* Resources */, | 269 | 29B97317FDCFA39411CA2CEA /* Resources */, |
diff --git a/nextstep/GNUstep/Emacs.base/Resources/Info-gnustep.plist b/nextstep/GNUstep/Emacs.base/Resources/Info-gnustep.plist index e92d45ae686..9c893ed4e3d 100644 --- a/nextstep/GNUstep/Emacs.base/Resources/Info-gnustep.plist +++ b/nextstep/GNUstep/Emacs.base/Resources/Info-gnustep.plist | |||
| @@ -7,9 +7,9 @@ | |||
| 7 | "Adrian Robert (GNUstep)", | 7 | "Adrian Robert (GNUstep)", |
| 8 | "Christophe de Dinechin (MacOS X)", | 8 | "Christophe de Dinechin (MacOS X)", |
| 9 | "Scott Bender (OpenStep)", | 9 | "Scott Bender (OpenStep)", |
| 10 | "Christian Limpach (NeXTStep)", | 10 | "Christian Limpach (NeXTstep)", |
| 11 | "Carl Edman (NeXTStep)", | 11 | "Carl Edman (NeXTstep)", |
| 12 | "..see http://emacs-app.sf.net/authorship.html" | 12 | "..see etc/NEXTSTEP" |
| 13 | ); | 13 | ); |
| 14 | Copyright = "Copyright (C) 2011 Free Software Foundation, Inc."; | 14 | Copyright = "Copyright (C) 2011 Free Software Foundation, Inc."; |
| 15 | CopyrightDescription = "Released under the GNU General Public License Version 3 or later"; | 15 | CopyrightDescription = "Released under the GNU General Public License Version 3 or later"; |
diff --git a/src/ChangeLog b/src/ChangeLog index 29514f03177..920355b1723 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -9,6 +9,18 @@ | |||
| 9 | (mouse_face_from_buffer_pos, note_mouse_highlight, expose_frame): | 9 | (mouse_face_from_buffer_pos, note_mouse_highlight, expose_frame): |
| 10 | Rename or move local decls. | 10 | Rename or move local decls. |
| 11 | 11 | ||
| 12 | 2011-03-06 Michael Shields <shields@msrl.com> (tiny change) | ||
| 13 | |||
| 14 | * window.c (Fnext_window): Doc fix. (Bug#5567) | ||
| 15 | |||
| 16 | 2011-03-05 Chong Yidong <cyd@stupidchicken.com> | ||
| 17 | |||
| 18 | * nsterm.m (ns_draw_window_cursor): Fix typo in 2011-02-23 commit. | ||
| 19 | |||
| 20 | 2011-03-02 Ken Brown <kbrown@cornell.edu> | ||
| 21 | |||
| 22 | * sheap.c (STATIC_HEAP_SIZE): Increase to 13MB. | ||
| 23 | |||
| 12 | 2011-03-02 Paul Eggert <eggert@cs.ucla.edu> | 24 | 2011-03-02 Paul Eggert <eggert@cs.ucla.edu> |
| 13 | 25 | ||
| 14 | Work around some portability problems with symlinks. | 26 | Work around some portability problems with symlinks. |
| @@ -32,7 +44,7 @@ | |||
| 32 | 44 | ||
| 33 | * msdos.c (readlink) [DJGPP < 2.04]: New stub function. | 45 | * msdos.c (readlink) [DJGPP < 2.04]: New stub function. |
| 34 | 46 | ||
| 35 | * msdos.h: (readlink) [DJGPP < 2.04]: Declare prototype. | 47 | * msdos.h (readlink) [DJGPP < 2.04]: Declare prototype. |
| 36 | 48 | ||
| 37 | * w32.c (symlink, readlink): New stub functions. | 49 | * w32.c (symlink, readlink): New stub functions. |
| 38 | 50 | ||
| @@ -1178,7 +1190,7 @@ | |||
| 1178 | (x_underline_at_descent_line): Remove declaration. | 1190 | (x_underline_at_descent_line): Remove declaration. |
| 1179 | (syms_of_nsterm): Remove & from DEFVAR_LISP and DEFVAR_BOOL. | 1191 | (syms_of_nsterm): Remove & from DEFVAR_LISP and DEFVAR_BOOL. |
| 1180 | 1192 | ||
| 1181 | * nsselect.m (Vns_sent_selection_hooks, Vns_lost_selection_hooks | 1193 | * nsselect.m (Vns_sent_selection_hooks, Vns_lost_selection_hooks) |
| 1182 | (Vselection_alist, Vselection_converter_alist): Move to globals.h. | 1194 | (Vselection_alist, Vselection_converter_alist): Move to globals.h. |
| 1183 | (syms_of_nsselect): Remove & from DEFVAR_LISP. | 1195 | (syms_of_nsselect): Remove & from DEFVAR_LISP. |
| 1184 | 1196 | ||
| @@ -2895,7 +2907,7 @@ | |||
| 2895 | (Qglyphless_char_display, Qhexa_code, Qempty_box, Qthin_space) | 2907 | (Qglyphless_char_display, Qhexa_code, Qempty_box, Qthin_space) |
| 2896 | (Qzero_width): New variables. | 2908 | (Qzero_width): New variables. |
| 2897 | (THIN_SPACE_WIDTH): New macro. | 2909 | (THIN_SPACE_WIDTH): New macro. |
| 2898 | (lookup_glyphless_char_display): New funciton. | 2910 | (lookup_glyphless_char_display): New function. |
| 2899 | (last_glyphless_glyph_frame, last_glyphless_glyph_face_id) | 2911 | (last_glyphless_glyph_frame, last_glyphless_glyph_face_id) |
| 2900 | (last_glyphless_glyph_merged_face_id): New variables. | 2912 | (last_glyphless_glyph_merged_face_id): New variables. |
| 2901 | (get_next_display_element): Check glyphless characters. | 2913 | (get_next_display_element): Check glyphless characters. |
| @@ -3181,7 +3193,7 @@ | |||
| 3181 | 2010-10-12 Jan Djärv <jan.h.d@swipnet.se> | 3193 | 2010-10-12 Jan Djärv <jan.h.d@swipnet.se> |
| 3182 | 3194 | ||
| 3183 | * nsterm.m (Qleft): Declare. | 3195 | * nsterm.m (Qleft): Declare. |
| 3184 | (ns_right_alternate_modifier): New variable | 3196 | (ns_right_alternate_modifier): New variable. |
| 3185 | (NSRightAlternateKeyMask): New define. | 3197 | (NSRightAlternateKeyMask): New define. |
| 3186 | (EV_MODIFIERS): Parse NSRightAlternateKeyMask if | 3198 | (EV_MODIFIERS): Parse NSRightAlternateKeyMask if |
| 3187 | ns_right_alternate_modifier isn't Qleft. | 3199 | ns_right_alternate_modifier isn't Qleft. |
| @@ -3205,7 +3217,7 @@ | |||
| 3205 | * Makefile.in (temacs): Use $(ALL_CFLAGS) on the link line. | 3217 | * Makefile.in (temacs): Use $(ALL_CFLAGS) on the link line. |
| 3206 | (PROFILING_LDFLAGS): Remove, not needed anymore. | 3218 | (PROFILING_LDFLAGS): Remove, not needed anymore. |
| 3207 | 3219 | ||
| 3208 | * Makefile.in: Use $(...) everywhere instead of ${...} | 3220 | * Makefile.in: Use $(...) everywhere instead of ${...}. |
| 3209 | (CRT_DIR): Move near potential user. | 3221 | (CRT_DIR): Move near potential user. |
| 3210 | (START_FILE): Move near CRT_DIR, it might use it. | 3222 | (START_FILE): Move near CRT_DIR, it might use it. |
| 3211 | 3223 | ||
| @@ -6142,7 +6154,7 @@ | |||
| 6142 | 6154 | ||
| 6143 | * eval.c: Fix indentation problem. | 6155 | * eval.c: Fix indentation problem. |
| 6144 | 6156 | ||
| 6145 | * keyboard.c: Include "process.h" | 6157 | * keyboard.c: Include "process.h". |
| 6146 | 6158 | ||
| 6147 | * eval.c: Remove obsolete noinline declaration. | 6159 | * eval.c: Remove obsolete noinline declaration. |
| 6148 | * fns.c: Likewise. | 6160 | * fns.c: Likewise. |
| @@ -8548,7 +8560,7 @@ | |||
| 8548 | Qtool_bar_style. Initialize current_tool_bar_style to nil. | 8560 | Qtool_bar_style. Initialize current_tool_bar_style to nil. |
| 8549 | defsubr Stool_bar_get_system_style. Fprovide on | 8561 | defsubr Stool_bar_get_system_style. Fprovide on |
| 8550 | dynamic-setting. | 8562 | dynamic-setting. |
| 8551 | Move misplaced HAVE_GCONF | 8563 | Move misplaced HAVE_GCONF. |
| 8552 | 8564 | ||
| 8553 | * xsettings.h (Ftool_bar_get_system_style): Declare. | 8565 | * xsettings.h (Ftool_bar_get_system_style): Declare. |
| 8554 | 8566 | ||
diff --git a/src/config.in b/src/config.in index 4e49b4df170..7f33727c0b1 100644 --- a/src/config.in +++ b/src/config.in | |||
| @@ -1203,9 +1203,6 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 1203 | # define __restrict__ | 1203 | # define __restrict__ |
| 1204 | #endif | 1204 | #endif |
| 1205 | 1205 | ||
| 1206 | /* Define to `unsigned int' if <sys/types.h> does not define. */ | ||
| 1207 | #undef size_t | ||
| 1208 | |||
| 1209 | /* Define to any substitute for sys_siglist. */ | 1206 | /* Define to any substitute for sys_siglist. */ |
| 1210 | #undef sys_siglist | 1207 | #undef sys_siglist |
| 1211 | 1208 | ||
diff --git a/src/nsterm.m b/src/nsterm.m index 8e77c89c3f7..cc2c4cf9807 100644 --- a/src/nsterm.m +++ b/src/nsterm.m | |||
| @@ -189,7 +189,7 @@ static NSMutableArray *ns_pending_files, *ns_pending_service_names, | |||
| 189 | *ns_pending_service_args; | 189 | *ns_pending_service_args; |
| 190 | static BOOL inNsSelect = 0; | 190 | static BOOL inNsSelect = 0; |
| 191 | 191 | ||
| 192 | /* Convert modifiers in a NeXTSTEP event to emacs style modifiers. */ | 192 | /* Convert modifiers in a NeXTstep event to emacs style modifiers. */ |
| 193 | #define NS_FUNCTION_KEY_MASK 0x800000 | 193 | #define NS_FUNCTION_KEY_MASK 0x800000 |
| 194 | #define NSLeftControlKeyMask (0x000001 | NSControlKeyMask) | 194 | #define NSLeftControlKeyMask (0x000001 | NSControlKeyMask) |
| 195 | #define NSRightControlKeyMask (0x002000 | NSControlKeyMask) | 195 | #define NSRightControlKeyMask (0x002000 | NSControlKeyMask) |
| @@ -2282,9 +2282,8 @@ ns_draw_window_cursor (struct window *w, struct glyph_row *glyph_row, | |||
| 2282 | to the glyph width; replace with CURSOR_WIDTH for bar cursors. */ | 2282 | to the glyph width; replace with CURSOR_WIDTH for bar cursors. */ |
| 2283 | if (cursor_type == BAR_CURSOR || cursor_type == HBAR_CURSOR) | 2283 | if (cursor_type == BAR_CURSOR || cursor_type == HBAR_CURSOR) |
| 2284 | { | 2284 | { |
| 2285 | if (cursor_width < 0) | 2285 | if (cursor_width < 1) |
| 2286 | cursor_width = FRAME_CURSOR_WIDTH (f); | 2286 | cursor_width = max (FRAME_CURSOR_WIDTH (f), 1); |
| 2287 | cursor_width = min (cursor_width, 1); | ||
| 2288 | w->phys_cursor_width = cursor_width; | 2287 | w->phys_cursor_width = cursor_width; |
| 2289 | } | 2288 | } |
| 2290 | 2289 | ||
diff --git a/src/sheap.c b/src/sheap.c index 65fbab538bb..31414fbe5c6 100644 --- a/src/sheap.c +++ b/src/sheap.c | |||
| @@ -25,7 +25,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 25 | 25 | ||
| 26 | #include <unistd.h> | 26 | #include <unistd.h> |
| 27 | 27 | ||
| 28 | #define STATIC_HEAP_SIZE (12 * 1024 * 1024) | 28 | #define STATIC_HEAP_SIZE (13 * 1024 * 1024) |
| 29 | 29 | ||
| 30 | int debug_sheap = 0; | 30 | int debug_sheap = 0; |
| 31 | 31 | ||
diff --git a/src/window.c b/src/window.c index 7965269f0e7..7c55be972b2 100644 --- a/src/window.c +++ b/src/window.c | |||
| @@ -1769,8 +1769,10 @@ window_list (void) | |||
| 1769 | 1769 | ||
| 1770 | ALL_FRAMES t means search all frames, | 1770 | ALL_FRAMES t means search all frames, |
| 1771 | nil means search just current frame, | 1771 | nil means search just current frame, |
| 1772 | `visible' means search just visible frames, | 1772 | `visible' means search just visible frames on the |
| 1773 | 0 means search visible and iconified frames, | 1773 | current terminal, |
| 1774 | 0 means search visible and iconified frames on the | ||
| 1775 | current terminal, | ||
| 1774 | a window means search the frame that window belongs to, | 1776 | a window means search the frame that window belongs to, |
| 1775 | a frame means consider windows on that frame, only. */ | 1777 | a frame means consider windows on that frame, only. */ |
| 1776 | 1778 | ||
| @@ -1836,8 +1838,8 @@ candidate_window_p (Lisp_Object window, Lisp_Object owindow, Lisp_Object minibuf | |||
| 1836 | 1838 | ||
| 1837 | 1839 | ||
| 1838 | /* Decode arguments as allowed by Fnext_window, Fprevious_window, and | 1840 | /* Decode arguments as allowed by Fnext_window, Fprevious_window, and |
| 1839 | Fwindow_list. See there for the meaning of WINDOW, MINIBUF, and | 1841 | Fwindow_list. See candidate_window_p for the meaning of WINDOW, |
| 1840 | ALL_FRAMES. */ | 1842 | MINIBUF, and ALL_FRAMES. */ |
| 1841 | 1843 | ||
| 1842 | static void | 1844 | static void |
| 1843 | decode_next_window_args (Lisp_Object *window, Lisp_Object *minibuf, Lisp_Object *all_frames) | 1845 | decode_next_window_args (Lisp_Object *window, Lisp_Object *minibuf, Lisp_Object *all_frames) |
| @@ -1871,12 +1873,6 @@ decode_next_window_args (Lisp_Object *window, Lisp_Object *minibuf, Lisp_Object | |||
| 1871 | ; | 1873 | ; |
| 1872 | else if (!EQ (*all_frames, Qt)) | 1874 | else if (!EQ (*all_frames, Qt)) |
| 1873 | *all_frames = Qnil; | 1875 | *all_frames = Qnil; |
| 1874 | |||
| 1875 | /* Now *ALL_FRAMES is t meaning search all frames, nil meaning | ||
| 1876 | search just current frame, `visible' meaning search just visible | ||
| 1877 | frames, 0 meaning search visible and iconified frames, or a | ||
| 1878 | window, meaning search the frame that window belongs to, or a | ||
| 1879 | frame, meaning consider windows on that frame, only. */ | ||
| 1880 | } | 1876 | } |
| 1881 | 1877 | ||
| 1882 | 1878 | ||
| @@ -1974,9 +1970,9 @@ ALL-FRAMES nil or omitted means consider all windows on WINDOW's | |||
| 1974 | windows on all frames that share that minibuffer too. | 1970 | windows on all frames that share that minibuffer too. |
| 1975 | ALL-FRAMES t means consider all windows on all existing frames. | 1971 | ALL-FRAMES t means consider all windows on all existing frames. |
| 1976 | ALL-FRAMES `visible' means consider all windows on all visible | 1972 | ALL-FRAMES `visible' means consider all windows on all visible |
| 1977 | frames. | 1973 | frames on the current terminal. |
| 1978 | ALL-FRAMES 0 means consider all windows on all visible and | 1974 | ALL-FRAMES 0 means consider all windows on all visible and |
| 1979 | iconified frames. | 1975 | iconified frames on the current terminal. |
| 1980 | ALL-FRAMES a frame means consider all windows on that frame only. | 1976 | ALL-FRAMES a frame means consider all windows on that frame only. |
| 1981 | Anything else means consider all windows on WINDOW's frame and no | 1977 | Anything else means consider all windows on WINDOW's frame and no |
| 1982 | others. | 1978 | others. |
diff --git a/test/ChangeLog b/test/ChangeLog index dbfc6c6cefe..b247b88bc94 100644 --- a/test/ChangeLog +++ b/test/ChangeLog | |||
| @@ -1,3 +1,12 @@ | |||
| 1 | 2011-03-05 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * eshell.el: Move here from lisp/eshell/esh-test.el. | ||
| 4 | |||
| 5 | 2011-03-03 Christian Ohler <ohler@gnu.org> | ||
| 6 | |||
| 7 | * automated/ert-tests.el (ert-test-explain-not-equal-keymaps): | ||
| 8 | New test. | ||
| 9 | |||
| 1 | 2011-02-20 Ulf Jasper <ulf.jasper@web.de> | 10 | 2011-02-20 Ulf Jasper <ulf.jasper@web.de> |
| 2 | 11 | ||
| 3 | * automated/icalendar-tests.el: Move from icalendar-testsuite.el; | 12 | * automated/icalendar-tests.el: Move from icalendar-testsuite.el; |
diff --git a/test/automated/ert-tests.el b/test/automated/ert-tests.el index b6d70dee7e2..cea994f64b8 100644 --- a/test/automated/ert-tests.el +++ b/test/automated/ert-tests.el | |||
| @@ -796,27 +796,32 @@ This macro is used to test if macroexpansion in `should' works." | |||
| 796 | (should (equal (ert--string-first-line "foo\nbar") "foo")) | 796 | (should (equal (ert--string-first-line "foo\nbar") "foo")) |
| 797 | (should (equal (ert--string-first-line " foo\nbar\nbaz\n") " foo"))) | 797 | (should (equal (ert--string-first-line " foo\nbar\nbaz\n") " foo"))) |
| 798 | 798 | ||
| 799 | (ert-deftest ert-test-explain-not-equal () | 799 | (ert-deftest ert-test-explain-equal () |
| 800 | (should (equal (ert--explain-not-equal nil 'foo) | 800 | (should (equal (ert--explain-equal nil 'foo) |
| 801 | '(different-atoms nil foo))) | 801 | '(different-atoms nil foo))) |
| 802 | (should (equal (ert--explain-not-equal '(a a) '(a b)) | 802 | (should (equal (ert--explain-equal '(a a) '(a b)) |
| 803 | '(list-elt 1 (different-atoms a b)))) | 803 | '(list-elt 1 (different-atoms a b)))) |
| 804 | (should (equal (ert--explain-not-equal '(1 48) '(1 49)) | 804 | (should (equal (ert--explain-equal '(1 48) '(1 49)) |
| 805 | '(list-elt 1 (different-atoms (48 "#x30" "?0") | 805 | '(list-elt 1 (different-atoms (48 "#x30" "?0") |
| 806 | (49 "#x31" "?1"))))) | 806 | (49 "#x31" "?1"))))) |
| 807 | (should (equal (ert--explain-not-equal 'nil '(a)) | 807 | (should (equal (ert--explain-equal 'nil '(a)) |
| 808 | '(different-types nil (a)))) | 808 | '(different-types nil (a)))) |
| 809 | (should (equal (ert--explain-not-equal '(a b c) '(a b c d)) | 809 | (should (equal (ert--explain-equal '(a b c) '(a b c d)) |
| 810 | '(proper-lists-of-different-length 3 4 (a b c) (a b c d) | 810 | '(proper-lists-of-different-length 3 4 (a b c) (a b c d) |
| 811 | first-mismatch-at 3))) | 811 | first-mismatch-at 3))) |
| 812 | (let ((sym (make-symbol "a"))) | 812 | (let ((sym (make-symbol "a"))) |
| 813 | (should (equal (ert--explain-not-equal 'a sym) | 813 | (should (equal (ert--explain-equal 'a sym) |
| 814 | `(different-symbols-with-the-same-name a ,sym))))) | 814 | `(different-symbols-with-the-same-name a ,sym))))) |
| 815 | 815 | ||
| 816 | (ert-deftest ert-test-explain-not-equal-improper-list () | 816 | (ert-deftest ert-test-explain-equal-improper-list () |
| 817 | (should (equal (ert--explain-not-equal '(a . b) '(a . c)) | 817 | (should (equal (ert--explain-equal '(a . b) '(a . c)) |
| 818 | '(cdr (different-atoms b c))))) | 818 | '(cdr (different-atoms b c))))) |
| 819 | 819 | ||
| 820 | (ert-deftest ert-test-explain-equal-keymaps () | ||
| 821 | ;; This used to be very slow. | ||
| 822 | (should (equal (make-keymap) (make-keymap))) | ||
| 823 | (should (equal (make-sparse-keymap) (make-sparse-keymap)))) | ||
| 824 | |||
| 820 | (ert-deftest ert-test-significant-plist-keys () | 825 | (ert-deftest ert-test-significant-plist-keys () |
| 821 | (should (equal (ert--significant-plist-keys '()) '())) | 826 | (should (equal (ert--significant-plist-keys '()) '())) |
| 822 | (should (equal (ert--significant-plist-keys '(a b c d e f c g p q r nil s t)) | 827 | (should (equal (ert--significant-plist-keys '(a b c d e f c g p q r nil s t)) |
| @@ -852,21 +857,21 @@ This macro is used to test if macroexpansion in `should' works." | |||
| 852 | (should (equal (ert--abbreviate-string "bar" 1 t) "r")) | 857 | (should (equal (ert--abbreviate-string "bar" 1 t) "r")) |
| 853 | (should (equal (ert--abbreviate-string "bar" 0 t) ""))) | 858 | (should (equal (ert--abbreviate-string "bar" 0 t) ""))) |
| 854 | 859 | ||
| 855 | (ert-deftest ert-test-explain-not-equal-string-properties () | 860 | (ert-deftest ert-test-explain-equal-string-properties () |
| 856 | (should | 861 | (should |
| 857 | (equal (ert--explain-not-equal-including-properties #("foo" 0 1 (a b)) | 862 | (equal (ert--explain-equal-including-properties #("foo" 0 1 (a b)) |
| 858 | "foo") | 863 | "foo") |
| 859 | '(char 0 "f" | 864 | '(char 0 "f" |
| 860 | (different-properties-for-key a (different-atoms b nil)) | 865 | (different-properties-for-key a (different-atoms b nil)) |
| 861 | context-before "" | 866 | context-before "" |
| 862 | context-after "oo"))) | 867 | context-after "oo"))) |
| 863 | (should (equal (ert--explain-not-equal-including-properties | 868 | (should (equal (ert--explain-equal-including-properties |
| 864 | #("foo" 1 3 (a b)) | 869 | #("foo" 1 3 (a b)) |
| 865 | #("goo" 0 1 (c d))) | 870 | #("goo" 0 1 (c d))) |
| 866 | '(array-elt 0 (different-atoms (?f "#x66" "?f") | 871 | '(array-elt 0 (different-atoms (?f "#x66" "?f") |
| 867 | (?g "#x67" "?g"))))) | 872 | (?g "#x67" "?g"))))) |
| 868 | (should | 873 | (should |
| 869 | (equal (ert--explain-not-equal-including-properties | 874 | (equal (ert--explain-equal-including-properties |
| 870 | #("foo" 0 1 (a b c d) 1 3 (a b)) | 875 | #("foo" 0 1 (a b c d) 1 3 (a b)) |
| 871 | #("foo" 0 1 (c d a b) 1 2 (a foo))) | 876 | #("foo" 0 1 (c d a b) 1 2 (a foo))) |
| 872 | '(char 1 "o" (different-properties-for-key a (different-atoms b foo)) | 877 | '(char 1 "o" (different-properties-for-key a (different-atoms b foo)) |
diff --git a/lisp/eshell/esh-test.el b/test/eshell.el index f5c55dd8ae7..3b392e84c24 100644 --- a/lisp/eshell/esh-test.el +++ b/test/eshell.el | |||
| @@ -28,6 +28,7 @@ | |||
| 28 | ;;; Code: | 28 | ;;; Code: |
| 29 | 29 | ||
| 30 | (eval-when-compile | 30 | (eval-when-compile |
| 31 | (require 'cl) ; assert | ||
| 31 | (require 'eshell) | 32 | (require 'eshell) |
| 32 | (require 'esh-util)) | 33 | (require 'esh-util)) |
| 33 | (require 'esh-mode) | 34 | (require 'esh-mode) |
| @@ -166,9 +167,9 @@ | |||
| 166 | (insert "Testing Eshell under " (emacs-version)) | 167 | (insert "Testing Eshell under " (emacs-version)) |
| 167 | (switch-to-buffer test-buffer) | 168 | (switch-to-buffer test-buffer) |
| 168 | (delete-other-windows)) | 169 | (delete-other-windows)) |
| 169 | (eshell-for funcname (sort (all-completions "eshell-test--" | 170 | (dolist (funcname (sort (all-completions "eshell-test--" |
| 170 | obarray 'functionp) | 171 | obarray 'functionp) |
| 171 | 'string-lessp) | 172 | 'string-lessp)) |
| 172 | (with-current-buffer test-buffer | 173 | (with-current-buffer test-buffer |
| 173 | (insert "\n")) | 174 | (insert "\n")) |
| 174 | (funcall (intern-soft funcname))) | 175 | (funcall (intern-soft funcname))) |
| @@ -228,6 +229,193 @@ | |||
| 228 | "\n")))) | 229 | "\n")))) |
| 229 | nil t)) | 230 | nil t)) |
| 230 | 231 | ||
| 232 | |||
| 233 | ;;; The tests. | ||
| 234 | |||
| 235 | (defmacro eshell-deftest (module name label &rest forms) | ||
| 236 | (declare (indent 2)) | ||
| 237 | (if (and (fboundp 'cl-compiling-file) (cl-compiling-file)) | ||
| 238 | nil | ||
| 239 | (let ((fsym (intern (concat "eshell-test--" (symbol-name name))))) | ||
| 240 | `(eval-when-compile | ||
| 241 | (ignore | ||
| 242 | (defun ,fsym () ,label | ||
| 243 | (eshell-run-test (quote ,module) (quote ,fsym) ,label | ||
| 244 | (quote (progn ,@forms))))))))) | ||
| 245 | |||
| 246 | |||
| 247 | (eshell-deftest mode same-window-buffer-names | ||
| 248 | "`eshell-buffer-name' is a member of `same-window-buffer-names'" | ||
| 249 | (member eshell-buffer-name same-window-buffer-names)) | ||
| 250 | |||
| 251 | (eshell-deftest mode eshell-directory-exists | ||
| 252 | "`eshell-directory-name' exists and is writable" | ||
| 253 | (file-writable-p eshell-directory-name)) | ||
| 254 | |||
| 255 | (eshell-deftest mode eshell-directory-modes | ||
| 256 | "`eshell-directory-name' has correct access protections" | ||
| 257 | (or (eshell-under-windows-p) | ||
| 258 | (= (file-modes eshell-directory-name) | ||
| 259 | eshell-private-directory-modes))) | ||
| 260 | |||
| 261 | (eshell-deftest mode simple-command-result | ||
| 262 | "`eshell-command-result' works with a simple command." | ||
| 263 | (= (eshell-command-result "+ 1 2") 3)) | ||
| 264 | |||
| 265 | |||
| 266 | (require 'em-banner) | ||
| 267 | |||
| 268 | (eshell-deftest banner banner-displayed | ||
| 269 | "Startup banner is displayed at point-min" | ||
| 270 | (assert eshell-banner-message) | ||
| 271 | (let ((msg (eval eshell-banner-message))) | ||
| 272 | (assert msg) | ||
| 273 | (goto-char (point-min)) | ||
| 274 | (looking-at msg))) | ||
| 275 | |||
| 276 | |||
| 277 | (require 'esh-cmd) | ||
| 278 | |||
| 279 | (eshell-deftest var last-result-var | ||
| 280 | "\"last result\" variable" | ||
| 281 | (eshell-command-result-p "+ 1 2; + $$ 2" "3\n5\n")) | ||
| 282 | |||
| 283 | (eshell-deftest var last-result-var2 | ||
| 284 | "\"last result\" variable" | ||
| 285 | (eshell-command-result-p "+ 1 2; + $$ $$" "3\n6\n")) | ||
| 286 | |||
| 287 | (eshell-deftest var last-arg-var | ||
| 288 | "\"last arg\" variable" | ||
| 289 | (eshell-command-result-p "+ 1 2; + $_ 4" "3\n6\n")) | ||
| 290 | |||
| 291 | (eshell-deftest cmd lisp-command | ||
| 292 | "Evaluate Lisp command" | ||
| 293 | (eshell-command-result-p "(+ 1 2)" "3")) | ||
| 294 | |||
| 295 | (eshell-deftest cmd lisp-command-args | ||
| 296 | "Evaluate Lisp command (ignore args)" | ||
| 297 | (eshell-command-result-p "(+ 1 2) 3" "3")) | ||
| 298 | |||
| 299 | (eshell-deftest cmd subcommand | ||
| 300 | "Run subcommand" | ||
| 301 | (eshell-command-result-p "{+ 1 2}" "3\n")) | ||
| 302 | |||
| 303 | (eshell-deftest cmd subcommand-args | ||
| 304 | "Run subcommand (ignore args)" | ||
| 305 | (eshell-command-result-p "{+ 1 2} 3" "3\n")) | ||
| 306 | |||
| 307 | (eshell-deftest cmd subcommand-lisp | ||
| 308 | "Run subcommand + Lisp form" | ||
| 309 | (eshell-command-result-p "{(+ 1 2)}" "3\n")) | ||
| 310 | |||
| 311 | (eshell-deftest cmd named-command | ||
| 312 | "Execute named command" | ||
| 313 | (eshell-command-result-p "+ 1 2" "3\n")) | ||
| 314 | |||
| 315 | |||
| 316 | (require 'esh-mode) | ||
| 317 | |||
| 318 | (eshell-deftest mode major-mode | ||
| 319 | "Major mode is correct" | ||
| 320 | (eq major-mode 'eshell-mode)) | ||
| 321 | |||
| 322 | (eshell-deftest mode eshell-mode-variable | ||
| 323 | "`eshell-mode' is true" | ||
| 324 | (eq eshell-mode t)) | ||
| 325 | |||
| 326 | (eshell-deftest var window-height | ||
| 327 | "LINES equals window height" | ||
| 328 | (let ((eshell-stringify-t t)) | ||
| 329 | (eshell-command-result-p "= $LINES (window-height)" "t\n"))) | ||
| 330 | |||
| 331 | (eshell-deftest mode command-running-p | ||
| 332 | "Modeline shows no command running" | ||
| 333 | (or (featurep 'xemacs) | ||
| 334 | (not eshell-status-in-modeline) | ||
| 335 | (and (memq 'eshell-command-running-string mode-line-format) | ||
| 336 | (equal eshell-command-running-string "--")))) | ||
| 337 | |||
| 338 | (eshell-deftest arg forward-arg | ||
| 339 | "Move across command arguments" | ||
| 340 | (eshell-insert-command "echo $(+ 1 (- 4 3)) \"alpha beta\" file" 'ignore) | ||
| 341 | (let ((here (point)) begin valid) | ||
| 342 | (eshell-bol) | ||
| 343 | (setq begin (point)) | ||
| 344 | (eshell-forward-argument 4) | ||
| 345 | (setq valid (= here (point))) | ||
| 346 | (eshell-backward-argument 4) | ||
| 347 | (prog1 | ||
| 348 | (and valid (= begin (point))) | ||
| 349 | (eshell-bol) | ||
| 350 | (delete-region (point) (point-max))))) | ||
| 351 | |||
| 352 | (eshell-deftest mode queue-input | ||
| 353 | "Queue command input" | ||
| 354 | (eshell-insert-command "sleep 2") | ||
| 355 | (eshell-insert-command "echo alpha" 'eshell-queue-input) | ||
| 356 | (let ((count 10)) | ||
| 357 | (while (and eshell-current-command | ||
| 358 | (> count 0)) | ||
| 359 | (sit-for 1 0) | ||
| 360 | (setq count (1- count)))) | ||
| 361 | (eshell-match-result "alpha\n")) | ||
| 362 | |||
| 363 | ; (eshell-deftest proc send-to-subprocess | ||
| 364 | ; "Send input to a subprocess" | ||
| 365 | ; ;; jww (1999-12-06): what about when bc is unavailable? | ||
| 366 | ; (if (not (eshell-search-path "bc")) | ||
| 367 | ; t | ||
| 368 | ; (eshell-insert-command "bc") | ||
| 369 | ; (eshell-insert-command "1 + 2") | ||
| 370 | ; (sit-for 1 0) | ||
| 371 | ; (forward-line -1) | ||
| 372 | ; (prog1 | ||
| 373 | ; (looking-at "3\n") | ||
| 374 | ; (eshell-insert-command "quit") | ||
| 375 | ; (sit-for 1 0)))) | ||
| 376 | |||
| 377 | (eshell-deftest io flush-output | ||
| 378 | "Flush previous output" | ||
| 379 | (eshell-insert-command "echo alpha") | ||
| 380 | (eshell-kill-output) | ||
| 381 | (and (eshell-match-result (regexp-quote "*** output flushed ***\n")) | ||
| 382 | (forward-line) | ||
| 383 | (= (point) eshell-last-output-start))) | ||
| 384 | |||
| 385 | (eshell-deftest mode run-old-command | ||
| 386 | "Re-run an old command" | ||
| 387 | (eshell-insert-command "echo alpha") | ||
| 388 | (goto-char eshell-last-input-start) | ||
| 389 | (string= (eshell-get-old-input) "echo alpha")) | ||
| 390 | |||
| 391 | |||
| 392 | (require 'esh-var) | ||
| 393 | |||
| 394 | (eshell-deftest var interp-cmd | ||
| 395 | "Interpolate command result" | ||
| 396 | (eshell-command-result-p "+ ${+ 1 2} 3" "6\n")) | ||
| 397 | |||
| 398 | (eshell-deftest var interp-lisp | ||
| 399 | "Interpolate Lisp form evalution" | ||
| 400 | (eshell-command-result-p "+ $(+ 1 2) 3" "6\n")) | ||
| 401 | |||
| 402 | (eshell-deftest var interp-concat | ||
| 403 | "Interpolate and concat command" | ||
| 404 | (eshell-command-result-p "+ ${+ 1 2}3 3" "36\n")) | ||
| 405 | |||
| 406 | (eshell-deftest var interp-concat-lisp | ||
| 407 | "Interpolate and concat Lisp form" | ||
| 408 | (eshell-command-result-p "+ $(+ 1 2)3 3" "36\n")) | ||
| 409 | |||
| 410 | (eshell-deftest var interp-concat2 | ||
| 411 | "Interpolate and concat two commands" | ||
| 412 | (eshell-command-result-p "+ ${+ 1 2}${+ 1 2} 3" "36\n")) | ||
| 413 | |||
| 414 | (eshell-deftest var interp-concat-lisp2 | ||
| 415 | "Interpolate and concat two Lisp forms" | ||
| 416 | (eshell-command-result-p "+ $(+ 1 2)$(+ 1 2) 3" "36\n")) | ||
| 417 | |||
| 418 | |||
| 231 | (provide 'esh-test) | 419 | (provide 'esh-test) |
| 232 | 420 | ||
| 233 | ;;; esh-test.el ends here | 421 | ;;; esh-test.el ends here |