# HG changeset patch # User cvs # Date 1186994804 -7200 # Node ID 19dcec79938549e5ae8f943c0031360bf9d37041 # Parent 73c75c43c1f2e8d263c549f27f1c5b9cff2c66a0 Import from CVS: tag r21-0-58 diff -r 73c75c43c1f2 -r 19dcec799385 CHANGES-beta --- a/CHANGES-beta Mon Aug 13 10:46:01 2007 +0200 +++ b/CHANGES-beta Mon Aug 13 10:46:44 2007 +0200 @@ -1,4 +1,37 @@ -*- indented-text -*- +to 21.0 "Pyrenean" +-- easymenu.el synch with FSF from Jan Vroonhof +-- chartable bug fixes from Hrvoje Niksic +-- Various MULE filenaming/localization bug fixes from Didier Verna +-- Linux/ARM support from James LewisMoss +-- Realpath fix for UnixWare2.1.3 from Takeshi Hagiwara +-- OSS Sound support for AIX from Michael Sperber +-- msw-faces X11 emulation fix from Adrian Aichner +-- Wnn6 detection fix from IENAGA Kazuyuki +-- More Cygwin b20 from Andy Piper +-- 64 bit cleanliness fix from Olivier Galibert +-- Package-get updates from Jan Vroonhof and Greg Klanderman +-- Movemail build fix for MS Windows NT from Andy Piper +-- Clicking on buttons not switching windows patch from Hrvoje Niksic +-- Cygwin b20 support from Andy Piper +-- Autoload cookie fix for cus-face.el from Jan Vroonhof +-- Frame resize inside window fix for MS Windows from Andy Piper +-- Type clean up patches from Steve Carney +-- movemail pop patches from Andy Piper +-- Fix auto-save-directory-fallback hardcoding at dump time from Jan Vroonhof +-- Package loading fixes from Greg Klanderman +-- Package Tool Finishing Touches from Jan Vroonhof +-- package-get-base.el removed from the core +-- BS/DEL fix from Glynn Clements +-- Tty vertical divider width now defaults to 1 instead of 0 +-- MS Windows toolbar fixes from Jonathan Harris +-- Fix for XtDisplay being called with stale widget from Takeshi Hagiwara +-- Fixes for Cygwin b20 from Andy Piper +-- Package UI fetching improvements from Greg Klanderman +-- isearch regexp pruning bugfix from Hrvoje Niksic +-- package deletion fixes from Jan Vroonhof +-- gnuclient fix from Jan Vroonhof + to 21.0 "Poitou" -- port to Motif >= 2.0 -- help keymap fixes from Jan Vroonhof diff -r 73c75c43c1f2 -r 19dcec799385 ChangeLog --- a/ChangeLog Mon Aug 13 10:46:01 2007 +0200 +++ b/ChangeLog Mon Aug 13 10:46:44 2007 +0200 @@ -1,3 +1,42 @@ +1998-12-08 XEmacs Build Bot + + * XEmacs 21.0.58 is released + +1998-11-27 SL Baur + + * configure.in: Linux/Arm Support. + From James LewisMoss + +1998-11-27 Takeshi Hagiwara + + * configure.in: + Fix the realpath() problem of UnixWare2.1.3. + Patches for NEC's sysv4.2 machine. + +1998-11-09 Kazuyuki IENAGA + + * configure.in: Check if there's wnn4.2 or wnn6 specific library + installed. The Wnn library will be checked if the --with-wnn + and/or --with-wnn6 was specified compulsory. + +1998-10-13 Andy Piper + + * configure.in: enable drag and drop support by default if mswindows is + detected. + +1998-10-09 Kevin Oberman + + * config.sub: Fix for Alpha architecture + +1998-10-05 Andy Piper + + * configure.in: don't enable shared lib support for cygwin unless + explititly told to. + +1998-10-02 Andreas Jaeger + + * etc/xemacs.1: Remove misplace "\". + 1998-09-29 SL Baur * XEmacs 21.0-pre14 is released. @@ -135,7 +174,7 @@ * config.guess: Synched with latest FSF version. -1998-07-12 Björn Torkelsson +1998-07-12 Bjrn Torkelsson * Makefile.in: added LDFLAGS. diff -r 73c75c43c1f2 -r 19dcec799385 config.sub --- a/config.sub Mon Aug 13 10:46:01 2007 +0200 +++ b/config.sub Mon Aug 13 10:46:44 2007 +0200 @@ -158,7 +158,7 @@ | sparc-* | ns32k-* | fx80-* | arm-* | c[123]* \ | mips-* | pyramid-* | tron-* | a29k-* | romp-* | rs6000-* | power-* \ | none-* | 580-* | cray2-* | h8300-* | i960-* | xmp-* | ymp-* \ - | hppa1.0-* | hppa1.1-* | alpha-* | we32k-* | cydra-* | ns16k-* \ + | hppa1.0-* | hppa1.1-* | alpha*-* | we32k-* | cydra-* | ns16k-* \ | pn-* | np1-* | xps100-* | clipper-* | orion-* | sparclite-* \ | pdp11-* | sh-* | powerpc-* | powerpcle-* | sparc64-* | mips64-* | mipsel-* \ | mips64el-* | mips64orion-* | mips64orionel-* | mab-*) diff -r 73c75c43c1f2 -r 19dcec799385 configure --- a/configure Mon Aug 13 10:46:01 2007 +0200 +++ b/configure Mon Aug 13 10:46:44 2007 +0200 @@ -1242,6 +1242,12 @@ NON_GNU_CPP=/usr/ccs/lib/cpp ;; + mips-nec-sysv*) + machine=mips-nec + NON_GNU_CC=/usr/ccs/bin/cc + NON_GNU_CPP=/usr/ccs/lib/cpp + ;; + m68*-sgi-iris3.5* ) machine=irist opsys=iris3-5 ;; m68*-sgi-iris3.6* | m68*-sgi-iris*) machine=irist opsys=iris3-6 ;; mips-sgi-irix3.* ) opsys=irix3-3 ;; @@ -1469,7 +1475,7 @@ # Extract the first word of "gcc", so it can be a program name with args. set dummy gcc; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 -echo "configure:1473: checking for $ac_word" >&5 +echo "configure:1479: checking for $ac_word" >&5 if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. @@ -1495,7 +1501,7 @@ # Extract the first word of "cc", so it can be a program name with args. set dummy cc; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 -echo "configure:1499: checking for $ac_word" >&5 +echo "configure:1505: checking for $ac_word" >&5 if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. @@ -1540,7 +1546,7 @@ fi echo $ac_n "checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works""... $ac_c" 1>&6 -echo "configure:1544: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works" >&5 +echo "configure:1550: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works" >&5 ac_ext=c xe_cppflags='$CPPFLAGS $c_switch_site $c_switch_machine $c_switch_system $c_switch_x_site $X_CFLAGS' @@ -1552,11 +1558,11 @@ cross_compiling=no cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:1566: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then ac_cv_prog_cc_works=yes # If we can't run a trivial program, we are probably using a cross compiler. if (./conftest; exit) 2>/dev/null; then @@ -1576,19 +1582,19 @@ { echo "configure: error: installation or configuration problem: C compiler cannot create executables." 1>&2; exit 1; } fi echo $ac_n "checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler""... $ac_c" 1>&6 -echo "configure:1580: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler" >&5 +echo "configure:1586: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler" >&5 echo "$ac_t""$ac_cv_prog_cc_cross" 1>&6 cross_compiling=$ac_cv_prog_cc_cross echo $ac_n "checking whether we are using GNU C""... $ac_c" 1>&6 -echo "configure:1585: checking whether we are using GNU C" >&5 +echo "configure:1591: checking whether we are using GNU C" >&5 cat > conftest.c <&5; (eval $ac_try) 2>&5; }; } | egrep yes >/dev/null 2>&1; then +if { ac_try='${CC-cc} -E conftest.c'; { (eval echo configure:1598: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; }; } | egrep yes >/dev/null 2>&1; then ac_cv_prog_gcc=yes else ac_cv_prog_gcc=no @@ -1602,7 +1608,7 @@ ac_save_CFLAGS="$CFLAGS" CFLAGS= echo $ac_n "checking whether ${CC-cc} accepts -g""... $ac_c" 1>&6 -echo "configure:1606: checking whether ${CC-cc} accepts -g" >&5 +echo "configure:1612: checking whether ${CC-cc} accepts -g" >&5 echo 'void f(){}' > conftest.c if test -z "`${CC-cc} -g -c conftest.c 2>&1`"; then @@ -1631,7 +1637,7 @@ # Extract the first word of "gcc", so it can be a program name with args. set dummy gcc; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 -echo "configure:1635: checking for $ac_word" >&5 +echo "configure:1641: checking for $ac_word" >&5 if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. @@ -1657,7 +1663,7 @@ # Extract the first word of "cc", so it can be a program name with args. set dummy cc; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 -echo "configure:1661: checking for $ac_word" >&5 +echo "configure:1667: checking for $ac_word" >&5 if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. @@ -1702,7 +1708,7 @@ fi echo $ac_n "checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works""... $ac_c" 1>&6 -echo "configure:1706: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works" >&5 +echo "configure:1712: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works" >&5 ac_ext=c xe_cppflags='$CPPFLAGS $c_switch_site $c_switch_machine $c_switch_system $c_switch_x_site $X_CFLAGS' @@ -1714,11 +1720,11 @@ cross_compiling=no cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:1728: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then ac_cv_prog_cc_works=yes # If we can't run a trivial program, we are probably using a cross compiler. if (./conftest; exit) 2>/dev/null; then @@ -1738,19 +1744,19 @@ { echo "configure: error: installation or configuration problem: C compiler cannot create executables." 1>&2; exit 1; } fi echo $ac_n "checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler""... $ac_c" 1>&6 -echo "configure:1742: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler" >&5 +echo "configure:1748: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler" >&5 echo "$ac_t""$ac_cv_prog_cc_cross" 1>&6 cross_compiling=$ac_cv_prog_cc_cross echo $ac_n "checking whether we are using GNU C""... $ac_c" 1>&6 -echo "configure:1747: checking whether we are using GNU C" >&5 +echo "configure:1753: checking whether we are using GNU C" >&5 cat > conftest.c <&5; (eval $ac_try) 2>&5; }; } | egrep yes >/dev/null 2>&1; then +if { ac_try='${CC-cc} -E conftest.c'; { (eval echo configure:1760: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; }; } | egrep yes >/dev/null 2>&1; then ac_cv_prog_gcc=yes else ac_cv_prog_gcc=no @@ -1764,7 +1770,7 @@ ac_save_CFLAGS="$CFLAGS" CFLAGS= echo $ac_n "checking whether ${CC-cc} accepts -g""... $ac_c" 1>&6 -echo "configure:1768: checking whether ${CC-cc} accepts -g" >&5 +echo "configure:1774: checking whether ${CC-cc} accepts -g" >&5 echo 'void f(){}' > conftest.c if test -z "`${CC-cc} -g -c conftest.c 2>&1`"; then @@ -1793,7 +1799,7 @@ # Extract the first word of "gcc", so it can be a program name with args. set dummy gcc; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 -echo "configure:1797: checking for $ac_word" >&5 +echo "configure:1803: checking for $ac_word" >&5 if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. @@ -1819,7 +1825,7 @@ # Extract the first word of "cc", so it can be a program name with args. set dummy cc; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 -echo "configure:1823: checking for $ac_word" >&5 +echo "configure:1829: checking for $ac_word" >&5 if test -n "$CC"; then ac_cv_prog_CC="$CC" # Let the user override the test. @@ -1864,7 +1870,7 @@ fi echo $ac_n "checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works""... $ac_c" 1>&6 -echo "configure:1868: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works" >&5 +echo "configure:1874: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works" >&5 ac_ext=c xe_cppflags='$CPPFLAGS $c_switch_site $c_switch_machine $c_switch_system $c_switch_x_site $X_CFLAGS' @@ -1876,11 +1882,11 @@ cross_compiling=no cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:1890: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then ac_cv_prog_cc_works=yes # If we can't run a trivial program, we are probably using a cross compiler. if (./conftest; exit) 2>/dev/null; then @@ -1900,19 +1906,19 @@ { echo "configure: error: installation or configuration problem: C compiler cannot create executables." 1>&2; exit 1; } fi echo $ac_n "checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler""... $ac_c" 1>&6 -echo "configure:1904: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler" >&5 +echo "configure:1910: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler" >&5 echo "$ac_t""$ac_cv_prog_cc_cross" 1>&6 cross_compiling=$ac_cv_prog_cc_cross echo $ac_n "checking whether we are using GNU C""... $ac_c" 1>&6 -echo "configure:1909: checking whether we are using GNU C" >&5 +echo "configure:1915: checking whether we are using GNU C" >&5 cat > conftest.c <&5; (eval $ac_try) 2>&5; }; } | egrep yes >/dev/null 2>&1; then +if { ac_try='${CC-cc} -E conftest.c'; { (eval echo configure:1922: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; }; } | egrep yes >/dev/null 2>&1; then ac_cv_prog_gcc=yes else ac_cv_prog_gcc=no @@ -1926,7 +1932,7 @@ ac_save_CFLAGS="$CFLAGS" CFLAGS= echo $ac_n "checking whether ${CC-cc} accepts -g""... $ac_c" 1>&6 -echo "configure:1930: checking whether ${CC-cc} accepts -g" >&5 +echo "configure:1936: checking whether ${CC-cc} accepts -g" >&5 echo 'void f(){}' > conftest.c if test -z "`${CC-cc} -g -c conftest.c 2>&1`"; then @@ -1959,7 +1965,7 @@ test -n "$NON_GNU_CPP" -a "$GCC" != "yes" -a -z "$CPP" && CPP="$NON_GNU_CPP" echo $ac_n "checking how to run the C preprocessor""... $ac_c" 1>&6 -echo "configure:1963: checking how to run the C preprocessor" >&5 +echo "configure:1969: checking how to run the C preprocessor" >&5 # On Suns, sometimes $CPP names a directory. if test -n "$CPP" && test -d "$CPP"; then CPP= @@ -1972,13 +1978,13 @@ # On the NeXT, cc -E runs the code through the compiler's parser, # not just through cpp. cat > conftest.$ac_ext < Syntax Error EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:1982: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:1988: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then : @@ -1989,13 +1995,13 @@ rm -rf conftest* CPP="${CC-cc} -E -traditional-cpp" cat > conftest.$ac_ext < Syntax Error EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:1999: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:2005: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then : @@ -2018,9 +2024,9 @@ echo $ac_n "checking for AIX""... $ac_c" 1>&6 -echo "configure:2022: checking for AIX" >&5 -cat > conftest.$ac_ext <&5 +cat > conftest.$ac_ext <&6 -echo "configure:2051: checking for GNU libc" >&5 -cat > conftest.$ac_ext <&5 +cat > conftest.$ac_ext < int main() { @@ -2061,7 +2067,7 @@ ; return 0; } EOF -if { (eval echo configure:2065: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:2071: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* have_glibc=yes else @@ -2083,7 +2089,7 @@ cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:2105: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then : else @@ -2365,7 +2371,7 @@ fi echo $ac_n "checking for dynodump""... $ac_c" 1>&6 -echo "configure:2369: checking for dynodump" >&5 +echo "configure:2375: checking for dynodump" >&5 if test "$unexec" != "unexsol2.o"; then echo "$ac_t""no" 1>&6 else @@ -2403,12 +2409,12 @@ done echo $ac_n "checking for terminateAndUnload in -lC""... $ac_c" 1>&6 -echo "configure:2407: checking for terminateAndUnload in -lC" >&5 +echo "configure:2413: checking for terminateAndUnload in -lC" >&5 ac_lib_var=`echo C'_'terminateAndUnload | sed 'y%./+-%__p_%'` xe_check_libs=" -lC " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:2429: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -2503,7 +2509,7 @@ if test "$add_runtime_path" = "yes"; then echo $ac_n "checking "for runtime libraries flag"""... $ac_c" 1>&6 -echo "configure:2507: checking "for runtime libraries flag"" >&5 +echo "configure:2513: checking "for runtime libraries flag"" >&5 case "$opsys" in sol2 ) dash_r="-R" ;; decosf* | linux* ) dash_r="-rpath " ;; @@ -2525,14 +2531,14 @@ done fi cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +#line 2535 "configure" +#include "confdefs.h" + +int main() { + +; return 0; } +EOF +if { (eval echo configure:2542: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* dash_r="$try_dash_r" else @@ -2633,10 +2639,10 @@ fi after_morecore_hook_exists=yes echo $ac_n "checking for malloc_get_state""... $ac_c" 1>&6 -echo "configure:2637: checking for malloc_get_state" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:2669: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_malloc_get_state=yes" else @@ -2679,10 +2685,10 @@ fi echo $ac_n "checking for malloc_set_state""... $ac_c" 1>&6 -echo "configure:2683: checking for malloc_set_state" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:2715: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_malloc_set_state=yes" else @@ -2725,16 +2731,16 @@ fi echo $ac_n "checking whether __after_morecore_hook exists""... $ac_c" 1>&6 -echo "configure:2729: checking whether __after_morecore_hook exists" >&5 -cat > conftest.$ac_ext <&5 +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:2744: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* echo "$ac_t""yes" 1>&6 else @@ -2793,7 +2799,7 @@ # Extract the first word of "ranlib", so it can be a program name with args. set dummy ranlib; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 -echo "configure:2797: checking for $ac_word" >&5 +echo "configure:2803: checking for $ac_word" >&5 if test -n "$RANLIB"; then ac_cv_prog_RANLIB="$RANLIB" # Let the user override the test. @@ -2846,7 +2852,7 @@ # SVR4 /usr/ucb/install, which tries to use the nonexistent group "staff" # ./install, which can be erroneously created by make from ./install.sh. echo $ac_n "checking for a BSD compatible install""... $ac_c" 1>&6 -echo "configure:2850: checking for a BSD compatible install" >&5 +echo "configure:2856: checking for a BSD compatible install" >&5 if test -z "$INSTALL"; then IFS="${IFS= }"; ac_save_IFS="$IFS"; IFS="${IFS}:" @@ -2897,7 +2903,7 @@ # Extract the first word of "$ac_prog", so it can be a program name with args. set dummy $ac_prog; ac_word=$2 echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 -echo "configure:2901: checking for $ac_word" >&5 +echo "configure:2907: checking for $ac_word" >&5 if test -n "$YACC"; then ac_cv_prog_YACC="$YACC" # Let the user override the test. @@ -2928,15 +2934,15 @@ do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 -echo "configure:2932: checking for $ac_hdr" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:2940: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:2946: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -2965,19 +2971,19 @@ fi done -for ac_hdr in utime.h locale.h libgen.h fcntl.h ulimit.h cygwin32/version.h +for ac_hdr in utime.h locale.h libgen.h fcntl.h ulimit.h cygwin/version.h do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 -echo "configure:2973: checking for $ac_hdr" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:2981: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:2987: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -3010,15 +3016,15 @@ do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 -echo "configure:3014: checking for $ac_hdr" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:3022: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:3028: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -3048,10 +3054,10 @@ done echo $ac_n "checking for sys/wait.h that is POSIX.1 compatible""... $ac_c" 1>&6 -echo "configure:3052: checking for sys/wait.h that is POSIX.1 compatible" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < #include @@ -3067,7 +3073,7 @@ s = WIFEXITED (s) ? WEXITSTATUS (s) : 1; ; return 0; } EOF -if { (eval echo configure:3071: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:3077: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_header_sys_wait_h=yes else @@ -3091,10 +3097,10 @@ fi echo $ac_n "checking for ANSI C header files""... $ac_c" 1>&6 -echo "configure:3095: checking for ANSI C header files" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < #include @@ -3102,7 +3108,7 @@ #include EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:3106: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:3112: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -3119,7 +3125,7 @@ if test $ac_cv_header_stdc = yes; then # SunOS 4.x string.h does not declare mem*, contrary to ANSI. cat > conftest.$ac_ext < EOF @@ -3137,7 +3143,7 @@ if test $ac_cv_header_stdc = yes; then # ISC 2.0.2 stdlib.h does not declare free, contrary to ANSI. cat > conftest.$ac_ext < EOF @@ -3155,7 +3161,7 @@ if test $ac_cv_header_stdc = yes; then # /bin/cc in Irix-4.0.5 gets non-ANSI ctype macros unless using -ansi. cat > conftest.$ac_ext < #define ISLOWER(c) ('a' <= (c) && (c) <= 'z') @@ -3166,7 +3172,7 @@ exit (0); } EOF -if { (eval echo configure:3170: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:3176: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then : else @@ -3192,10 +3198,10 @@ fi echo $ac_n "checking whether time.h and sys/time.h may both be included""... $ac_c" 1>&6 -echo "configure:3196: checking whether time.h and sys/time.h may both be included" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < #include @@ -3204,7 +3210,7 @@ struct tm *tp; ; return 0; } EOF -if { (eval echo configure:3208: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:3214: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_header_time=yes else @@ -3228,10 +3234,10 @@ fi echo $ac_n "checking for sys_siglist declaration in signal.h or unistd.h""... $ac_c" 1>&6 -echo "configure:3232: checking for sys_siglist declaration in signal.h or unistd.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < #include @@ -3243,7 +3249,7 @@ char *msg = *(sys_siglist + 1); ; return 0; } EOF -if { (eval echo configure:3247: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:3253: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_decl_sys_siglist=yes else @@ -3268,9 +3274,9 @@ echo $ac_n "checking for struct utimbuf""... $ac_c" 1>&6 -echo "configure:3272: checking for struct utimbuf" >&5 -cat > conftest.$ac_ext <&5 +cat > conftest.$ac_ext < @@ -3289,7 +3295,7 @@ static struct utimbuf x; x.actime = x.modtime; ; return 0; } EOF -if { (eval echo configure:3293: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:3299: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* echo "$ac_t""yes" 1>&6 { test "$extra_verbose" = "yes" && cat << \EOF @@ -3309,10 +3315,10 @@ rm -f conftest* echo $ac_n "checking return type of signal handlers""... $ac_c" 1>&6 -echo "configure:3313: checking return type of signal handlers" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < #include @@ -3329,7 +3335,7 @@ int i; ; return 0; } EOF -if { (eval echo configure:3333: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:3339: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_type_signal=void else @@ -3351,10 +3357,10 @@ echo $ac_n "checking for size_t""... $ac_c" 1>&6 -echo "configure:3355: checking for size_t" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < #if STDC_HEADERS @@ -3385,10 +3391,10 @@ fi echo $ac_n "checking for pid_t""... $ac_c" 1>&6 -echo "configure:3389: checking for pid_t" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < #if STDC_HEADERS @@ -3419,10 +3425,10 @@ fi echo $ac_n "checking for uid_t in sys/types.h""... $ac_c" 1>&6 -echo "configure:3423: checking for uid_t in sys/types.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF @@ -3458,10 +3464,10 @@ fi echo $ac_n "checking for mode_t""... $ac_c" 1>&6 -echo "configure:3462: checking for mode_t" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < #if STDC_HEADERS @@ -3492,10 +3498,10 @@ fi echo $ac_n "checking for off_t""... $ac_c" 1>&6 -echo "configure:3496: checking for off_t" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < #if STDC_HEADERS @@ -3527,9 +3533,9 @@ echo $ac_n "checking for struct timeval""... $ac_c" 1>&6 -echo "configure:3531: checking for struct timeval" >&5 -cat > conftest.$ac_ext <&5 +cat > conftest.$ac_ext < @@ -3545,7 +3551,7 @@ static struct timeval x; x.tv_sec = x.tv_usec; ; return 0; } EOF -if { (eval echo configure:3549: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:3555: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* echo "$ac_t""yes" 1>&6 HAVE_TIMEVAL=yes @@ -3567,10 +3573,10 @@ rm -f conftest* echo $ac_n "checking whether struct tm is in sys/time.h or time.h""... $ac_c" 1>&6 -echo "configure:3571: checking whether struct tm is in sys/time.h or time.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < #include @@ -3578,7 +3584,7 @@ struct tm *tp; tp->tm_sec; ; return 0; } EOF -if { (eval echo configure:3582: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:3588: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_struct_tm=time.h else @@ -3602,10 +3608,10 @@ fi echo $ac_n "checking for tm_zone in struct tm""... $ac_c" 1>&6 -echo "configure:3606: checking for tm_zone in struct tm" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < #include <$ac_cv_struct_tm> @@ -3613,7 +3619,7 @@ struct tm tm; tm.tm_zone; ; return 0; } EOF -if { (eval echo configure:3617: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:3623: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_struct_tm_zone=yes else @@ -3636,10 +3642,10 @@ else echo $ac_n "checking for tzname""... $ac_c" 1>&6 -echo "configure:3640: checking for tzname" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < #ifndef tzname /* For SGI. */ @@ -3649,7 +3655,7 @@ atoi(*tzname); ; return 0; } EOF -if { (eval echo configure:3653: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:3659: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* ac_cv_var_tzname=yes else @@ -3675,10 +3681,10 @@ echo $ac_n "checking for working const""... $ac_c" 1>&6 -echo "configure:3679: checking for working const" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:3737: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_c_const=yes else @@ -3752,7 +3758,7 @@ echo $ac_n "checking whether ${MAKE-make} sets \${MAKE}""... $ac_c" 1>&6 -echo "configure:3756: checking whether ${MAKE-make} sets \${MAKE}" >&5 +echo "configure:3762: checking whether ${MAKE-make} sets \${MAKE}" >&5 set dummy ${MAKE-make}; ac_make=`echo "$2" | sed 'y%./+-%__p_%'` cat > conftestmake <<\EOF @@ -3777,12 +3783,12 @@ echo $ac_n "checking whether byte ordering is bigendian""... $ac_c" 1>&6 -echo "configure:3781: checking whether byte ordering is bigendian" >&5 +echo "configure:3787: checking whether byte ordering is bigendian" >&5 ac_cv_c_bigendian=unknown # See if sys/param.h defines the BYTE_ORDER macro. cat > conftest.$ac_ext < #include @@ -3793,11 +3799,11 @@ #endif ; return 0; } EOF -if { (eval echo configure:3797: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:3803: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* # It does; now see whether it defined to BIG_ENDIAN or not. cat > conftest.$ac_ext < #include @@ -3808,7 +3814,7 @@ #endif ; return 0; } EOF -if { (eval echo configure:3812: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:3818: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_c_bigendian=yes else @@ -3825,7 +3831,7 @@ rm -f conftest* if test $ac_cv_c_bigendian = unknown; then cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:3848: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ac_cv_c_bigendian=no else @@ -3865,10 +3871,10 @@ echo $ac_n "checking size of short""... $ac_c" 1>&6 -echo "configure:3869: checking size of short" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < main() @@ -3879,7 +3885,7 @@ exit(0); } EOF -if { (eval echo configure:3883: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:3889: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ac_cv_sizeof_short=`cat conftestval` else @@ -3907,10 +3913,10 @@ exit 1 fi echo $ac_n "checking size of int""... $ac_c" 1>&6 -echo "configure:3911: checking size of int" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < main() @@ -3921,7 +3927,7 @@ exit(0); } EOF -if { (eval echo configure:3925: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:3931: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ac_cv_sizeof_int=`cat conftestval` else @@ -3943,10 +3949,10 @@ echo $ac_n "checking size of long""... $ac_c" 1>&6 -echo "configure:3947: checking size of long" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < main() @@ -3957,7 +3963,7 @@ exit(0); } EOF -if { (eval echo configure:3961: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:3967: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ac_cv_sizeof_long=`cat conftestval` else @@ -3979,10 +3985,10 @@ echo $ac_n "checking size of long long""... $ac_c" 1>&6 -echo "configure:3983: checking size of long long" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < main() @@ -3993,7 +3999,7 @@ exit(0); } EOF -if { (eval echo configure:3997: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:4003: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ac_cv_sizeof_long_long=`cat conftestval` else @@ -4015,10 +4021,10 @@ echo $ac_n "checking size of void *""... $ac_c" 1>&6 -echo "configure:4019: checking size of void *" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < main() @@ -4029,7 +4035,7 @@ exit(0); } EOF -if { (eval echo configure:4033: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:4039: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ac_cv_sizeof_void_p=`cat conftestval` else @@ -4052,7 +4058,7 @@ echo $ac_n "checking for long file names""... $ac_c" 1>&6 -echo "configure:4056: checking for long file names" >&5 +echo "configure:4062: checking for long file names" >&5 ac_cv_sys_long_file_names=yes # Test for long file names in all the places we know might matter: @@ -4099,12 +4105,12 @@ echo $ac_n "checking for sin in -lm""... $ac_c" 1>&6 -echo "configure:4103: checking for sin in -lm" >&5 +echo "configure:4109: checking for sin in -lm" >&5 ac_lib_var=`echo m'_'sin | sed 'y%./+-%__p_%'` xe_check_libs=" -lm " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:4125: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -4157,14 +4163,14 @@ cat > conftest.$ac_ext < int main() { return atanh(1.0) + asinh(1.0) + acosh(1.0); ; return 0; } EOF -if { (eval echo configure:4168: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:4174: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* { test "$extra_verbose" = "yes" && cat << \EOF Defining HAVE_INVERSE_HYPERBOLIC @@ -4181,7 +4187,7 @@ rm -f conftest* echo "checking type of mail spool file locking" 1>&6 -echo "configure:4185: checking type of mail spool file locking" >&5 +echo "configure:4191: checking type of mail spool file locking" >&5 test -z "$mail_locking" -a "$mail_use_flock" = "yes" && mail_locking=flock test -z "$mail_locking" -a "$mail_use_lockf" = "yes" && mail_locking=lockf if test "$mail_locking" = "lockf"; then { test "$extra_verbose" = "yes" && cat << \EOF @@ -4205,12 +4211,12 @@ echo $ac_n "checking for kstat_open in -lkstat""... $ac_c" 1>&6 -echo "configure:4209: checking for kstat_open in -lkstat" >&5 +echo "configure:4215: checking for kstat_open in -lkstat" >&5 ac_lib_var=`echo kstat'_'kstat_open | sed 'y%./+-%__p_%'` xe_check_libs=" -lkstat " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:4231: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -4255,12 +4261,12 @@ echo $ac_n "checking for kvm_read in -lkvm""... $ac_c" 1>&6 -echo "configure:4259: checking for kvm_read in -lkvm" >&5 +echo "configure:4265: checking for kvm_read in -lkvm" >&5 ac_lib_var=`echo kvm'_'kvm_read | sed 'y%./+-%__p_%'` xe_check_libs=" -lkvm " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:4281: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -4306,12 +4312,12 @@ case "$opsys" in decosf*) echo $ac_n "checking for cma_open in -lpthreads""... $ac_c" 1>&6 -echo "configure:4310: checking for cma_open in -lpthreads" >&5 +echo "configure:4316: checking for cma_open in -lpthreads" >&5 ac_lib_var=`echo pthreads'_'cma_open | sed 'y%./+-%__p_%'` xe_check_libs=" -lpthreads " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:4332: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -4358,7 +4364,7 @@ esac echo $ac_n "checking whether the -xildoff compiler flag is required""... $ac_c" 1>&6 -echo "configure:4362: checking whether the -xildoff compiler flag is required" >&5 +echo "configure:4368: checking whether the -xildoff compiler flag is required" >&5 if ${CC-cc} '-###' -xildon no_such_file.c 2>&1 | grep '^[^ ]*/ild ' > /dev/null ; then if ${CC-cc} '-###' -xildoff no_such_file.c 2>&1 | grep '^[^ ]*/ild ' > /dev/null ; then echo "$ac_t""no" 1>&6; @@ -4369,7 +4375,7 @@ if test "$opsys" = "sol2" && test "$OS_RELEASE" -ge 56; then echo $ac_n "checking for \"-z ignore\" linker flag""... $ac_c" 1>&6 -echo "configure:4373: checking for \"-z ignore\" linker flag" >&5 +echo "configure:4379: checking for \"-z ignore\" linker flag" >&5 case "`ld -h 2>&1`" in *-z\ ignore\|record* ) echo "$ac_t""yes" 1>&6 ld_switch_site="-z ignore $ld_switch_site" && if test "$extra_verbose" = "yes"; then echo " Prepending \"-z ignore\" to \$ld_switch_site"; fi ;; @@ -4379,7 +4385,7 @@ echo "checking "for specified window system"" 1>&6 -echo "configure:4383: checking "for specified window system"" >&5 +echo "configure:4389: checking "for specified window system"" >&5 if test "$with_x11" != "no"; then test "$x_includes $x_libraries" != "NONE NONE" && \ @@ -4412,7 +4418,7 @@ # Uses ac_ vars as temps to allow command line to override cache and checks. # --without-x overrides everything else, but does not touch the cache. echo $ac_n "checking for X""... $ac_c" 1>&6 -echo "configure:4416: checking for X" >&5 +echo "configure:4422: checking for X" >&5 # Check whether --with-x or --without-x was given. if test "${with_x+set}" = set; then @@ -4472,12 +4478,12 @@ # First, try using that file with no special directory specified. cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:4481: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:4487: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -4546,14 +4552,14 @@ ac_save_LIBS="$LIBS" LIBS="-l$x_direct_test_library $LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:4563: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* LIBS="$ac_save_LIBS" # We can link X programs with no special library path. @@ -4662,17 +4668,17 @@ case "`(uname -sr) 2>/dev/null`" in "SunOS 5"*) echo $ac_n "checking whether -R must be followed by a space""... $ac_c" 1>&6 -echo "configure:4666: checking whether -R must be followed by a space" >&5 +echo "configure:4672: checking whether -R must be followed by a space" >&5 ac_xsave_LIBS="$LIBS"; LIBS="$LIBS -R$x_libraries" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +#line 4675 "configure" +#include "confdefs.h" + +int main() { + +; return 0; } +EOF +if { (eval echo configure:4682: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* ac_R_nospace=yes else @@ -4688,14 +4694,14 @@ else LIBS="$ac_xsave_LIBS -R $x_libraries" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +#line 4698 "configure" +#include "confdefs.h" + +int main() { + +; return 0; } +EOF +if { (eval echo configure:4705: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* ac_R_space=yes else @@ -4731,12 +4737,12 @@ else echo $ac_n "checking for dnet_ntoa in -ldnet""... $ac_c" 1>&6 -echo "configure:4735: checking for dnet_ntoa in -ldnet" >&5 +echo "configure:4741: checking for dnet_ntoa in -ldnet" >&5 ac_lib_var=`echo dnet'_'dnet_ntoa | sed 'y%./+-%__p_%'` xe_check_libs=" -ldnet " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:4757: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -4771,12 +4777,12 @@ if test $ac_cv_lib_dnet_dnet_ntoa = no; then echo $ac_n "checking for dnet_ntoa in -ldnet_stub""... $ac_c" 1>&6 -echo "configure:4775: checking for dnet_ntoa in -ldnet_stub" >&5 +echo "configure:4781: checking for dnet_ntoa in -ldnet_stub" >&5 ac_lib_var=`echo dnet_stub'_'dnet_ntoa | sed 'y%./+-%__p_%'` xe_check_libs=" -ldnet_stub " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:4797: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -4816,10 +4822,10 @@ # The nsl library prevents programs from opening the X display # on Irix 5.2, according to dickey@clark.net. echo $ac_n "checking for gethostbyname""... $ac_c" 1>&6 -echo "configure:4820: checking for gethostbyname" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:4852: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_gethostbyname=yes" else @@ -4863,12 +4869,12 @@ if test $ac_cv_func_gethostbyname = no; then echo $ac_n "checking for gethostbyname in -lnsl""... $ac_c" 1>&6 -echo "configure:4867: checking for gethostbyname in -lnsl" >&5 +echo "configure:4873: checking for gethostbyname in -lnsl" >&5 ac_lib_var=`echo nsl'_'gethostbyname | sed 'y%./+-%__p_%'` xe_check_libs=" -lnsl " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:4889: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -4909,10 +4915,10 @@ # -lsocket must be given before -lnsl if both are needed. # We assume that if connect needs -lnsl, so does gethostbyname. echo $ac_n "checking for connect""... $ac_c" 1>&6 -echo "configure:4913: checking for connect" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:4945: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_connect=yes" else @@ -4958,12 +4964,12 @@ xe_msg_checking="for connect in -lsocket" test -n "$X_EXTRA_LIBS" && xe_msg_checking="$xe_msg_checking using extra libs $X_EXTRA_LIBS" echo $ac_n "checking "$xe_msg_checking"""... $ac_c" 1>&6 -echo "configure:4962: checking "$xe_msg_checking"" >&5 +echo "configure:4968: checking "$xe_msg_checking"" >&5 ac_lib_var=`echo socket'_'connect | sed 'y%./+-%__p_%'` xe_check_libs=" -lsocket $X_EXTRA_LIBS" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:4984: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -4998,10 +5004,10 @@ # gomez@mi.uni-erlangen.de says -lposix is necessary on A/UX. echo $ac_n "checking for remove""... $ac_c" 1>&6 -echo "configure:5002: checking for remove" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:5034: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_remove=yes" else @@ -5045,12 +5051,12 @@ if test $ac_cv_func_remove = no; then echo $ac_n "checking for remove in -lposix""... $ac_c" 1>&6 -echo "configure:5049: checking for remove in -lposix" >&5 +echo "configure:5055: checking for remove in -lposix" >&5 ac_lib_var=`echo posix'_'remove | sed 'y%./+-%__p_%'` xe_check_libs=" -lposix " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:5071: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -5085,10 +5091,10 @@ # BSDI BSD/OS 2.1 needs -lipc for XOpenDisplay. echo $ac_n "checking for shmat""... $ac_c" 1>&6 -echo "configure:5089: checking for shmat" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:5121: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_shmat=yes" else @@ -5132,12 +5138,12 @@ if test $ac_cv_func_shmat = no; then echo $ac_n "checking for shmat in -lipc""... $ac_c" 1>&6 -echo "configure:5136: checking for shmat in -lipc" >&5 +echo "configure:5142: checking for shmat in -lipc" >&5 ac_lib_var=`echo ipc'_'shmat | sed 'y%./+-%__p_%'` xe_check_libs=" -lipc " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:5158: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -5182,12 +5188,12 @@ # --interran@uluru.Stanford.EDU, kb@cs.umb.edu. echo $ac_n "checking for IceConnectionNumber in -lICE""... $ac_c" 1>&6 -echo "configure:5186: checking for IceConnectionNumber in -lICE" >&5 +echo "configure:5192: checking for IceConnectionNumber in -lICE" >&5 ac_lib_var=`echo ICE'_'IceConnectionNumber | sed 'y%./+-%__p_%'` xe_check_libs=" -lICE " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:5208: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -5367,7 +5373,7 @@ echo "checking for X defines extracted by xmkmf" 1>&6 -echo "configure:5371: checking for X defines extracted by xmkmf" >&5 +echo "configure:5377: checking for X defines extracted by xmkmf" >&5 rm -fr conftestdir if mkdir conftestdir; then cd conftestdir @@ -5399,15 +5405,15 @@ ac_safe=`echo "X11/Intrinsic.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for X11/Intrinsic.h""... $ac_c" 1>&6 -echo "configure:5403: checking for X11/Intrinsic.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:5411: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:5417: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -5431,12 +5437,12 @@ echo $ac_n "checking for XOpenDisplay in -lX11""... $ac_c" 1>&6 -echo "configure:5435: checking for XOpenDisplay in -lX11" >&5 +echo "configure:5441: checking for XOpenDisplay in -lX11" >&5 ac_lib_var=`echo X11'_'XOpenDisplay | sed 'y%./+-%__p_%'` xe_check_libs=" -lX11 " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:5457: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -5472,12 +5478,12 @@ xe_msg_checking="for XGetFontProperty in -lX11" test -n "-b i486-linuxaout" && xe_msg_checking="$xe_msg_checking using extra libs -b i486-linuxaout" echo $ac_n "checking "$xe_msg_checking"""... $ac_c" 1>&6 -echo "configure:5476: checking "$xe_msg_checking"" >&5 +echo "configure:5482: checking "$xe_msg_checking"" >&5 ac_lib_var=`echo X11'_'XGetFontProperty | sed 'y%./+-%__p_%'` xe_check_libs=" -lX11 -b i486-linuxaout" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:5498: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -5515,12 +5521,12 @@ echo $ac_n "checking for XShapeSelectInput in -lXext""... $ac_c" 1>&6 -echo "configure:5519: checking for XShapeSelectInput in -lXext" >&5 +echo "configure:5525: checking for XShapeSelectInput in -lXext" >&5 ac_lib_var=`echo Xext'_'XShapeSelectInput | sed 'y%./+-%__p_%'` xe_check_libs=" -lXext " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:5541: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -5554,12 +5560,12 @@ echo $ac_n "checking for XtOpenDisplay in -lXt""... $ac_c" 1>&6 -echo "configure:5558: checking for XtOpenDisplay in -lXt" >&5 +echo "configure:5564: checking for XtOpenDisplay in -lXt" >&5 ac_lib_var=`echo Xt'_'XtOpenDisplay | sed 'y%./+-%__p_%'` xe_check_libs=" -lXt " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:5580: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -5593,14 +5599,14 @@ echo $ac_n "checking the version of X11 being used""... $ac_c" 1>&6 -echo "configure:5597: checking the version of X11 being used" >&5 +echo "configure:5603: checking the version of X11 being used" >&5 cat > conftest.$ac_ext < int main(int c, char *v[]) { return c>1 ? XlibSpecificationRelease : 0; } EOF -if { (eval echo configure:5604: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:5610: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ./conftest foobar; x11_release=$? else @@ -5625,15 +5631,15 @@ do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 -echo "configure:5629: checking for $ac_hdr" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:5637: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:5643: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -5664,7 +5670,7 @@ echo $ac_n "checking for XFree86""... $ac_c" 1>&6 -echo "configure:5668: checking for XFree86" >&5 +echo "configure:5674: checking for XFree86" >&5 if test -d "/usr/X386/include" -o \ -f "/etc/XF86Config" -o \ -f "/etc/X11/XF86Config" -o \ @@ -5684,12 +5690,12 @@ test -z "$with_xmu" && { echo $ac_n "checking for XmuReadBitmapDataFromFile in -lXmu""... $ac_c" 1>&6 -echo "configure:5688: checking for XmuReadBitmapDataFromFile in -lXmu" >&5 +echo "configure:5694: checking for XmuReadBitmapDataFromFile in -lXmu" >&5 ac_lib_var=`echo Xmu'_'XmuReadBitmapDataFromFile | sed 'y%./+-%__p_%'` xe_check_libs=" -lXmu " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:5710: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -5739,19 +5745,19 @@ echo $ac_n "checking for main in -lXbsd""... $ac_c" 1>&6 -echo "configure:5743: checking for main in -lXbsd" >&5 +echo "configure:5749: checking for main in -lXbsd" >&5 ac_lib_var=`echo Xbsd'_'main | sed 'y%./+-%__p_%'` xe_check_libs=" -lXbsd " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:5761: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -5788,22 +5794,22 @@ fi if test "$with_msw" != "no"; then echo "checking for MS-Windows" 1>&6 -echo "configure:5792: checking for MS-Windows" >&5 +echo "configure:5798: checking for MS-Windows" >&5 echo $ac_n "checking for main in -lgdi32""... $ac_c" 1>&6 -echo "configure:5795: checking for main in -lgdi32" >&5 +echo "configure:5801: checking for main in -lgdi32" >&5 ac_lib_var=`echo gdi32'_'main | sed 'y%./+-%__p_%'` xe_check_libs=" -lgdi32 " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:5813: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -5834,6 +5840,7 @@ install_pp="$blddir/lib-src/installexe.sh" libs_system="$libs_system -lshell32 -lgdi32 -luser32 -lcomctl32" && if test "$extra_verbose" = "yes"; then echo " Appending \"-lshell32 -lgdi32 -luser32 -lcomctl32\" to \$libs_system"; fi + test "$with_dragndrop" != no && dragndrop_proto="$dragndrop_proto msw" && if test "$extra_verbose" = "yes"; then echo " Appending \"msw\" to \$dragndrop_proto"; fi if test "$window_system" != x11; then window_system=msw test "$with_scrollbars" != "no" && with_scrollbars=msw \ @@ -5867,12 +5874,12 @@ fi fi cat > conftest.$ac_ext < int main() { return (open("/dev/windows", O_RDONLY, 0) > 0)? 0 : 1; } EOF -if { (eval echo configure:5876: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:5883: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then { test "$extra_verbose" = "yes" && cat << \EOF Defining HAVE_MSG_SELECT @@ -5951,7 +5958,7 @@ esac echo "checking for session-management option" 1>&6 -echo "configure:5955: checking for session-management option" >&5; +echo "configure:5962: checking for session-management option" >&5; if test "$with_session" != "no"; then { test "$extra_verbose" = "yes" && cat << \EOF Defining HAVE_SESSION @@ -5966,15 +5973,15 @@ test -z "$with_xauth" && test "$window_system" = "none" && with_xauth=no test -z "$with_xauth" && { ac_safe=`echo "X11/Xauth.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for X11/Xauth.h""... $ac_c" 1>&6 -echo "configure:5970: checking for X11/Xauth.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:5978: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:5985: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -5997,12 +6004,12 @@ } test -z "$with_xauth" && { echo $ac_n "checking for XauGetAuthByAddr in -lXau""... $ac_c" 1>&6 -echo "configure:6001: checking for XauGetAuthByAddr in -lXau" >&5 +echo "configure:6008: checking for XauGetAuthByAddr in -lXau" >&5 ac_lib_var=`echo Xau'_'XauGetAuthByAddr | sed 'y%./+-%__p_%'` xe_check_libs=" -lXau " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:6024: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -6058,15 +6065,15 @@ for dir in "" "Tt/" "desktop/" ; do ac_safe=`echo "${dir}tt_c.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for ${dir}tt_c.h""... $ac_c" 1>&6 -echo "configure:6062: checking for ${dir}tt_c.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:6070: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:6077: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -6102,12 +6109,12 @@ xe_msg_checking="for tt_message_create in -ltt" test -n "$extra_libs" && xe_msg_checking="$xe_msg_checking using extra libs $extra_libs" echo $ac_n "checking "$xe_msg_checking"""... $ac_c" 1>&6 -echo "configure:6106: checking "$xe_msg_checking"" >&5 +echo "configure:6113: checking "$xe_msg_checking"" >&5 ac_lib_var=`echo tt'_'tt_message_create | sed 'y%./+-%__p_%'` xe_check_libs=" -ltt $extra_libs" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:6129: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -6175,15 +6182,15 @@ test -z "$with_cde" && { ac_safe=`echo "Dt/Dt.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for Dt/Dt.h""... $ac_c" 1>&6 -echo "configure:6179: checking for Dt/Dt.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:6187: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:6194: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -6206,12 +6213,12 @@ } test -z "$with_cde" && { echo $ac_n "checking for DtDndDragStart in -lDtSvc""... $ac_c" 1>&6 -echo "configure:6210: checking for DtDndDragStart in -lDtSvc" >&5 +echo "configure:6217: checking for DtDndDragStart in -lDtSvc" >&5 ac_lib_var=`echo DtSvc'_'DtDndDragStart | sed 'y%./+-%__p_%'` xe_check_libs=" -lDtSvc " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:6233: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -6291,7 +6298,7 @@ fi echo $ac_n "checking if drag and drop API is needed""... $ac_c" 1>&6 -echo "configure:6295: checking if drag and drop API is needed" >&5 +echo "configure:6302: checking if drag and drop API is needed" >&5 if test "$with_dragndrop" != "no" ; then if test -n "$dragndrop_proto" ; then with_dragndrop=yes @@ -6312,18 +6319,18 @@ fi echo "checking for LDAP" 1>&6 -echo "configure:6316: checking for LDAP" >&5 +echo "configure:6323: checking for LDAP" >&5 test -z "$with_ldap" && { ac_safe=`echo "ldap.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for ldap.h""... $ac_c" 1>&6 -echo "configure:6319: checking for ldap.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:6327: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:6334: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -6346,15 +6353,15 @@ } test -z "$with_ldap" && { ac_safe=`echo "lber.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for lber.h""... $ac_c" 1>&6 -echo "configure:6350: checking for lber.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:6358: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:6365: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -6380,12 +6387,12 @@ xe_msg_checking="for ldap_open in -lldap" test -n "-llber" && xe_msg_checking="$xe_msg_checking using extra libs -llber" echo $ac_n "checking "$xe_msg_checking"""... $ac_c" 1>&6 -echo "configure:6384: checking "$xe_msg_checking"" >&5 +echo "configure:6391: checking "$xe_msg_checking"" >&5 ac_lib_var=`echo ldap'_'ldap_open | sed 'y%./+-%__p_%'` xe_check_libs=" -lldap -llber" cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:6407: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -6419,12 +6426,12 @@ } test "$with_umich_ldap" = "no" && { echo $ac_n "checking for ldap_set_option in -lldap10""... $ac_c" 1>&6 -echo "configure:6423: checking for ldap_set_option in -lldap10" >&5 +echo "configure:6430: checking for ldap_set_option in -lldap10" >&5 ac_lib_var=`echo ldap10'_'ldap_set_option | sed 'y%./+-%__p_%'` xe_check_libs=" -lldap10 " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:6446: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -6499,15 +6506,15 @@ if test "$window_system" != "none"; then echo "checking for graphics libraries" 1>&6 -echo "configure:6503: checking for graphics libraries" >&5 +echo "configure:6510: checking for graphics libraries" >&5 xpm_problem="" if test -z "$with_xpm"; then echo $ac_n "checking for Xpm - no older than 3.4f""... $ac_c" 1>&6 -echo "configure:6508: checking for Xpm - no older than 3.4f" >&5 +echo "configure:6515: checking for Xpm - no older than 3.4f" >&5 xe_check_libs=-lXpm cat > conftest.$ac_ext < int main(int c, char **v) { @@ -6515,7 +6522,7 @@ XpmIncludeVersion != XpmLibraryVersion() ? 1 : XpmIncludeVersion < 30406 ? 2 : 0 ;} EOF -if { (eval echo configure:6519: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:6526: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ./conftest dummy_arg; xpm_status=$?; if test "$xpm_status" = "0"; then @@ -6557,17 +6564,17 @@ libs_x="-lXpm $libs_x" && if test "$extra_verbose" = "yes"; then echo " Prepending \"-lXpm\" to \$libs_x"; fi echo $ac_n "checking for \"FOR_MSW\" xpm""... $ac_c" 1>&6 -echo "configure:6561: checking for \"FOR_MSW\" xpm" >&5 +echo "configure:6568: checking for \"FOR_MSW\" xpm" >&5 xe_check_libs=-lXpm cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:6578: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* xpm_for_msw=no else @@ -6609,12 +6616,12 @@ if test "$with_png $with_tiff" != "no no"; then echo $ac_n "checking for inflate in -lc""... $ac_c" 1>&6 -echo "configure:6613: checking for inflate in -lc" >&5 +echo "configure:6620: checking for inflate in -lc" >&5 ac_lib_var=`echo c'_'inflate | sed 'y%./+-%__p_%'` xe_check_libs=" -lc " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:6636: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -6644,12 +6651,12 @@ echo "$ac_t""no" 1>&6 echo $ac_n "checking for inflate in -lz""... $ac_c" 1>&6 -echo "configure:6648: checking for inflate in -lz" >&5 +echo "configure:6655: checking for inflate in -lz" >&5 ac_lib_var=`echo z'_'inflate | sed 'y%./+-%__p_%'` xe_check_libs=" -lz " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:6671: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -6679,12 +6686,12 @@ echo "$ac_t""no" 1>&6 echo $ac_n "checking for inflate in -lgz""... $ac_c" 1>&6 -echo "configure:6683: checking for inflate in -lgz" >&5 +echo "configure:6690: checking for inflate in -lgz" >&5 ac_lib_var=`echo gz'_'inflate | sed 'y%./+-%__p_%'` xe_check_libs=" -lgz " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:6706: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -6725,15 +6732,15 @@ test -z "$with_jpeg" && { ac_safe=`echo "jpeglib.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for jpeglib.h""... $ac_c" 1>&6 -echo "configure:6729: checking for jpeglib.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:6737: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:6744: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -6756,12 +6763,12 @@ } test -z "$with_jpeg" && { echo $ac_n "checking for jpeg_destroy_decompress in -ljpeg""... $ac_c" 1>&6 -echo "configure:6760: checking for jpeg_destroy_decompress in -ljpeg" >&5 +echo "configure:6767: checking for jpeg_destroy_decompress in -ljpeg" >&5 ac_lib_var=`echo jpeg'_'jpeg_destroy_decompress | sed 'y%./+-%__p_%'` xe_check_libs=" -ljpeg " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:6783: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -6808,10 +6815,10 @@ png_problem="" test -z "$with_png" && { echo $ac_n "checking for pow""... $ac_c" 1>&6 -echo "configure:6812: checking for pow" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:6845: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_pow=yes" else @@ -6855,15 +6862,15 @@ } test -z "$with_png" && { ac_safe=`echo "png.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for png.h""... $ac_c" 1>&6 -echo "configure:6859: checking for png.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:6867: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:6874: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -6886,12 +6893,12 @@ } test -z "$with_png" && { echo $ac_n "checking for png_read_image in -lpng""... $ac_c" 1>&6 -echo "configure:6890: checking for png_read_image in -lpng" >&5 +echo "configure:6897: checking for png_read_image in -lpng" >&5 ac_lib_var=`echo png'_'png_read_image | sed 'y%./+-%__p_%'` xe_check_libs=" -lpng " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:6913: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -6925,10 +6932,10 @@ } if test -z "$with_png"; then echo $ac_n "checking for workable png version information""... $ac_c" 1>&6 -echo "configure:6929: checking for workable png version information" >&5 +echo "configure:6936: checking for workable png version information" >&5 xe_check_libs="-lpng -lz" cat > conftest.$ac_ext < int main(int c, char **v) { @@ -6936,7 +6943,7 @@ if (strcmp(png_libpng_ver, PNG_LIBPNG_VER_STRING) != 0) return 1; return (PNG_LIBPNG_VER < 10002) ? 2 : 0 ;} EOF -if { (eval echo configure:6940: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:6947: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ./conftest dummy_arg; png_status=$?; if test "$png_status" = "0"; then @@ -6979,15 +6986,15 @@ test -z "$with_tiff" && { ac_safe=`echo "tiffio.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for tiffio.h""... $ac_c" 1>&6 -echo "configure:6983: checking for tiffio.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:6991: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:6998: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -7010,12 +7017,12 @@ } test -z "$with_tiff" && { echo $ac_n "checking for TIFFClientOpen in -ltiff""... $ac_c" 1>&6 -echo "configure:7014: checking for TIFFClientOpen in -ltiff" >&5 +echo "configure:7021: checking for TIFFClientOpen in -ltiff" >&5 ac_lib_var=`echo tiff'_'TIFFClientOpen | sed 'y%./+-%__p_%'` xe_check_libs=" -ltiff " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:7037: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -7065,19 +7072,19 @@ if test "$with_x11" = "yes"; then echo "checking for X11 graphics libraries" 1>&6 -echo "configure:7069: checking for X11 graphics libraries" >&5 +echo "configure:7076: checking for X11 graphics libraries" >&5 test -z "$with_xface" && { ac_safe=`echo "compface.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for compface.h""... $ac_c" 1>&6 -echo "configure:7073: checking for compface.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:7081: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:7088: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -7100,12 +7107,12 @@ } test -z "$with_xface" && { echo $ac_n "checking for UnGenFace in -lcompface""... $ac_c" 1>&6 -echo "configure:7104: checking for UnGenFace in -lcompface" >&5 +echo "configure:7111: checking for UnGenFace in -lcompface" >&5 ac_lib_var=`echo compface'_'UnGenFace | sed 'y%./+-%__p_%'` xe_check_libs=" -lcompface " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:7127: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -7152,12 +7159,12 @@ echo $ac_n "checking for XawScrollbarSetThumb in -lXaw""... $ac_c" 1>&6 -echo "configure:7156: checking for XawScrollbarSetThumb in -lXaw" >&5 +echo "configure:7163: checking for XawScrollbarSetThumb in -lXaw" >&5 ac_lib_var=`echo Xaw'_'XawScrollbarSetThumb | sed 'y%./+-%__p_%'` xe_check_libs=" -lXaw " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:7179: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -7192,15 +7199,15 @@ ac_safe=`echo "Xm/Xm.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for Xm/Xm.h""... $ac_c" 1>&6 -echo "configure:7196: checking for Xm/Xm.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:7204: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:7211: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -7217,12 +7224,12 @@ echo "$ac_t""yes" 1>&6 echo $ac_n "checking for XmStringFree in -lXm""... $ac_c" 1>&6 -echo "configure:7221: checking for XmStringFree in -lXm" >&5 +echo "configure:7228: checking for XmStringFree in -lXm" >&5 ac_lib_var=`echo Xm'_'XmStringFree | sed 'y%./+-%__p_%'` xe_check_libs=" -lXm " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:7244: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -7262,9 +7269,9 @@ if test "$have_motif" = "yes"; then echo $ac_n "checking for Lesstif""... $ac_c" 1>&6 -echo "configure:7266: checking for Lesstif" >&5 +echo "configure:7273: checking for Lesstif" >&5 cat > conftest.$ac_ext < #ifdef LESSTIF_VERSION @@ -7548,7 +7555,7 @@ if test "$with_mule" = "yes" ; then echo "checking for Mule-related features" 1>&6 -echo "configure:7552: checking for Mule-related features" >&5 +echo "configure:7559: checking for Mule-related features" >&5 { test "$extra_verbose" = "yes" && cat << \EOF Defining MULE EOF @@ -7573,15 +7580,15 @@ do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 -echo "configure:7577: checking for $ac_hdr" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:7585: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:7592: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -7612,12 +7619,12 @@ echo $ac_n "checking for strerror in -lintl""... $ac_c" 1>&6 -echo "configure:7616: checking for strerror in -lintl" >&5 +echo "configure:7623: checking for strerror in -lintl" >&5 ac_lib_var=`echo intl'_'strerror | sed 'y%./+-%__p_%'` xe_check_libs=" -lintl " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:7639: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -7661,19 +7668,19 @@ echo "checking for Mule input methods" 1>&6 -echo "configure:7665: checking for Mule input methods" >&5 +echo "configure:7672: checking for Mule input methods" >&5 case "$with_xim" in "" | "yes" ) echo "checking for XIM" 1>&6 -echo "configure:7668: checking for XIM" >&5 +echo "configure:7675: checking for XIM" >&5 if test "$have_lesstif" = "yes"; then with_xim=xlib else echo $ac_n "checking for XmImMbLookupString in -lXm""... $ac_c" 1>&6 -echo "configure:7672: checking for XmImMbLookupString in -lXm" >&5 +echo "configure:7679: checking for XmImMbLookupString in -lXm" >&5 ac_lib_var=`echo Xm'_'XmImMbLookupString | sed 'y%./+-%__p_%'` xe_check_libs=" -lXm " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:7695: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -7750,15 +7757,15 @@ if test "$with_xfs" = "yes" ; then echo "checking for XFontSet" 1>&6 -echo "configure:7754: checking for XFontSet" >&5 +echo "configure:7761: checking for XFontSet" >&5 echo $ac_n "checking for XmbDrawString in -lX11""... $ac_c" 1>&6 -echo "configure:7757: checking for XmbDrawString in -lX11" >&5 +echo "configure:7764: checking for XmbDrawString in -lX11" >&5 ac_lib_var=`echo X11'_'XmbDrawString | sed 'y%./+-%__p_%'` xe_check_libs=" -lX11 " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:7780: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -7809,15 +7816,15 @@ test "$with_wnn6" = "yes" && with_wnn=yes # wnn6 implies wnn support test -z "$with_wnn" && { ac_safe=`echo "wnn/jllib.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for wnn/jllib.h""... $ac_c" 1>&6 -echo "configure:7813: checking for wnn/jllib.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:7821: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:7828: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -7842,10 +7849,10 @@ for ac_func in crypt do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 -echo "configure:7846: checking for $ac_func" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:7879: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else @@ -7897,12 +7904,12 @@ test "$ac_cv_func_crypt" != "yes" && { echo $ac_n "checking for crypt in -lcrypt""... $ac_c" 1>&6 -echo "configure:7901: checking for crypt in -lcrypt" >&5 +echo "configure:7908: checking for crypt in -lcrypt" >&5 ac_lib_var=`echo crypt'_'crypt | sed 'y%./+-%__p_%'` xe_check_libs=" -lcrypt " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:7924: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -7945,14 +7952,15 @@ } fi - test -z "$with_wnn" && { + if test -z "$with_wnn" -o "$with_wnn" = "yes"; then + echo $ac_n "checking for jl_dic_list_e in -lwnn""... $ac_c" 1>&6 -echo "configure:7951: checking for jl_dic_list_e in -lwnn" >&5 +echo "configure:7959: checking for jl_dic_list_e in -lwnn" >&5 ac_lib_var=`echo wnn'_'jl_dic_list_e | sed 'y%./+-%__p_%'` xe_check_libs=" -lwnn " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:7975: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then + rm -rf conftest* + eval "ac_cv_lib_$ac_lib_var=yes" +else + echo "configure: failed program was:" >&5 + cat conftest.$ac_ext >&5 + rm -rf conftest* + eval "ac_cv_lib_$ac_lib_var=no" +fi +rm -f conftest* +xe_check_libs="" + +if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes" ; then + echo "$ac_t""yes" 1>&6 + libwnn=wnn +else + echo "$ac_t""no" 1>&6 +echo $ac_n "checking for jl_dic_list_e in -lwnn4""... $ac_c" 1>&6 +echo "configure:7993: checking for jl_dic_list_e in -lwnn4" >&5 +ac_lib_var=`echo wnn4'_'jl_dic_list_e | sed 'y%./+-%__p_%'` + +xe_check_libs=" -lwnn4 " +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -7977,13 +8019,91 @@ if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes" ; then echo "$ac_t""yes" 1>&6 - : + libwnn=wnn4 +else + echo "$ac_t""no" 1>&6 +echo $ac_n "checking for jl_dic_list_e in -lwnn6""... $ac_c" 1>&6 +echo "configure:8027: checking for jl_dic_list_e in -lwnn6" >&5 +ac_lib_var=`echo wnn6'_'jl_dic_list_e | sed 'y%./+-%__p_%'` + +xe_check_libs=" -lwnn6 " +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then + rm -rf conftest* + eval "ac_cv_lib_$ac_lib_var=yes" +else + echo "configure: failed program was:" >&5 + cat conftest.$ac_ext >&5 + rm -rf conftest* + eval "ac_cv_lib_$ac_lib_var=no" +fi +rm -f conftest* +xe_check_libs="" + +if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes" ; then + echo "$ac_t""yes" 1>&6 + libwnn=wnn6 +else + echo "$ac_t""no" 1>&6 +echo $ac_n "checking for dic_list_e in -lwnn6_fromsrc""... $ac_c" 1>&6 +echo "configure:8061: checking for dic_list_e in -lwnn6_fromsrc" >&5 +ac_lib_var=`echo wnn6_fromsrc'_'dic_list_e | sed 'y%./+-%__p_%'` + +xe_check_libs=" -lwnn6_fromsrc " +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then + rm -rf conftest* + eval "ac_cv_lib_$ac_lib_var=yes" +else + echo "configure: failed program was:" >&5 + cat conftest.$ac_ext >&5 + rm -rf conftest* + eval "ac_cv_lib_$ac_lib_var=no" +fi +rm -f conftest* +xe_check_libs="" + +if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes" ; then + echo "$ac_t""yes" 1>&6 + libwnn=wnn6_fromsrc else echo "$ac_t""no" 1>&6 with_wnn=no fi - } + +fi + + +fi + + +fi + + + fi test -z "$with_wnn" && with_wnn=yes if test "$with_wnn" = "yes"; then { test "$extra_verbose" = "yes" && cat << \EOF @@ -7994,19 +8114,19 @@ EOF } - libs_x="-lwnn $libs_x" && if test "$extra_verbose" = "yes"; then echo " Prepending \"-lwnn\" to \$libs_x"; fi + libs_x="-l$libwnn $libs_x" && if test "$extra_verbose" = "yes"; then echo " Prepending \"-l$libwnn\" to \$libs_x"; fi extra_objs="$extra_objs mule-wnnfns.o" && if test "$extra_verbose" = "yes"; then echo " xemacs will be linked with \"mule-wnnfns.o\"" fi if test "$with_wnn6" != "no"; then -echo $ac_n "checking for jl_fi_dic_list in -lwnn""... $ac_c" 1>&6 -echo "configure:8005: checking for jl_fi_dic_list in -lwnn" >&5 -ac_lib_var=`echo wnn'_'jl_fi_dic_list | sed 'y%./+-%__p_%'` - -xe_check_libs=" -lwnn " -cat > conftest.$ac_ext <&6 +echo "configure:8125: checking for jl_fi_dic_list in -l$libwnn" >&5 +ac_lib_var=`echo $libwnn'_'jl_fi_dic_list | sed 'y%./+-%__p_%'` + +xe_check_libs=" -l$libwnn " +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:8141: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -8052,15 +8172,15 @@ if test "$with_canna" != "no"; then ac_safe=`echo "canna/jrkanji.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for canna/jrkanji.h""... $ac_c" 1>&6 -echo "configure:8056: checking for canna/jrkanji.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:8064: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:8184: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -8087,15 +8207,15 @@ c_switch_site="$c_switch_site -I/usr/local/canna/include" ac_safe=`echo "canna/jrkanji.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for canna/jrkanji.h""... $ac_c" 1>&6 -echo "configure:8091: checking for canna/jrkanji.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:8099: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:8219: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -8123,15 +8243,15 @@ test -z "$with_canna" && { ac_safe=`echo "canna/RK.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for canna/RK.h""... $ac_c" 1>&6 -echo "configure:8127: checking for canna/RK.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:8135: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:8255: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -8154,12 +8274,12 @@ } test -z "$with_canna" && { echo $ac_n "checking for RkBgnBun in -lRKC""... $ac_c" 1>&6 -echo "configure:8158: checking for RkBgnBun in -lRKC" >&5 +echo "configure:8278: checking for RkBgnBun in -lRKC" >&5 ac_lib_var=`echo RKC'_'RkBgnBun | sed 'y%./+-%__p_%'` xe_check_libs=" -lRKC " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:8294: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -8193,12 +8313,12 @@ } test -z "$with_canna" && { echo $ac_n "checking for jrKanjiControl in -lcanna""... $ac_c" 1>&6 -echo "configure:8197: checking for jrKanjiControl in -lcanna" >&5 +echo "configure:8317: checking for jrKanjiControl in -lcanna" >&5 ac_lib_var=`echo canna'_'jrKanjiControl | sed 'y%./+-%__p_%'` xe_check_libs=" -lcanna " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:8333: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -8258,12 +8378,12 @@ libs_x="-lXm $libs_x" && if test "$extra_verbose" = "yes"; then echo " Prepending \"-lXm\" to \$libs_x"; fi echo $ac_n "checking for layout_object_getvalue in -li18n""... $ac_c" 1>&6 -echo "configure:8262: checking for layout_object_getvalue in -li18n" >&5 +echo "configure:8382: checking for layout_object_getvalue in -li18n" >&5 ac_lib_var=`echo i18n'_'layout_object_getvalue | sed 'y%./+-%__p_%'` xe_check_libs=" -li18n " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:8398: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -8360,10 +8480,10 @@ for ac_func in cbrt closedir dup2 eaccess fmod fpathconf frexp ftime gethostname getpagesize gettimeofday getcwd getwd logb lrand48 matherr mkdir mktime perror poll random rename res_init rint rmdir select setitimer setpgid setlocale setsid sigblock sighold sigprocmask snprintf strcasecmp strerror tzset ulimit usleep utimes waitpid vsnprintf do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 -echo "configure:8364: checking for $ac_func" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:8510: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else @@ -8420,13 +8540,17 @@ echo " xemacs will be linked with \"realpath.o\"" fi ;; * ) - for ac_func in realpath + case "$canonical" in + *-*-sysv4.2uw2* ) extra_objs="$extra_objs realpath.o" && if test "$extra_verbose" = "yes"; then + echo " xemacs will be linked with \"realpath.o\"" + fi ;; + * ) for ac_func in realpath do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 -echo "configure:8427: checking for $ac_func" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:8577: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else @@ -8476,22 +8600,23 @@ fi done - test "$ac_cv_func_realpath" != "yes" && extra_objs="$extra_objs realpath.o" && if test "$extra_verbose" = "yes"; then + test "$ac_cv_func_realpath" != "yes" && extra_objs="$extra_objs realpath.o" && if test "$extra_verbose" = "yes"; then echo " xemacs will be linked with \"realpath.o\"" fi ;; + esac ;; esac echo $ac_n "checking whether netdb declares h_errno""... $ac_c" 1>&6 -echo "configure:8486: checking whether netdb declares h_errno" >&5 -cat > conftest.$ac_ext <&5 +cat > conftest.$ac_ext < int main() { return h_errno; ; return 0; } EOF -if { (eval echo configure:8495: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:8620: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* echo "$ac_t""yes" 1>&6 { test "$extra_verbose" = "yes" && cat << \EOF @@ -8511,16 +8636,16 @@ rm -f conftest* echo $ac_n "checking for sigsetjmp""... $ac_c" 1>&6 -echo "configure:8515: checking for sigsetjmp" >&5 -cat > conftest.$ac_ext <&5 +cat > conftest.$ac_ext < int main() { sigjmp_buf bar; sigsetjmp (bar, 0); ; return 0; } EOF -if { (eval echo configure:8524: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:8649: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* echo "$ac_t""yes" 1>&6 { test "$extra_verbose" = "yes" && cat << \EOF @@ -8540,11 +8665,11 @@ rm -f conftest* echo $ac_n "checking whether localtime caches TZ""... $ac_c" 1>&6 -echo "configure:8544: checking whether localtime caches TZ" >&5 +echo "configure:8669: checking whether localtime caches TZ" >&5 if test "$ac_cv_func_tzset" = "yes"; then cat > conftest.$ac_ext < #if STDC_HEADERS @@ -8579,7 +8704,7 @@ exit (0); } EOF -if { (eval echo configure:8583: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:8708: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then emacs_cv_localtime_cache=no else @@ -8609,9 +8734,9 @@ if test "$HAVE_TIMEVAL" = "yes"; then echo $ac_n "checking whether gettimeofday accepts one or two arguments""... $ac_c" 1>&6 -echo "configure:8613: checking whether gettimeofday accepts one or two arguments" >&5 -cat > conftest.$ac_ext <&5 +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:8762: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* echo "$ac_t""two" 1>&6 else @@ -8655,19 +8780,19 @@ echo $ac_n "checking for inline""... $ac_c" 1>&6 -echo "configure:8659: checking for inline" >&5 +echo "configure:8784: checking for inline" >&5 ac_cv_c_inline=no for ac_kw in inline __inline__ __inline; do cat > conftest.$ac_ext <&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:8796: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* ac_cv_c_inline=$ac_kw; break else @@ -8717,17 +8842,17 @@ # The Ultrix 4.2 mips builtin alloca declared by alloca.h only works # for constant arguments. Useless! echo $ac_n "checking for working alloca.h""... $ac_c" 1>&6 -echo "configure:8721: checking for working alloca.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < int main() { char *p = alloca(2 * sizeof(int)); ; return 0; } EOF -if { (eval echo configure:8731: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:8856: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* ac_cv_header_alloca_h=yes else @@ -8751,10 +8876,10 @@ fi echo $ac_n "checking for alloca""... $ac_c" 1>&6 -echo "configure:8755: checking for alloca" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:8906: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* ac_cv_func_alloca_works=yes else @@ -8816,10 +8941,10 @@ echo $ac_n "checking whether alloca needs Cray hooks""... $ac_c" 1>&6 -echo "configure:8820: checking whether alloca needs Cray hooks" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&6 -echo "configure:8847: checking for $ac_func" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:8998: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else @@ -8899,10 +9024,10 @@ fi echo $ac_n "checking stack direction for C alloca""... $ac_c" 1>&6 -echo "configure:8903: checking stack direction for C alloca" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:9050: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ac_cv_c_stack_direction=1 else @@ -8950,15 +9075,15 @@ ac_safe=`echo "vfork.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for vfork.h""... $ac_c" 1>&6 -echo "configure:8954: checking for vfork.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:8962: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:9087: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -8986,10 +9111,10 @@ fi echo $ac_n "checking for working vfork""... $ac_c" 1>&6 -echo "configure:8990: checking for working vfork" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < @@ -9084,7 +9209,7 @@ } } EOF -if { (eval echo configure:9088: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:9213: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ac_cv_func_vfork_works=yes else @@ -9110,10 +9235,10 @@ echo $ac_n "checking for working strcoll""... $ac_c" 1>&6 -echo "configure:9114: checking for working strcoll" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < main () @@ -9123,7 +9248,7 @@ strcoll ("123", "456") >= 0); } EOF -if { (eval echo configure:9127: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:9252: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ac_cv_func_strcoll_works=yes else @@ -9151,10 +9276,10 @@ for ac_func in getpgrp do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 -echo "configure:9155: checking for $ac_func" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:9306: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else @@ -9205,10 +9330,10 @@ done echo $ac_n "checking whether getpgrp takes no argument""... $ac_c" 1>&6 -echo "configure:9209: checking whether getpgrp takes no argument" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:9392: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ac_cv_func_getpgrp_void=yes else @@ -9290,10 +9415,10 @@ echo $ac_n "checking for working mmap""... $ac_c" 1>&6 -echo "configure:9294: checking for working mmap" >&5 +echo "configure:9419: checking for working mmap" >&5 case "$opsys" in ultrix* ) have_mmap=no ;; *) cat > conftest.$ac_ext < #include @@ -9326,7 +9451,7 @@ return 1; } EOF -if { (eval echo configure:9330: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:9455: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then have_mmap=yes else @@ -9351,15 +9476,15 @@ do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 -echo "configure:9355: checking for $ac_hdr" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:9363: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:9488: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -9391,10 +9516,10 @@ for ac_func in getpagesize do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 -echo "configure:9395: checking for $ac_func" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:9546: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else @@ -9445,10 +9570,10 @@ done echo $ac_n "checking for working mmap""... $ac_c" 1>&6 -echo "configure:9449: checking for working mmap" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:9717: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then ac_cv_func_mmap_fixed_mapped=yes else @@ -9626,15 +9751,15 @@ ac_safe=`echo "termios.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for termios.h""... $ac_c" 1>&6 -echo "configure:9630: checking for termios.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:9638: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:9763: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -9677,15 +9802,15 @@ echo "$ac_t""no" 1>&6 ac_safe=`echo "termio.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for termio.h""... $ac_c" 1>&6 -echo "configure:9681: checking for termio.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:9689: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:9814: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -9717,10 +9842,10 @@ echo $ac_n "checking for socket""... $ac_c" 1>&6 -echo "configure:9721: checking for socket" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:9872: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_socket=yes" else @@ -9758,15 +9883,15 @@ echo "$ac_t""yes" 1>&6 ac_safe=`echo "netinet/in.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for netinet/in.h""... $ac_c" 1>&6 -echo "configure:9762: checking for netinet/in.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:9770: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:9895: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -9783,15 +9908,15 @@ echo "$ac_t""yes" 1>&6 ac_safe=`echo "arpa/inet.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for arpa/inet.h""... $ac_c" 1>&6 -echo "configure:9787: checking for arpa/inet.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:9795: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:9920: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -9816,9 +9941,9 @@ } echo $ac_n "checking "for sun_len member in struct sockaddr_un"""... $ac_c" 1>&6 -echo "configure:9820: checking "for sun_len member in struct sockaddr_un"" >&5 +echo "configure:9945: checking "for sun_len member in struct sockaddr_un"" >&5 cat > conftest.$ac_ext < @@ -9829,7 +9954,7 @@ static struct sockaddr_un x; x.sun_len = 1; ; return 0; } EOF -if { (eval echo configure:9833: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:9958: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* echo "$ac_t""yes" 1>&6; { test "$extra_verbose" = "yes" && cat << \EOF Defining HAVE_SOCKADDR_SUN_LEN @@ -9847,9 +9972,9 @@ fi rm -f conftest* echo $ac_n "checking "for ip_mreq struct in netinet/in.h"""... $ac_c" 1>&6 -echo "configure:9851: checking "for ip_mreq struct in netinet/in.h"" >&5 +echo "configure:9976: checking "for ip_mreq struct in netinet/in.h"" >&5 cat > conftest.$ac_ext < @@ -9859,7 +9984,7 @@ static struct ip_mreq x; ; return 0; } EOF -if { (eval echo configure:9863: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:9988: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* echo "$ac_t""yes" 1>&6; { test "$extra_verbose" = "yes" && cat << \EOF Defining HAVE_MULTICAST @@ -9890,10 +10015,10 @@ echo $ac_n "checking for msgget""... $ac_c" 1>&6 -echo "configure:9894: checking for msgget" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:10045: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_msgget=yes" else @@ -9931,15 +10056,15 @@ echo "$ac_t""yes" 1>&6 ac_safe=`echo "sys/ipc.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for sys/ipc.h""... $ac_c" 1>&6 -echo "configure:9935: checking for sys/ipc.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:9943: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:10068: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -9956,15 +10081,15 @@ echo "$ac_t""yes" 1>&6 ac_safe=`echo "sys/msg.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for sys/msg.h""... $ac_c" 1>&6 -echo "configure:9960: checking for sys/msg.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:9968: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:10093: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -10002,15 +10127,15 @@ ac_safe=`echo "dirent.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for dirent.h""... $ac_c" 1>&6 -echo "configure:10006: checking for dirent.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:10014: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:10139: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -10037,15 +10162,15 @@ echo "$ac_t""no" 1>&6 ac_safe=`echo "sys/dir.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for sys/dir.h""... $ac_c" 1>&6 -echo "configure:10041: checking for sys/dir.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:10049: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:10174: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -10078,15 +10203,15 @@ ac_safe=`echo "nlist.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for nlist.h""... $ac_c" 1>&6 -echo "configure:10082: checking for nlist.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:10090: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:10215: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -10116,7 +10241,7 @@ echo "checking "for sound support"" 1>&6 -echo "configure:10120: checking "for sound support"" >&5 +echo "configure:10245: checking "for sound support"" >&5 case "$with_sound" in native | both ) with_native_sound=yes;; nas | no ) with_native_sound=no;; @@ -10127,15 +10252,15 @@ if test -n "$native_sound_lib"; then ac_safe=`echo "multimedia/audio_device.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for multimedia/audio_device.h""... $ac_c" 1>&6 -echo "configure:10131: checking for multimedia/audio_device.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:10139: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:10264: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -10183,12 +10308,12 @@ if test -z "$native_sound_lib"; then echo $ac_n "checking for ALopenport in -laudio""... $ac_c" 1>&6 -echo "configure:10187: checking for ALopenport in -laudio" >&5 +echo "configure:10312: checking for ALopenport in -laudio" >&5 ac_lib_var=`echo audio'_'ALopenport | sed 'y%./+-%__p_%'` xe_check_libs=" -laudio " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:10328: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -10230,12 +10355,12 @@ if test -z "$native_sound_lib"; then echo $ac_n "checking for AOpenAudio in -lAlib""... $ac_c" 1>&6 -echo "configure:10234: checking for AOpenAudio in -lAlib" >&5 +echo "configure:10359: checking for AOpenAudio in -lAlib" >&5 ac_lib_var=`echo Alib'_'AOpenAudio | sed 'y%./+-%__p_%'` xe_check_libs=" -lAlib " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:10375: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -10284,15 +10409,15 @@ for dir in "machine" "sys" "linux"; do ac_safe=`echo "${dir}/soundcard.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for ${dir}/soundcard.h""... $ac_c" 1>&6 -echo "configure:10288: checking for ${dir}/soundcard.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:10296: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:10421: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -10362,7 +10487,7 @@ fi libs_x="-laudio $libs_x" && if test "$extra_verbose" = "yes"; then echo " Prepending \"-laudio\" to \$libs_x"; fi cat > conftest.$ac_ext < EOF @@ -10389,7 +10514,7 @@ if test "$with_tty" = "yes" ; then echo "checking for TTY-related features" 1>&6 -echo "configure:10393: checking for TTY-related features" >&5 +echo "configure:10518: checking for TTY-related features" >&5 { test "$extra_verbose" = "yes" && cat << \EOF Defining HAVE_TTY EOF @@ -10405,12 +10530,12 @@ if test -z "$with_ncurses"; then echo $ac_n "checking for tgetent in -lncurses""... $ac_c" 1>&6 -echo "configure:10409: checking for tgetent in -lncurses" >&5 +echo "configure:10534: checking for tgetent in -lncurses" >&5 ac_lib_var=`echo ncurses'_'tgetent | sed 'y%./+-%__p_%'` xe_check_libs=" -lncurses " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:10550: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -10454,15 +10579,15 @@ ac_safe=`echo "ncurses/curses.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for ncurses/curses.h""... $ac_c" 1>&6 -echo "configure:10458: checking for ncurses/curses.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:10466: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:10591: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -10484,15 +10609,15 @@ ac_safe=`echo "ncurses/term.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for ncurses/term.h""... $ac_c" 1>&6 -echo "configure:10488: checking for ncurses/term.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:10496: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:10621: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -10522,15 +10647,15 @@ c_switch_site="$c_switch_site -I/usr/include/ncurses" ac_safe=`echo "ncurses/curses.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for ncurses/curses.h""... $ac_c" 1>&6 -echo "configure:10526: checking for ncurses/curses.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:10534: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:10659: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -10565,12 +10690,12 @@ for lib in curses termlib termcap; do echo $ac_n "checking for tgetent in -l$lib""... $ac_c" 1>&6 -echo "configure:10569: checking for tgetent in -l$lib" >&5 +echo "configure:10694: checking for tgetent in -l$lib" >&5 ac_lib_var=`echo $lib'_'tgetent | sed 'y%./+-%__p_%'` xe_check_libs=" -l$lib " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:10710: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -10612,12 +10737,12 @@ else echo $ac_n "checking for tgetent in -lcurses""... $ac_c" 1>&6 -echo "configure:10616: checking for tgetent in -lcurses" >&5 +echo "configure:10741: checking for tgetent in -lcurses" >&5 ac_lib_var=`echo curses'_'tgetent | sed 'y%./+-%__p_%'` xe_check_libs=" -lcurses " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:10757: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -10646,12 +10771,12 @@ else echo "$ac_t""no" 1>&6 echo $ac_n "checking for tgetent in -ltermcap""... $ac_c" 1>&6 -echo "configure:10650: checking for tgetent in -ltermcap" >&5 +echo "configure:10775: checking for tgetent in -ltermcap" >&5 ac_lib_var=`echo termcap'_'tgetent | sed 'y%./+-%__p_%'` xe_check_libs=" -ltermcap " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:10791: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -10710,15 +10835,15 @@ test -z "$with_gpm" && { ac_safe=`echo "gpm.h" | sed 'y%./+-%__p_%'` echo $ac_n "checking for gpm.h""... $ac_c" 1>&6 -echo "configure:10714: checking for gpm.h" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:10722: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:10847: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -10741,12 +10866,12 @@ } test -z "$with_gpm" && { echo $ac_n "checking for Gpm_Open in -lgpm""... $ac_c" 1>&6 -echo "configure:10745: checking for Gpm_Open in -lgpm" >&5 +echo "configure:10870: checking for Gpm_Open in -lgpm" >&5 ac_lib_var=`echo gpm'_'Gpm_Open | sed 'y%./+-%__p_%'` xe_check_libs=" -lgpm " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:10886: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -10806,22 +10931,22 @@ echo "checking for database support" 1>&6 -echo "configure:10810: checking for database support" >&5 +echo "configure:10935: checking for database support" >&5 if test "$with_database_gnudbm" != "no"; then for ac_hdr in ndbm.h do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 -echo "configure:10817: checking for $ac_hdr" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:10825: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:10950: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -10853,12 +10978,12 @@ if test "$have_ndbm_h" = "yes"; then echo $ac_n "checking for dbm_open in -lgdbm""... $ac_c" 1>&6 -echo "configure:10857: checking for dbm_open in -lgdbm" >&5 +echo "configure:10982: checking for dbm_open in -lgdbm" >&5 ac_lib_var=`echo gdbm'_'dbm_open | sed 'y%./+-%__p_%'` xe_check_libs=" -lgdbm " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:10998: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -10892,10 +11017,10 @@ fi if test "$with_database_gnudbm" != "yes"; then echo $ac_n "checking for dbm_open""... $ac_c" 1>&6 -echo "configure:10896: checking for dbm_open" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:11047: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_dbm_open=yes" else @@ -10954,10 +11079,10 @@ if test "$with_database_dbm" != "no"; then echo $ac_n "checking for dbm_open""... $ac_c" 1>&6 -echo "configure:10958: checking for dbm_open" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:11109: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_dbm_open=yes" else @@ -11001,12 +11126,12 @@ if test "$need_libdbm" != "no"; then echo $ac_n "checking for dbm_open in -ldbm""... $ac_c" 1>&6 -echo "configure:11005: checking for dbm_open in -ldbm" >&5 +echo "configure:11130: checking for dbm_open in -ldbm" >&5 ac_lib_var=`echo dbm'_'dbm_open | sed 'y%./+-%__p_%'` xe_check_libs=" -ldbm " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:11146: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -11054,10 +11179,10 @@ if test "$with_database_berkdb" != "no"; then echo $ac_n "checking for Berkeley db.h""... $ac_c" 1>&6 -echo "configure:11058: checking for Berkeley db.h" >&5 +echo "configure:11183: checking for Berkeley db.h" >&5 for path in "db/db.h" "db.h"; do cat > conftest.$ac_ext <&5; (eval $ac_compile) 2>&5; }; then +if { (eval echo configure:11204: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then rm -rf conftest* db_h_path="$path"; break else @@ -11091,9 +11216,9 @@ if test "$with_database_berkdb" != "no"; then echo $ac_n "checking for Berkeley DB version""... $ac_c" 1>&6 -echo "configure:11095: checking for Berkeley DB version" >&5 +echo "configure:11220: checking for Berkeley DB version" >&5 cat > conftest.$ac_ext < #if DB_VERSION_MAJOR > 1 @@ -11112,10 +11237,10 @@ rm -f conftest* echo $ac_n "checking for $dbfunc""... $ac_c" 1>&6 -echo "configure:11116: checking for $dbfunc" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:11267: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_$dbfunc=yes" else @@ -11157,12 +11282,12 @@ echo $ac_n "checking for $dbfunc in -ldb""... $ac_c" 1>&6 -echo "configure:11161: checking for $dbfunc in -ldb" >&5 +echo "configure:11286: checking for $dbfunc in -ldb" >&5 ac_lib_var=`echo db'_'$dbfunc | sed 'y%./+-%__p_%'` xe_check_libs=" -ldb " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:11302: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -11237,12 +11362,12 @@ if test "$with_socks" = "yes"; then echo $ac_n "checking for SOCKSinit in -lsocks""... $ac_c" 1>&6 -echo "configure:11241: checking for SOCKSinit in -lsocks" >&5 +echo "configure:11366: checking for SOCKSinit in -lsocks" >&5 ac_lib_var=`echo socks'_'SOCKSinit | sed 'y%./+-%__p_%'` xe_check_libs=" -lsocks " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:11382: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -11306,19 +11431,21 @@ LIBS="-Bstatic -lut -Bdynamic $LIBS" && if test "$extra_verbose" = "yes"; then echo " Prepending \"-Bstatic -lut -Bdynamic\" to \$LIBS"; fi fi +test -z "$with_shlib" && test "$opsys $machine" = "cygwin32 intel386" && with_shlib=no + for ac_hdr in dlfcn.h do ac_safe=`echo "$ac_hdr" | sed 'y%./+-%__p_%'` echo $ac_n "checking for $ac_hdr""... $ac_c" 1>&6 -echo "configure:11314: checking for $ac_hdr" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext < EOF ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" -{ (eval echo configure:11322: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +{ (eval echo configure:11449: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } ac_err=`grep -v '^ *+' conftest.out` if test -z "$ac_err"; then rm -rf conftest* @@ -11349,12 +11476,12 @@ test -z "$with_shlib" && test ! -z "$have_dlfcn" && { echo $ac_n "checking for dlopen in -ldl""... $ac_c" 1>&6 -echo "configure:11353: checking for dlopen in -ldl" >&5 +echo "configure:11480: checking for dlopen in -ldl" >&5 ac_lib_var=`echo dl'_'dlopen | sed 'y%./+-%__p_%'` xe_check_libs=" -ldl " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:11496: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -11394,12 +11521,12 @@ } test -z "$with_shlib" && test ! -z "$have_dlfcn" && { echo $ac_n "checking for _dlopen in -lc""... $ac_c" 1>&6 -echo "configure:11398: checking for _dlopen in -lc" >&5 +echo "configure:11525: checking for _dlopen in -lc" >&5 ac_lib_var=`echo c'_'_dlopen | sed 'y%./+-%__p_%'` xe_check_libs=" -lc " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:11541: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -11439,12 +11566,12 @@ } test -z "$with_shlib" && test ! -z "$have_dlfcn" && { echo $ac_n "checking for dlopen in -lc""... $ac_c" 1>&6 -echo "configure:11443: checking for dlopen in -lc" >&5 +echo "configure:11570: checking for dlopen in -lc" >&5 ac_lib_var=`echo c'_'dlopen | sed 'y%./+-%__p_%'` xe_check_libs=" -lc " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:11586: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -11484,12 +11611,12 @@ } test -z "$with_shlib" && { echo $ac_n "checking for shl_load in -ldld""... $ac_c" 1>&6 -echo "configure:11488: checking for shl_load in -ldld" >&5 +echo "configure:11615: checking for shl_load in -ldld" >&5 ac_lib_var=`echo dld'_'shl_load | sed 'y%./+-%__p_%'` xe_check_libs=" -ldld " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:11631: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -11529,12 +11656,12 @@ } test -z "$with_shlib" && { echo $ac_n "checking for dld_init in -ldld""... $ac_c" 1>&6 -echo "configure:11533: checking for dld_init in -ldld" >&5 +echo "configure:11660: checking for dld_init in -ldld" >&5 ac_lib_var=`echo dld'_'dld_init | sed 'y%./+-%__p_%'` xe_check_libs=" -ldld " cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:11676: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_lib_$ac_lib_var=yes" else @@ -11595,7 +11722,7 @@ dll_oflags="-o " echo $ac_n "checking how to build a shared library""... $ac_c" 1>&6 -echo "configure:11599: checking how to build a shared library" >&5 +echo "configure:11726: checking how to build a shared library" >&5 case `uname -rs` in UNIX_SV*|UNIX_System_V*) dll_lflags="-G" @@ -11686,10 +11813,10 @@ for ac_func in dlerror do echo $ac_n "checking for $ac_func""... $ac_c" 1>&6 -echo "configure:11690: checking for $ac_func" >&5 - -cat > conftest.$ac_ext <&5 + +cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest; then +if { (eval echo configure:11843: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest; then rm -rf conftest* eval "ac_cv_func_$ac_func=yes" else @@ -11748,11 +11875,11 @@ fi cat > conftest.$ac_ext <&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 +if { (eval echo configure:11883: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest && (./conftest; exit $?) 2>&5 then : else diff -r 73c75c43c1f2 -r 19dcec799385 configure.in --- a/configure.in Mon Aug 13 10:46:01 2007 +0200 +++ b/configure.in Mon Aug 13 10:46:44 2007 +0200 @@ -1325,6 +1325,13 @@ NON_GNU_CPP=/usr/ccs/lib/cpp ;; + dnl NEC + mips-nec-sysv*) + machine=mips-nec + NON_GNU_CC=/usr/ccs/bin/cc + NON_GNU_CPP=/usr/ccs/lib/cpp + ;; + dnl Silicon Graphics machines dnl Iris 2500 and Iris 2500 Turbo (aka the Iris 3030) m68*-sgi-iris3.5* ) machine=irist opsys=iris3-5 ;; @@ -1482,6 +1489,9 @@ dnl Linux/68k m68k-*-linux* ) machine=m68k opsys=linux ;; + dnl Linux/arm + arm-*-linux* ) machine=arm opsys=linux ;; + esac if test -z "$machine" -o -z "$opsys"; then @@ -2081,7 +2091,7 @@ dnl checks for header files AC_CHECK_HEADERS(mach/mach.h sys/stropts.h sys/timeb.h sys/time.h unistd.h) -AC_CHECK_HEADERS(utime.h locale.h libgen.h fcntl.h ulimit.h cygwin32/version.h) +AC_CHECK_HEADERS(utime.h locale.h libgen.h fcntl.h ulimit.h cygwin/version.h) AC_CHECK_HEADERS(linux/version.h kstat.h sys/pstat.h inttypes.h sys/un.h a.out.h) AC_HEADER_SYS_WAIT AC_HEADER_STDC @@ -2442,6 +2452,7 @@ AC_DEFINE(HAVE_MS_WINDOWS) install_pp="$blddir/lib-src/installexe.sh" XE_APPEND(-lshell32 -lgdi32 -luser32 -lcomctl32, libs_system) + test "$with_dragndrop" != no && XE_APPEND(msw, dragndrop_proto) if test "$window_system" != x11; then window_system=msw test "$with_scrollbars" != "no" && with_scrollbars=msw \ @@ -3002,14 +3013,19 @@ test "$ac_cv_func_crypt" != "yes" && { AC_CHECK_LIB(crypt, crypt) } fi dnl Back to our regularly scheduled wnn hunting - test -z "$with_wnn" && { AC_CHECK_LIB(wnn,jl_dic_list_e,[:],with_wnn=no) } + if test -z "$with_wnn" -o "$with_wnn" = "yes"; then + AC_CHECK_LIB(wnn,jl_dic_list_e,libwnn=wnn, + AC_CHECK_LIB(wnn4,jl_dic_list_e,libwnn=wnn4, + AC_CHECK_LIB(wnn6,jl_dic_list_e,libwnn=wnn6, + AC_CHECK_LIB(wnn6_fromsrc,dic_list_e,libwnn=wnn6_fromsrc,with_wnn=no)))) + fi test -z "$with_wnn" && with_wnn=yes if test "$with_wnn" = "yes"; then AC_DEFINE(HAVE_WNN) - XE_PREPEND(-lwnn, libs_x) + XE_PREPEND(-l$libwnn, libs_x) XE_ADD_OBJS(mule-wnnfns.o) if test "$with_wnn6" != "no"; then - AC_CHECK_LIB(wnn, jl_fi_dic_list, with_wnn6=yes) + AC_CHECK_LIB($libwnn, jl_fi_dic_list, with_wnn6=yes) test "$with_wnn6" = "yes" && AC_DEFINE(WNN6) fi fi @@ -3067,11 +3083,15 @@ dnl For example, call realpath on a file thirty-five or so directories deep dnl and you get ELOOP even if no symlinks at all are involved. dnl Reports as of 11/1997 indicate BSDi has problems too. +dnl The realpath() in UnixWare2.1.3 could not get any pathname fragment in error condition. case "$opsys" in linuxaout* | bsdos3* | freebsd* | decosf4-0* | aix4* ) XE_ADD_OBJS(realpath.o) ;; * ) - AC_CHECK_FUNCS(realpath) - test "$ac_cv_func_realpath" != "yes" && XE_ADD_OBJS(realpath.o) ;; + case "$canonical" in + *-*-sysv4.2uw2* ) XE_ADD_OBJS(realpath.o) ;; + * ) AC_CHECK_FUNCS(realpath) + test "$ac_cv_func_realpath" != "yes" && XE_ADD_OBJS(realpath.o) ;; + esac ;; esac dnl If netdb.h does not declare h_errno, we must declare it by hand. @@ -3557,6 +3577,9 @@ XE_PREPEND(-Bstatic -lut -Bdynamic, LIBS) fi +dnl cygwin can't cope with dlfcn at the moment +test -z "$with_shlib" && test "$opsys $machine" = "cygwin32 intel386" && with_shlib=no + dnl autodetect dll support AC_CHECK_HEADERS(dlfcn.h, have_dlfcn=yes) test -z "$with_shlib" && test ! -z "$have_dlfcn" && { AC_CHECK_LIB(dl, dlopen, [ AC_DEFINE(HAVE_DLOPEN) DLL_LIB=dl; with_shlib=yes]) } diff -r 73c75c43c1f2 -r 19dcec799385 etc/package-index.LATEST.pgp --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/etc/package-index.LATEST.pgp Mon Aug 13 10:46:44 2007 +0200 @@ -0,0 +1,1819 @@ +-----BEGIN PGP SIGNED MESSAGE----- + +;; Package Index file -- Do not edit manually. +;;;@@@ +(package-get-update-base-entry (quote +(zenirc + (standards-version 1.0 + version "1.04" + author-version "2.112" + date "1998-08-15" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "comm" + dump nil + description "ZENIRC IRC Client." + filename "zenirc-1.04-pkg.tar.gz" + md5sum "96d9e09c41de5c19d8aa092ad544ad6d" + size 276116 + provides (zenirc) + requires (zenirc) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(w3 + (standards-version 1.0 + version "1.10" + author-version "4.0pre23" + date "1998-07-18" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution experimental + priority high + category "comm" + dump nil + description "A Web browser." + filename "w3-1.10-pkg.tar.gz" + md5sum "6113b455f82c5903b8bd6f4ca48afb00" + size 612442 + provides (w3 url) + requires (w3 mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(vm + (standards-version 1.0 + version "1.14" + author-version "6.62" + date "1998-09-22" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "comm" + dump nil + description "An Emacs mailer." + filename "vm-1.14-pkg.tar.gz" + md5sum "e59383b955243ca90581fd6854bb5eff" + size 548815 + provides (vm) + requires (mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(tm + (standards-version 1.0 + version "1.15" + author-version "21.0" + date "1998-08-27" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "comm" + dump nil + description "Emacs MIME support." + filename "tm-1.15-pkg.tar.gz" + md5sum "7769db3ab1473811a0622742c3e9bf69" + size 329539 + provides (tm tm-edit tm-view mime-setup) + requires (gnus mh-e rmail vm mailcrypt mail-lib apel xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(supercite + (standards-version 1.0 + version "1.10" + author-version "3.55x2" + date "1998-08-9" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "comm" + dump nil + description "An Emacs citation tool for News & Mail messages." + filename "supercite-1.10-pkg.tar.gz" + md5sum "09dee2a7f1400bc8680ea067a2399dcb" + size 99403 + provides (supercite) + requires (mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(rmail + (standards-version 1.0 + version "1.07" + author-version "21.0" + date "1998-06-28" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution contrib + priority low + category "comm" + dump nil + description "An obsolete Emacs mailer." + filename "rmail-1.07-pkg.tar.gz" + md5sum "0b256dc4b02e832d939850f86951217a" + size 96475 + provides (rmail rmailsum) + requires (tm apel mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(mew + (standards-version 1.0 + version "1.04" + author-version "1.93b38" + date "1998-06-21" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution contrib + priority low + category "comm" + dump nil + description "Messaging in an Emacs World." + filename "mew-1.04-pkg.tar.gz" + md5sum "896793a5d91c0ecfe4af5a7351f82fb7" + size 517164 + provides (mew) + requires (mew) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(net-utils + (standards-version 1.0 + version "1.10" + author-version "21.0" + date "1998-07-01" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "comm" + dump nil + description "Miscellaneous Networking Utilities." + filename "net-utils-1.10-pkg.tar.gz" + md5sum "89f6d1830b90e701ab57fcadd7337bb8" + size 107129 + provides (ilisp-browse-cltl2 emacsbug feedmail metamail net-utils rcompile shadowfile webjump webster-www) + requires (w3 efs mail-lib xemacs-base) + type single +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(mh-e + (standards-version 1.0 + version "1.08" + author-version "21.0" + date "1998-07-12" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution contrib + priority low + category "comm" + dump nil + description "Front end support for MH." + filename "mh-e-1.08-pkg.tar.gz" + md5sum "f1995b0f516668922a5f4331d0c13187" + size 176392 + provides (mh-e) + requires (mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(mailcryptng + (standards-version 1.0 + version "1.01" + author-version "3.5b7" + date "1998-10-10" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "comm" + dump nil + description "Support for messaging encryption with PGP." + filename "mailcryptng-1.01-pkg.tar.gz" + md5sum "70bbfabaa083dc3a6178aa2be979705e" + size 120414 + provides (mailcrypt) + requires (gnus vm mail-lib fsf-compat xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(mailcrypt + (standards-version 1.0 + version "1.06" + author-version "3.4" + date "1998-01-24" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "comm" + dump nil + description "Support for messaging encryption with PGP." + filename "mailcrypt-1.06-pkg.tar.gz" + md5sum "e601fc5c1f43c5b7f577c7262c7877a9" + size 106355 + provides (mailcrypt) + requires (gnus vm mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(irchat + (standards-version 1.0 + version "1.03" + author-version "980625-2" + date "1998-09-08" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "comm" + dump nil + description "ZENIRC IRC Client." + filename "irchat-1.03-pkg.tar.gz" + md5sum "9d066b2d79ab2dd5e01e1b8733289aa4" + size 219214 + provides (irchat) + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(gnats + (standards-version 1.0 + version "1.07" + author-version "3.101" + date "1998-08-01" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority high + category "comm" + dump nil + description "XEmacs bug reports." + filename "gnats-1.07-pkg.tar.gz" + md5sum "40d23fbac2ea05d55be0d0822259b023" + size 189213 + provides (gnats gnats-admin send-pr) + requires (mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(footnote + (standards-version 1.0 + version "1.07" + author-version "0.18x" + date "1998-08-27" + build-date "1998-10-12" + maintainer "SL Baur " + distribution stable + priority low + category "comm" + dump nil + description "Footnoting in mail message editing modes." + filename "footnote-1.07-pkg.tar.gz" + md5sum "1064b49b7e13a467458af2bafd9e62fb" + size 13362 + provides (footnote) + requires (mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(eudc + (standards-version 1.0 + version "1.24" + author-version "1.24" + date "1998-10-15" + build-date "1998-10-15" + maintainer "Oscar Figueiredo " + distribution stable + priority low + category "comm" + dump nil + description "Emacs Unified Directory Client (LDAP, PH)." + filename "eudc-1.24-pkg.tar.gz" + md5sum "43c173e7e052c81b196c617fb22b6e00" + size 50837 + provides (eudc eudc-ldap eudc-ph) + requires (fsf-compat xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(bbdb + (standards-version 1.0 + version "1.06" + author-version "2.00.02" + date "1998-10-08" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "comm" + dump nil + description "The Big Brother Data Base" + filename "bbdb-1.06-pkg.tar.gz" + md5sum "4889d21fded3ae5cddee558e0d136a20" + size 281992 + provides (bbdb) + requires (bbdb edit-utils gnus mh-e rmail supercite vm tm apel mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(gnus + (standards-version 1.0 + version "1.33" + author-version "5.6.44" + date "1998-09-25" + build-date "1998-10-15" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "comm" + dump nil + description "The Gnus Newsreader and Mailreader." + filename "gnus-1.33-pkg.tar.gz" + md5sum "46a0466ec203cd7b0d78bfeb215a65f5" + size 1874633 + provides (gnus message) + requires (gnus w3 mh-e mailcrypt rmail mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(skk + (standards-version 1.0 + version "1.11" + author-version "10.38" + date "1998-10-01" + build-date "1998-10-12" + maintainer "SL Baur " + distribution mule + priority medium + category "mule" + dump t + description "Japanese Language Input Method." + filename "skk-1.11-pkg.tar.gz" + md5sum "c158751b558299be9b5f8f9d10216a79" + size 1513975 + provides (skk skk-tut) + requires (viper mule-base elib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(mule-base + (standards-version 1.0 + version "1.24" + author-version "21.0" + date "1998-08-12" + build-date "1998-10-12" + maintainer "SL Baur " + distribution mule + priority high + category "mule" + dump t + description "Basic Mule support, required for building with Mule." + filename "mule-base-1.24-pkg.tar.gz" + md5sum "9842af89469856fa1c7f3ed60c8c25cf" + size 508959 + provides (canna-leim canna char-table china-util cyril-util isearch-ext japan-util ccl can-n-egg mule-help) + requires (fsf-compat xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(egg-its + (standards-version 1.0 + version "1.13" + author-version "21.0" + date "1998-08-11" + build-date "1998-10-15" + maintainer "XEmacs Development Team " + distribution mule + priority high + category "mule" + dump t + description "Wnn (4.2 and 6) support. SJ3 support." + filename "egg-its-1.13-pkg.tar.gz" + md5sum "e7a5d51eb734310b9bb151c4fba05868" + size 259686 + provides (egg-cnpinyin egg-cnzhuyin egg-cwnn-leim egg-jisx0201 egg-jsymbol egg-kwnn-leim egg-leim egg-sj3-client egg-sj3-leim egg-sj3 egg-wnn egg) + requires (leim mule-base fsf-compat xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(edict + (standards-version 1.0 + version "1.06" + author-version "0.9.8" + date "1998-07-23" + build-date "1998-10-12" + maintainer "Stephen J. Turnbull " + distribution mule + priority high + category "mule" + dump nil + description "Lisp Interface to EDICT, Kanji Dictionary" + filename "edict-1.06-pkg.tar.gz" + md5sum "d9ba0f5372b2b83fe1499d1462dad3ca" + size 68008 + provides (dui-registry dui edict-edit edict-english edict-japanese edict-morphology edict-test edict ts-mode) + requires (mule-base xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(leim + (standards-version 1.0 + version "1.11" + author-version "21.0" + date "1998-07-23" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution mule + priority medium + category "mule" + dump nil + description "Quail. All non-English and non-Japanese language support." + filename "leim-1.11-pkg.tar.gz" + md5sum "19f4745d0364b46c7526a34777c653e5" + size 1670560 + provides () + requires (mule-base fsf-compat xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(locale + (standards-version 1.0 + version "1.10" + author-version "21.0" + date "1998-07-24" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution mule + priority high + category "mule" + dump nil + description "Localized menubars and localized splash screens." + filename "locale-1.10-pkg.tar.gz" + md5sum "8439f2d7e266f3e4c2f18a19aa967202" + size 32709 + provides () + requires (mule-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(time + (standards-version 1.0 + version "1.06" + author-version "1.17" + date "1998-04-24" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "oa" + dump nil + description "Display time & date on the modeline." + filename "time-1.06-pkg.tar.gz" + md5sum "f55965f3ef08e038bd58ca8f4fb83fe6" + size 20018 + provides (time) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(text-modes + (standards-version 1.0 + version "1.13" + author-version "21.0" + date "1998-09-24" + build-date "1998-10-15" + maintainer "XEmacs Development Team " + distribution stable + priority high + category "oa" + dump nil + description "Miscellaneous support for editing text files." + filename "text-modes-1.13-pkg.tar.gz" + md5sum "3209269c42e32e39f70259cb68855e4f" + size 195165 + provides (autoinsert crontab-edit filladapt fold-isearch folding image-mode iso-acc iso-ascii iso-cvt iso-insert iso-swed swedish tabify whitespace-mode winmgr-mode xpm-mode xrdb-mode) + requires (ispell fsf-compat xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(strokes + (standards-version 1.0 + version "1.03" + author-version "21.0" + date "1998-01-25" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "oa" + dump nil + description "Mouse enhancement utility." + filename "strokes-1.03-pkg.tar.gz" + md5sum "170257302196f106a54eb6dcf32fcc7a" + size 43480 + provides (strokes) + requires (text-modes edit-utils mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(speedbar + (standards-version 1.0 + version "1.10" + author-version "0.6.2x" + date "1998-10-02" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "oa" + dump nil + description "Provides a seperate frame with convenient references." + filename "speedbar-1.10-pkg.tar.gz" + md5sum "eab230ae2aa7d6ed5739f46ec4099dcf" + size 64861 + provides (speedbar) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(slider + (standards-version 1.0 + version "1.08" + author-version "0.3x1" + date "1998-08-13" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution experimental + priority low + category "oa" + dump nil + description "User interface tool." + filename "slider-1.08-pkg.tar.gz" + md5sum "8d2fe53d7d58fa0af58ac0359caccaca" + size 12018 + provides (slider color-selector) + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(sgml + (standards-version 1.0 + version "1.03" + author-version "21.0" + date "1998-01-25" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution contrib + priority low + category "oa" + dump nil + description "SGML/Linuxdoc-SGML editing." + filename "sgml-1.03-pkg.tar.gz" + md5sum "317c7f52a3215f53e964ad90f9c40909" + size 26928 + provides (sgml linuxdoc-sgml) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(psgml + (standards-version 1.0 + version "1.10" + author-version "1.01" + date "1998-07-06" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "oa" + dump nil + description "Validated HTML/SGML editing." + filename "psgml-1.10-pkg.tar.gz" + md5sum "15e584b90a2d2310a2be15ea2aa0717a" + size 424930 + provides (psgml sgml) + requires (edit-utils) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(pc + (standards-version 1.0 + version "1.13" + author-version "21.0" + date "1998-07-25" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "oa" + dump nil + description "PC style interface emulation." + filename "pc-1.13-pkg.tar.gz" + md5sum "e5355fb82d1dbd77ad522bffb334168d" + size 16306 + provides (delbs fusion pc-select pending-del s-region) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(ispell + (standards-version 1.0 + version "1.12" + author-version "3.0x2" + date "1998-09-15" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "oa" + dump nil + description "Spell-checking with GNU ispell." + filename "ispell-1.12-pkg.tar.gz" + md5sum "5786e4688024aae78fe75a5cbf92c446" + size 67168 + provides (ispell) + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(hm--html-menus + (standards-version 1.0 + version "1.08" + author-version "5.9" + date "1998-01-25" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "oa" + dump nil + description "HTML editing." + filename "hm--html-menus-1.08-pkg.tar.gz" + md5sum "1f0fda934b84c5eed96fcfd02a046398" + size 168017 + provides (adapt hm--date hm--html-configuration hm--html-drag-and-drop hm--html-indentation hm--html-keys hm--html-menu hm--html-mode hm--html-not-standard hm--html html-view tmpl-minor-mode) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(frame-icon + (standards-version 1.0 + version "1.05" + author-version "21.0" + date "1998-07-14" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution contrib + priority low + category "oa" + dump nil + description "Set up mode-specific icons for each frame under XEmacs" + filename "frame-icon-1.05-pkg.tar.gz" + md5sum "3d1a67ba8a51f74746ecb14385a025ef" + size 33490 + provides (forms forms-mode) + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(forms + (standards-version 1.0 + version "1.08" + author-version "2.10" + date "1998-01-25" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution contrib + priority low + category "oa" + dump nil + description "Forms editing support (obsolete, use Widget instead)." + filename "forms-1.08-pkg.tar.gz" + md5sum "8af074cfc164331838bc83eb79eed3b5" + size 47670 + provides (forms forms-mode) + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(edit-utils + (standards-version 1.0 + version "1.33" + author-version "21.0" + date "1998-09-29" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority high + category "oa" + dump nil + description "Miscellaneous editor extensions, you probably need this." + filename "edit-utils-1.33-pkg.tar.gz" + md5sum "0aa0b5d2864dc02a62fb6e87880c4733" + size 564543 + provides (abbrevlist atomic-extents avoid backup-dir balloon-help big-menubar blink-cursor blink-paren bookmark compare-w completion dabbrev desktop detached-minibuf edit-toolbar fast-lock file-part floating-toolbar flow-ctrl foldout func-menu hippie-exp icomplete id-select info-look iswitchb lazy-lock lazy-shot live-icon man mic-paren paren popper mode-motion+ outl-mouse page-ext blink-paren paren permanent-buffers recent-files redo reportmail rsz-minibuf saveconfsavehist saveplace scroll-in-place tempo toolbar-utils tree-menu uniquify where-was-i-db) + requires (xemacs-base) + type single +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(calendar + (standards-version 1.0 + version "1.08" + author-version "21.0" + date "1998-09-01" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "oa" + dump nil + description "Calendar and diary support." + filename "calendar-1.08-pkg.tar.gz" + md5sum "afe4b31eb98b130960046bb3c2385ed3" + size 248313 + provides (appt cal-dst cal-french cal-mayan cal-x cal-xemacs calendar diary-ins diary-lib holidays lunar solar) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(calc + (standards-version 1.0 + version "1.09" + author-version "2.02fX3" + date "1998-07-25" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "oa" + dump nil + description "Emacs calculator" + filename "calc-1.09-pkg.tar.gz" + md5sum "f0eb907a308a96da7ac5c3fc8c7d8bea" + size 1616564 + provides (calc) + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(vhdl + (standards-version 1.0 + version "1.06" + author-version "2.74" + date "1998-01-24" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "prog" + dump nil + description "Support for VHDL." + filename "vhdl-1.06-pkg.tar.gz" + md5sum "b6f786b7f682f76d57eeb94d3c917e56" + size 65943 + provides (vhdl-mode) + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(vc-cc + (standards-version 1.0 + version "1.09" + author-version "21.0" + date "1998-07-24" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution contrib + priority low + category "prog" + dump nil + description "Version Control for ClearCase (UnFree) systems." + filename "vc-cc-1.09-pkg.tar.gz" + md5sum "43f4947aeb368164aada9dc2df827ce7" + size 96473 + provides (vc) + requires (dired xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(vc + (standards-version 1.0 + version "1.14" + author-version "21.0" + date "1998-10-07" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "prog" + dump nil + description "Version Control for Free systems." + filename "vc-1.14-pkg.tar.gz" + md5sum "64c350d9c5280e7545e3dc3936992a8a" + size 83885 + provides (vc) + requires (dired xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(sh-script + (standards-version 1.0 + version "1.07" + author-version "2.0e" + date "1998-05-12" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "prog" + dump nil + description "Support for editing shell scripts." + filename "sh-script-1.07-pkg.tar.gz" + md5sum "c5dd114d8e925fc7c8ec6d9130489421" + size 33895 + provides (sh-script executable) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(scheme + (standards-version 1.0 + version "1.06" + author-version "21.0" + date "1998-09-08" + build-date "1998-10-11" + maintainer "Karl M. Hegbloom " + distribution contrib + priority low + category "prog" + dump nil + description "Front-end support for Inferior Scheme." + filename "scheme-1.06-pkg.tar.gz" + md5sum "86edb18517b7ed62929041c55ea68927" + size 36321 + provides (scheme xscheme cmuscheme cmuscheme48) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(prog-modes + (standards-version 1.0 + version "1.13" + author-version "21.0" + date "1998-10-15" + build-date "1998-10-15" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "prog" + dump nil + description "Support for various programming languages." + filename "prog-modes-1.13-pkg.tar.gz" + md5sum "6e78de455277b0fe757931532ca56a88" + size 574269 + provides (autoconf-mode cperl-mode eiffel3 f90 fortran ksh-mode m4-mode makefile perl-mode postscript python-mode rexx-mode simula-mode tcl teco verilog-mod) + requires (mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(pcl-cvs + (standards-version 1.0 + version "1.34" + author-version "R-2_0-Beta_2" + date "1998-10-12" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "prog" + dump nil + description "CVS frontend." + filename "pcl-cvs-1.34-pkg.tar.gz" + md5sum "6a3f944402c486679e7cb33f60b8689b" + size 161529 + provides (pcl-cvs generic-sc) + requires (xemacs-base elib dired) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(jde + (standards-version 1.0 + version "1.06" + author-version "2.05" + date "1998-07-09" + build-date "1998-10-11" + maintainer "Andy Piper " + distribution stable + priority medium + category "prog" + dump nil + description "Java language and development support." + filename "jde-1.06-pkg.tar.gz" + md5sum "402a03ac6482ee28a586ee41164cf4f5" + size 126911 + provides (jde) + requires (cc-mode debug speedbar edit-utils mail-lib xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(emerge + (standards-version 1.0 + version "1.04" + author-version "21.0" + date "1998-04-07" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "prog" + dump nil + description "Another interface over GNU patch." + filename "emerge-1.04-pkg.tar.gz" + md5sum "681e35d3a0c167782db2e93f37ee3147" + size 60972 + provides (emerge) + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(ediff + (standards-version 1.0 + version "1.13" + author-version "2.71" + date "up-mess): " + build-date "1998-10-15" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "prog" + dump nil + description "Interface over GNU patch." + filename "ediff-1.13-pkg.tar.gz" + md5sum "6435e57ce61d0b0262196866d62b63be" + size 281534 + provides (ediff) + requires (pcl-cvs elib dired xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(debug + (standards-version 1.0 + version "1.06" + author-version "21.0" + date "1998-07-09" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution contrib + priority low + category "prog" + dump nil + description "GUD, gdb, dbx debugging support." + filename "debug-1.06-pkg.tar.gz" + md5sum "807421911694a3c5853568efb71b88b0" + size 88964 + provides (dbx gdb-highlight gdb gdbsrc gud history) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(cc-mode + (standards-version 1.0 + version "1.13" + author-version "5.22" + date "1998-03-05" + build-date "1998-10-11" + maintainer "Barry Warsaw " + distribution stable + priority medium + category "prog" + dump nil + description "C, C++ and Java language support." + filename "cc-mode-1.13-pkg.tar.gz" + md5sum "1ea7ffaa586063356ae65f4777cfb431" + size 186436 + provides (cc-mode) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(c-support + (standards-version 1.0 + version "1.09" + author-version "21.0" + date "1998-03-25" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution contrib + priority low + category "prog" + dump nil + description "Basic single-file add-ons for editing C code." + filename "c-support-1.09-pkg.tar.gz" + md5sum "f9dc7f8884203038f750d1e96087dc9c" + size 68730 + provides (c-comment-edit cmacexp ctypes hideif hideshow) + requires (cc-mode xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(ada + (standards-version 1.0 + version "1.05" + author-version "2.27" + date "1998-01-24" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "prog" + dump nil + description "Ada language support." + filename "ada-1.05-pkg.tar.gz" + md5sum "374870f02139d0d80b56dab23f93b06d" + size 54388 + provides (ada-mode ada-stmt) + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(viper + (standards-version 1.0 + version "1.10" + author-version "3.03" + date "1998-02-25" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "wp" + dump nil + description "VI emulation support." + filename "viper-1.10-pkg.tar.gz" + md5sum "f34ad536e27aa564849fcfb2fcf22a29" + size 315794 + provides (viper) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(tpu + (standards-version 1.0 + version "1.07" + author-version "4.2X" + date "1998-07-23" + build-date "1998-10-11" + maintainer "Kevin Oberman " + distribution normal + priority medium + category "wp" + dump nil + description "DEC EDIT/TPU support." + filename "tpu-1.07-pkg.tar.gz" + md5sum "be15173be8a57fcb7b7244a143026f8c" + size 58801 + provides (tpu) + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(textools + (standards-version 1.0 + version "1.07" + author-version "21.0" + date "1998-04-29" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stabl + priority medium + category "wp" + dump nil + description "Miscellaneous TeX support." + filename "textools-1.07-pkg.tar.gz" + md5sum "a7dff92bcb92c3401f7e6085216f72d7" + size 79178 + provides (bib-mode bibtex refer-to-bibtex) + requires (xemacs-base) + type single +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(texinfo + (standards-version 1.0 + version "1.13" + author-version "21.0" + date "1998-07-20" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority high + category "wp" + dump nil + description "XEmacs TeXinfo support." + filename "texinfo-1.13-pkg.tar.gz" + md5sum "460efede51ea17cd85872959fcf6474f" + size 127794 + provides (makeinfo tex-mode texinfmt texinfo texnfo-tex texnfo-upd) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(reftex + (standards-version 1.0 + version "1.09" + author-version "3.41" + date "1998-08-11" + build-date "1998-10-11" + maintainer "Carsten Dominik " + distribution stable + priority medium + category "wp" + dump nil + description "Emacs support for LaTeX cross-references, citations.." + filename "reftex-1.09-pkg.tar.gz" + md5sum "c7c12198809741e20431cf14a6b965c4" + size 204664 + provides (reftex) + requires (fsf-compat xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(edt + (standards-version 1.0 + version "1.06" + author-version "21.0" + date "1998-04-07" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution contrib + priority low + category "wp" + dump nil + description "DEC EDIT/EDT emulation." + filename "edt-1.06-pkg.tar.gz" + md5sum "bb559e2a5c87b7b3f466b83a2ed7ef3b" + size 46138 + provides (edt) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(crisp + (standards-version 1.0 + version "1.08" + author-version "1.34" + date "1998-08-18" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "wp" + dump nil + description "Crisp/Brief emulation." + filename "crisp-1.08-pkg.tar.gz" + md5sum "2c18df3dd1eb14e01768832b2b208af4" + size 10077 + provides (crisp scroll-lock) + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(auctex + (standards-version 1.0 + version "1.15" + author-version "9.7p" + date "1998-09-30" + build-date "1998-10-15" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "wp" + dump nil + description "Basic TeX/LaTeX support." + filename "auctex-1.15-pkg.tar.gz" + md5sum "491d156e8e1f91b6b1604eccdfddace3" + size 365003 + provides (auc-old bib-cite font-latex latex multi-prompt tex-buf tex-info tex-jp tex-site tex) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(view-process + (standards-version 1.0 + version "1.05" + author-version "2.4" + date "1998-01-24" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "os" + dump nil + description "A Unix process browsing tool." + filename "view-process-1.05-pkg.tar.gz" + md5sum "ec1ba005feb4ea54a832c9d07414de11" + size 59881 + provides (view-process-mode) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(os-utils + (standards-version 1.0 + version "1.12" + author-version "21.0" + date "1998-10-01" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "os" + dump nil + description "Miscellaneous O/S utilities." + filename "os-utils-1.12-pkg.tar.gz" + md5sum "603eb56b2af67de1663c9a3fa700b2ae" + size 227137 + provides (archive-mode background crypt crypt++ inf-lisp jka-compr lpr mchat ps-print tar-mode telnet terminal uncompress) + requires (xemacs-base) + type single +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(ilisp + (standards-version 1.0 + version "1.06" + author-version "5.8" + date "1998-01-24" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "os" + dump nil + description "Front-end for Inferior Lisp." + filename "ilisp-1.06-pkg.tar.gz" + md5sum "89c81fd6dac09a58d09e46ee10db4484" + size 262258 + provides (ilisp completer) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(igrep + (standards-version 1.0 + version "1.04" + author-version "2.83" + date "1998-08-11" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "os" + dump nil + description "Enhanced front-end for Grep." + filename "igrep-1.04-pkg.tar.gz" + md5sum "8621b52d6316c14821334191477a8ba7" + size 14904 + provides (igrep) + requires (dired xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(eterm + (standards-version 1.0 + version "1.07" + author-version "21.0" + date "1998-06-28" + build-date "1998-10-12" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "os" + dump nil + description "Terminal emulation." + filename "eterm-1.07-pkg.tar.gz" + md5sum "f25bfd3c591f9ca5be6f3705ea2681a3" + size 108929 + provides (eterm) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(misc-games + (standards-version 1.0 + version "1.08" + author-version "21.0" + date "1998-03-22" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "games" + dump nil + description "Other amusements and diversions." + filename "misc-games-1.08-pkg.tar.gz" + md5sum "ca010a30375137a14b3c37989ad61c48" + size 165701 + provides (decipher gomoku hanoi life morse rot13) + requires (xemacs-base) + type single +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(mine + (standards-version 1.0 + version "1.09" + author-version "1.9" + date "1998-05-09" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "games" + dump nil + description "Minehunt Game." + filename "mine-1.09-pkg.tar.gz" + md5sum "044c1e48ffca88adf46e0df91d456a49" + size 66794 + provides (xmine) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(games + (standards-version 1.0 + version "1.07" + author-version "1.04" + date "1998-06-04" + build-date "1998-10-11" + maintainer "Glynn Clements " + distribution stable + priority low + category "games" + dump nil + description "Tetris, Sokoban, and Snake." + filename "games-1.07-pkg.tar.gz" + md5sum "ac3fa3b5de00f0daa50c1f372e5b86e0" + size 32101 + provides (gamegrid snake tetris sokoban) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(cookie + (standards-version 1.0 + version "1.09" + author-version "21.0" + date "1998-04-07" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "games" + dump nil + description "Spook and Yow (Zippy quotes)." + filename "cookie-1.09-pkg.tar.gz" + md5sum "c0618f8a6db3951c081f053233fb75b5" + size 34228 + provides (cookie1 yow) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(xemacs-devel + (standards-version 1.0 + version "1.19" + author-version "21.0" + date "1998-09-18" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "libs" + dump nil + description "Emacs Lisp developer support." + filename "xemacs-devel-1.19-pkg.tar.gz" + md5sum "1a9a1d467ae39ce1e93f5fd238112b3e" + size 83669 + provides (docref eldoc elp find-func hide-copyleft ielm regexp-opt trace) + requires (xemacs-base) + type single +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(xemacs-base + (standards-version 1.0 + version "1.27" + author-version "21.0" + date "1998-10-08" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution mule + priority high + category "libs" + dump nil + description "Fundamental XEmacs support, you almost certainly need this." + filename "xemacs-base-1.27-pkg.tar.gz" + md5sum "bbede4998cdf5af078c0e41d7b9af7c8" + size 429962 + provides (add-log advice annotations assoc case-table chistory comint-xemacs comint compile debug ebuff-menu echistory edmacro ehelp electric enriched env facemenu ffap helper imenu iso-syntax macros novice outline overlay passwd pp regi ring shell skeleton sort thing time-stamp timezone xbm-button xpm-button) + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(tooltalk + (standards-version 1.0 + version "1.08" + author-version "21.0" + date "1998-07-25" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution contrib + priority low + category "libs" + dump nil + description "Support for building with Tooltalk." + filename "tooltalk-1.08-pkg.tar.gz" + md5sum "9b4d7a73f9bd50273a011b1ed6522535" + size 9293 + provides () + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(mail-lib + (standards-version 1.0 + version "1.18" + author-version "21.0" + date "1998-06-08" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority medium + category "libs" + dump nil + description "Fundamental lisp files for providing email support." + filename "mail-lib-1.18-pkg.tar.gz" + md5sum "25896164b50a8c09a45fdf74342c48ea" + size 120245 + provides (browse-url highlight-headers mail-abbrevs mail-extr mail-utils reporter rfc822 rmail-mini rmailout sendmail smtpmail) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(fsf-compat + (standards-version 1.0 + version "1.04" + author-version "21.0" + date "1998-09-12" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution mule + priority high + category "libs" + dump nil + description "FSF Emacs compatibility files." + filename "fsf-compat-1.04-pkg.tar.gz" + md5sum "629a4f399a410e88841db23014d00300" + size 17419 + provides (overlay thingatpt timer x-popup-menu) + requires () + type single +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(elib + (standards-version 1.0 + version "1.03" + author-version "1.0" + date "1998-10-01" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution mule + priority high + category "libs" + dump nil + description "Portable Emacs Lisp utilities library." + filename "elib-1.03-pkg.tar.gz" + md5sum "f65ecef3ac286ee59e102f5fc5ad62cc" + size 72830 + provides (avltree bintree cookie dll elib-node queue-f queue-m read stack-f stack-m string) + requires () + type single +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(efs + (standards-version 1.0 + version "1.11" + author-version "1.17" + date "1998-08-23" + build-date "1998-10-11" + maintainer "Mike Sperber " + distribution stable + priority medium + category "libs" + dump nil + description "Treat files on remote systems the same as local files." + filename "efs-1.11-pkg.tar.gz" + md5sum "88a538a5016ae53380dba011db80887a" + size 368997 + provides (efs) + requires (xemacs-base vm dired) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(edebug + (standards-version 1.0 + version "1.06" + author-version "21.0" + date "1998-03-12" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority low + category "libs" + dump nil + description "An Emacs Lisp debugger." + filename "edebug-1.06-pkg.tar.gz" + md5sum "a897be415a8b68c1f79a3632374c9174" + size 112385 + provides (edebug cl-read cust-print eval-reg cl-specs) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(dired + (standards-version 1.0 + version "1.03" + author-version "7.9" + date "1998-05-05" + build-date "1998-10-11" + maintainer "Mike Sperber " + distribution stable + priority medium + category "libs" + dump nil + description "Manage file systems." + filename "dired-1.03-pkg.tar.gz" + md5sum "30e621efdf8b83e72ad3b68f4e795069" + size 187593 + provides (diff dired) + requires (xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(apel + (standards-version 1.0 + version "1.07" + author-version "3.3" + date "1998-07-23" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution mule + priority high + category "libs" + dump nil + description "A Portable Emacs Library. Used by XEmacs MIME support." + filename "apel-1.07-pkg.tar.gz" + md5sum "a650a5235403b0a1b46b3269634498e3" + size 34784 + provides (atype emu-20 emu-e19 emu-x20 emu-xemacs emu file-detect filename install mule-caesar path-util richtext std11-parse std11 tinyrich) + requires (fsf-compat xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(Sun + (standards-version 1.0 + version "1.09" + author-version "21.0" + date "1998-07-25" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution sun + priority low + category "libs" + dump nil + description "Support for Sparcworks." + filename "Sun-1.09-pkg.tar.gz" + md5sum "dc41d791f7c66dc13e8d0d206689188b" + size 63916 + provides (sccs eos-browser eos-common eos-debugger eos-debugger eos-editor eos-init eos-load eos-menubar eos-toolbar sunpro) + requires (cc-mode xemacs-base) + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(sounds-au + (standards-version 1.0 + version "1.05" + author-version "21.0" + date "1998-06-30" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority high + category "libs" + dump nil + description "XEmacs Sun sound files." + filename "sounds-au-1.05-pkg.tar.gz" + md5sum "5e44ddd6754771e35303bf4e71c17a17" + size 125753 + provides () + requires () + type regular +)) +)) +;;;@@@ +(package-get-update-base-entry (quote +(sounds-wav + (standards-version 1.0 + version "1.05" + author-version "21.0" + date "1998-06-30" + build-date "1998-10-11" + maintainer "XEmacs Development Team " + distribution stable + priority high + category "libs" + dump nil + description "XEmacs Microsoft sound files." + filename "sounds-wav-1.05-pkg.tar.gz" + md5sum "e110bc6096bcd24181b45c1b7f83eb59" + size 148564 + provides () + requires () + type regular +)) +)) +;;;@@@ +;; Package Index file ends here + +-----BEGIN PGP SIGNATURE----- +Version: 2.6.2 + +iQCVAwUBNibr5aLJZEUiepcNAQHmWQP+PDjjOvmsdhu6RGXIFCUPV4ado8IWD8i8 +/aEwLHJRdoQWEg0ZuiNgmtF2iNPrNIOkSs9hF+sOF4xoszhxaytfFG7DEA5Q8Alb +jKooHKEUEF7W0wAxihyGojz3VuH5i7GKAtOcVqFtgWS3eAkNaN4QWlmhxavh0Cdv +p7wnfYTZYSs= +=65go +-----END PGP SIGNATURE----- diff -r 73c75c43c1f2 -r 19dcec799385 etc/xemacs.1 --- a/etc/xemacs.1 Mon Aug 13 10:46:01 2007 +0200 +++ b/etc/xemacs.1 Mon Aug 13 10:46:44 2007 +0200 @@ -126,7 +126,7 @@ .B \-eval options to specify files to execute and functions to call. .TP -.B \-nw\ +.B \-nw Inhibit the use of any window-system-specific display code: use the current TTY. .TP diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/ChangeLog --- a/lib-src/ChangeLog Mon Aug 13 10:46:01 2007 +0200 +++ b/lib-src/ChangeLog Mon Aug 13 10:46:44 2007 +0200 @@ -1,3 +1,48 @@ +1998-12-08 XEmacs Build Bot + + * XEmacs 21.0.58 is released + +1998-10-14 Andy Piper + + * Makefile.in.in (movemail): add getopt.o to objects to link with. + + * movemail.c (main): rewrite to use getopt(). Add options for + order reversal, progress output, regexp matching and message + deletion. + (popmail): add some optional verbose messages. Use pop_search_top + for getting messages. Make message deletion optional. Delete all + messages at the end rather than on a message my message basis. + (pop_search_top): new function. Looks for messages matching regexp. + (compile_regex): new function stolen from etags. + +1998-10-12 SL Baur + + * gnudepend.pl: Use /usr/bin/perl. + * Makefile.in.in (INSTALLABLE_SCRIPTS): Remove send-pr, install-sid. + (GEN_SCRIPTS): Ditto. + Delete TM_SCRIPTS. + +1998-10-11 SL Baur + + * tm-au: + * tm-file: + * tm-html: + * tm-image: + * tm-mpeg: + * tm-plain: + * tm-ps: + * tmdecode: packaged. + +1998-10-10 SL Baur + + * install-sid: + * send-pr: Packaged + +1998-10-01 Jan Vroonhof + + * gnuclient.c (filename_expand): Don't forget to copy the + filename under UNIX. + 1998-09-29 SL Baur * XEmacs 21.0-pre14 is released. diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/Makefile.in.in --- a/lib-src/Makefile.in.in Mon Aug 13 10:46:01 2007 +0200 +++ b/lib-src/Makefile.in.in Mon Aug 13 10:46:44 2007 +0200 @@ -70,7 +70,7 @@ ## Things that a user might actually run, ## which should be installed in bindir. INSTALLABLES_BASE = etags ctags b2m gnuclient ootags -INSTALLABLE_SCRIPTS = rcs-checkin pstogif install-sid send-pr gnudoit gnuattach +INSTALLABLE_SCRIPTS = rcs-checkin pstogif gnudoit gnuattach #ifdef HAVE_MS_WINDOWS INSTALLABLES = $(INSTALLABLES_BASE) runemacs #else @@ -87,10 +87,9 @@ ## Like UTILITIES, but they are not system-dependent, and should not be ## deleted by the distclean target. -GEN_SCRIPTS = rcs2log vcdiff gzip-el.sh install-sid send-pr -TM_SCRIPTS = tm-au tm-file tm-html tm-image tm-mpeg tm-plain tm-ps tmdecode +GEN_SCRIPTS = rcs2log vcdiff gzip-el.sh PKG_SCRIPTS = add-big-package.sh -SCRIPTS = $(GEN_SCRIPTS) $(TM_SCRIPTS) $(PKG_SCRIPTS) +SCRIPTS = $(GEN_SCRIPTS) $(PKG_SCRIPTS) EXECUTABLES= ${UTILITIES} ${INSTALLABLES} ${SCRIPTS} ${INSTALLABLE_SCRIPTS} @@ -311,8 +310,10 @@ b2m: ${srcdir}/b2m.c ../src/config.h $(CC) $(cflags) ${srcdir}/b2m.c $(ldflags) -o $@ -movemail: ${srcdir}/movemail.c ${srcdir}/pop.c ${srcdir}/pop.h ../src/config.h - $(CC) $(cflags) ${MOVE_FLAGS} ${srcdir}/movemail.c ${srcdir}/pop.c $(ldflags) ${MOVE_LIBS} -o $@ +movemail: ${srcdir}/movemail.c ${srcdir}/pop.c ${srcdir}/pop.h $(GETOPTDEPS) regex.o \ + ../src/config.h + $(CC) $(cflags) ${MOVE_FLAGS} ${srcdir}/movemail.c ${srcdir}/pop.c \ + $(GETOPTOBJS) regex.o $(ldflags) ${MOVE_LIBS} -o $@ cvtmail: ${srcdir}/cvtmail.c $(CC) $(cflags) ${srcdir}/cvtmail.c $(ldflags) -o $@ diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/gnuclient.c --- a/lib-src/gnuclient.c Mon Aug 13 10:46:01 2007 +0200 +++ b/lib-src/gnuclient.c Mon Aug 13 10:46:44 2007 +0200 @@ -217,6 +217,8 @@ ; /* yep */ else strcat (fullpath, "/"); /* nope, append trailing slash */ + /* Don't forget to add the filename! */ + strcat (fullpath,filename); } } /* filename_expand */ diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/gnudepend.pl --- a/lib-src/gnudepend.pl Mon Aug 13 10:46:01 2007 +0200 +++ b/lib-src/gnudepend.pl Mon Aug 13 10:46:44 2007 +0200 @@ -1,4 +1,4 @@ -#!/usr/local/bin/perl +#!/usr/bin/perl while (<>) { diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/install-sid --- a/lib-src/install-sid Mon Aug 13 10:46:01 2007 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,88 +0,0 @@ -#!/bin/sh -# Drop in the SUBMITTER id into a site's installed send-pr script. -# Copyright (C) 1993 Free Software Foundation, Inc. -# Contributed by Brendan Kehoe (brendan@cygnus.com), based on a -# version written by Heinz G. Seidl (hgs@ide.com). -# -# This file is part of GNU GNATS. -# -# GNU GNATS is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# GNU GNATS is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with GNU GNATS; see the file COPYING. If not, write to -# the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. - -COMMAND=`echo $0 | sed -e 's,.*/,,g'` -USAGE="Usage: $COMMAND [--install-dir=prefix] [--help] [--version] submitter-id" - -VERSION=3.101 - -BINDIR=/usr/bin - -SUBMITTER= -TEMP=/tmp/sp$$ - -if [ $# -eq 0 ]; then - echo "$USAGE" - exit 1 -fi - -while [ $# -gt 0 ]; do - case "$1" in - -install-dir=*|--install-dir=*|--install-di=*|--install-d=*|--install-=*|--install=*|--instal=*|--insta=*|--inst=*|--ins=*|--in=*|--i=*) - I=`echo "$1" | sed 's/-*i[a-z\-]*=//'` - BINDIR=$I/bin ;; - --version) echo $COMMAND version $VERSION ; exit 1 ;; - -*) echo "$USAGE" ; exit 1 ;; - *) SUBMITTER=$1 ;; - esac - shift -done - -path=`echo $0 | sed -e "s;${COMMAND};;"` - -[ -z "$path" ] && path=. - -examinebindir=yes - -if [ "$examinebindir" = yes ] && [ -f $BINDIR/send-pr ]; then - SPPATHLIST=$BINDIR/send-pr -else - if [ -f $path/send-pr ]; then - SPPATHLIST=$path/send-pr - else - echo "$COMMAND: cannot find \`$BINDIR/send-pr' or \`$path/send-pr'" >&2 - exit 1 - fi -fi - -trap 'rm -f $TEMP ; exit 0' 0 -trap 'echo "$COM: Aborting ..."; rm -f $TEMP ; exit 1' 1 2 3 13 15 - -for SPPATH in $SPPATHLIST; do - sed -e "s/^SUBMITTER=.*/SUBMITTER=${SUBMITTER}/" $SPPATH > $TEMP - - if grep $SUBMITTER $TEMP > /dev/null; then - cp $SPPATH $SPPATH.orig && - rm -f $SPPATH && - cp $TEMP $SPPATH && - chmod a+rx $SPPATH && - rm -f $TEMP $SPPATH.orig || - { echo "$COMMAND: unable to replace send-pr" >&2 ; exit 1; } - else - echo "$COMMAND: something went wrong when sed-ing the submitter into send-pr" >&2 - exit 1 - fi -done - -echo "$COMMAND: \`$SUBMITTER' is now the default submitter ID for send-pr" - -exit 0 diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/movemail.c --- a/lib-src/movemail.c Mon Aug 13 10:46:01 2007 +0200 +++ b/lib-src/movemail.c Mon Aug 13 10:46:44 2007 +0200 @@ -65,10 +65,15 @@ #include "../src/systime.h" #include #include +#include "getopt.h" #ifdef MAIL_USE_POP #include "pop.h" +#include #endif +extern char *optarg; +extern int optind, opterr; + #ifndef HAVE_STRERROR static char * strerror (int errnum); #endif /* HAVE_STRERROR */ @@ -146,15 +151,43 @@ static int mbx_write (char *, FILE *); static int mbx_delimit_begin (FILE *); static int mbx_delimit_end (FILE *); +static struct re_pattern_buffer* compile_regex (char* regexp_pattern); +static int pop_search_top (popserver server, int msgno, int lines, + struct re_pattern_buffer* regexp); #endif /* Nonzero means this is name of a lock file to delete on fatal error. */ char *delete_lockname; +int verbose=0; +#ifdef MAIL_USE_POP +int reverse=0; +int keep_messages=0; +struct re_pattern_buffer* regexp_pattern=0; +int match_lines=10; +#endif + +#define VERBOSE(x) if (verbose) { printf x; fflush(stdout); } + +struct option longopts[] = +{ + { "inbox", required_argument, NULL, 'i' }, + { "outfile", required_argument, NULL, 'o' }, +#ifdef MAIL_USE_POP + { "password", required_argument, NULL, 'p' }, + { "reverse-pop-order", no_argument, NULL, 'x' }, + { "keep-messages", no_argument, NULL, 'k' }, + { "regex", required_argument, NULL, 'r' }, + { "match-lines", required_argument, NULL, 'l' }, +#endif + { "verbose", no_argument, NULL, 'v' }, + { 0 } +}; + int main (int argc, char *argv[]) { - char *inname, *outname; + char *inname=0, *outname=0, *poppass=0; #ifndef DISABLE_DIRECT_ACCESS int indesc, outdesc; int nread; @@ -172,15 +205,73 @@ delete_lockname = 0; - if (argc < 3) + while (1) { - fprintf (stderr, "Usage: movemail inbox destfile [POP-password]\n"); +#ifdef MAIL_USE_POP + char* optstring = "i:o:p:l:r:xvk"; +#else + char* optstring = "i:o:v"; +#endif + int opt = getopt_long (argc, argv, optstring, longopts, 0); + + if (opt == EOF) + break; + + switch (opt) + { + case 0: + break; + case 1: /* one of the standard arguments seen */ + if (!inname) + inname = optarg; + else if (!outname) + outname = optarg; + else + poppass = optarg; + break; + + case 'i': /* infile */ + inname = optarg; + break; + + case 'o': /* outfile */ + outname = optarg; + break; +#ifdef MAIL_USE_POP + case 'p': /* pop password */ + poppass = optarg; + break; + case 'k': keep_messages=1; break; + case 'x': reverse = 1; break; + case 'l': /* lines to match */ + match_lines = atoi (optarg); + break; + + case 'r': /* regular expression */ + regexp_pattern = compile_regex (optarg); + break; +#endif + case 'v': verbose = 1; break; + } + } + + while (optind < argc) + { + if (!inname) + inname = argv[optind]; + else if (!outname) + outname = argv[optind]; + else + poppass = argv[optind]; + optind++; + } + + if (!inname || !outname) + { + fprintf (stderr, "Usage: movemail [-rvxk] [-l lines ] [-i] inbox [-o] destfile [[-p] POP-password]\n"); exit(1); } - inname = argv[1]; - outname = argv[2]; - #ifdef MAIL_USE_MMDF mmdf_init (argv[0]); #endif @@ -210,7 +301,7 @@ #ifdef MAIL_USE_POP if (!strncmp (inname, "po:", 3)) { - int retcode = popmail (inname + 3, outname, argc > 3 ? argv[3] : NULL); + int retcode = popmail (inname + 3, outname, poppass); exit (retcode); } @@ -487,9 +578,9 @@ #include #include -#define NOTOK (-1) -#define OK 0 -#define DONE 1 +#define POP_ERROR (-1) +#define POP_RETRIEVED (0) +#define POP_DONE (1) char *progname; FILE *sfi; @@ -502,11 +593,13 @@ popmail (char *user, char *outfile, char *password) { int nmsgs, nbytes; - register int i; + register int i, idx; int mbfi; + short* retrieved_list; FILE *mbf; popserver server; + VERBOSE(("opening server\r")); server = pop_open (0, user, password, POP_NO_GETPASS); if (! server) { @@ -514,6 +607,7 @@ return (1); } + VERBOSE(("stat'ing messages\r")); if (pop_stat (server, &nmsgs, &nbytes)) { error (pop_error, NULL, NULL); @@ -522,10 +616,15 @@ if (!nmsgs) { + VERBOSE(("closing server\n")); pop_close (server); return (0); } + /* build a retrieved table */ + retrieved_list = (short*) xmalloc (sizeof (short) * (nmsgs+1)); + memset (retrieved_list, 0, sizeof (short) * (nmsgs+1)); + mbfi = open (outfile, O_WRONLY | O_CREAT | O_EXCL, 0666); if (mbfi < 0) { @@ -546,23 +645,35 @@ return (1); } - for (i = 1; i <= nmsgs; i++) + for (idx = 0; idx < nmsgs; idx++) { - mbx_delimit_begin (mbf); - if (pop_retr (server, i, mbx_write, mbf) != OK) + i = reverse ? nmsgs - idx : idx + 1; + VERBOSE(("checking message %d \r", i)); + + if (!regexp_pattern + || + pop_search_top (server, i, match_lines, regexp_pattern) == POP_RETRIEVED) { - error (Errmsg, NULL, NULL); - close (mbfi); - return (1); - } - mbx_delimit_end (mbf); - fflush (mbf); - if (ferror (mbf)) - { - error ("Error in fflush: %s", strerror (errno), NULL); - pop_close (server); - close (mbfi); - return (1); + VERBOSE(("retrieving message %d \r", i)); + mbx_delimit_begin (mbf); + if (pop_retr (server, i, mbx_write, mbf) != POP_RETRIEVED) + { + error (Errmsg, NULL, NULL); + close (mbfi); + return (1); + } + + retrieved_list[i]=1; + + mbx_delimit_end (mbf); + fflush (mbf); + if (ferror (mbf)) + { + error ("Error in fflush: %s", strerror (errno), NULL); + pop_close (server); + close (mbfi); + return (1); + } } } @@ -586,16 +697,24 @@ return (1); } - for (i = 1; i <= nmsgs; i++) + if (!keep_messages) { - if (pop_delete (server, i)) + for (i = 1; i <= nmsgs; i++) { - error (pop_error, NULL, NULL); - pop_close (server); - return (1); + if (retrieved_list[i] == 1) + { + VERBOSE(("deleting message %d \r", i)); + if (pop_delete (server, i)) + { + error (pop_error, NULL, NULL); + pop_close (server); + return (1); + } + } } } + VERBOSE(("closing server \n")); if (pop_quit (server)) { error (pop_error, NULL, NULL); @@ -615,7 +734,7 @@ { strncpy (Errmsg, pop_error, sizeof (Errmsg)); Errmsg[sizeof (Errmsg)-1] = '\0'; - return (NOTOK); + return (POP_ERROR); } while (! (ret = pop_retrieve_next (server, &line))) @@ -623,11 +742,11 @@ if (! line) break; - if ((*action)(line, arg) != OK) + if ((*action)(line, arg) != POP_RETRIEVED) { strcpy (Errmsg, strerror (errno)); pop_close (server); - return (NOTOK); + return (POP_ERROR); } } @@ -635,10 +754,56 @@ { strncpy (Errmsg, pop_error, sizeof (Errmsg)); Errmsg[sizeof (Errmsg)-1] = '\0'; - return (NOTOK); + return (POP_ERROR); + } + + return (POP_RETRIEVED); +} + +/* search the top lines of each message looking for a match */ +static int +pop_search_top (popserver server, int msgno, int lines, struct re_pattern_buffer* regexp) +{ + char *line; + int ret; + int match = POP_DONE; + + if (pop_top_first (server, msgno, lines, &line)) + { + strncpy (Errmsg, pop_error, sizeof (Errmsg)); + Errmsg[sizeof (Errmsg)-1] = '\0'; + return (POP_ERROR); } - return (OK); + while (! (ret = pop_top_next (server, &line))) + { + if (! line) + break; + + /* VERBOSE (("checking %s\n", line));*/ + if (match != POP_RETRIEVED) + { + if ((ret = re_match (regexp, line, strlen (line), 0, 0)) == -2 ) + { + strcpy (Errmsg, "error in regular expression"); + pop_close (server); + return (POP_ERROR); + } + else if (ret >=0) + { + match = POP_RETRIEVED; + } + } + } + + if (ret) + { + strncpy (Errmsg, pop_error, sizeof (Errmsg)); + Errmsg[sizeof (Errmsg)-1] = '\0'; + return (POP_ERROR); + } + + return match; } /* Do this as a macro instead of using strcmp to save on execution time. */ @@ -654,31 +819,57 @@ if (IS_FROM_LINE (line)) { if (fputc ('>', mbf) == EOF) - return (NOTOK); + return (POP_ERROR); } if (fputs (line, mbf) == EOF) - return (NOTOK); + return (POP_ERROR); if (fputc (0x0a, mbf) == EOF) - return (NOTOK); - return (OK); + return (POP_ERROR); + return (POP_RETRIEVED); } static int mbx_delimit_begin (FILE *mbf) { if (fputs ("\f\n0, unseen,,\n", mbf) == EOF) - return (NOTOK); - return (OK); + return (POP_ERROR); + return (POP_RETRIEVED); } static int mbx_delimit_end (FILE *mbf) { if (putc ('\037', mbf) == EOF) - return (NOTOK); - return (OK); + return (POP_ERROR); + return (POP_RETRIEVED); } +/* Turn a name, which is an ed-style (but Emacs syntax) regular + expression, into a real regular expression by compiling it. */ +static struct re_pattern_buffer* +compile_regex (char* regexp_pattern) +{ + char *err; + struct re_pattern_buffer *patbuf=0; + + patbuf = (struct re_pattern_buffer*) xmalloc (sizeof (struct re_pattern_buffer)); + patbuf->translate = NULL; + patbuf->fastmap = NULL; + patbuf->buffer = NULL; + patbuf->allocated = 0; + + err = (char*) re_compile_pattern (regexp_pattern, strlen (regexp_pattern), patbuf); + if (err != NULL) + { + error ("%s while compiling pattern", err, NULL); + return 0; + } + + return patbuf; +} + + + #endif /* MAIL_USE_POP */ #ifndef HAVE_STRERROR diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/send-pr --- a/lib-src/send-pr Mon Aug 13 10:46:01 2007 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,530 +0,0 @@ -#!/bin/sh -# Submit a problem report to a GNATS site. -# Copyright (C) 1993 Free Software Foundation, Inc. -# Contributed by Brendan Kehoe (brendan@cygnus.com), based on a -# version written by Heinz G. Seidl (hgs@cygnus.com). -# -# This file is part of GNU GNATS. -# -# GNU GNATS is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# GNU GNATS is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with GNU GNATS; see the file COPYING. If not, write to -# the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. - -# The version of this send-pr. -VERSION=3.101 - -# The submitter-id for your site. -SUBMITTER=net - -# Where the GNATS directory lives, if at all. -[ -z "$GNATS_ROOT" ] && -GNATS_ROOT=/usr/lib/gnats/gnats-db - -# The default mail address for PR submissions. -GNATS_ADDR=bugs@xemacs.org - -# Where the gnats category tree lives. -[ -z "$DATADIR" ] && -DATADIR=/usr/share - -# If we've been moved around, try using GCC_EXEC_PREFIX. -[ ! -d $DATADIR/gnats -a -d "$GCC_EXEC_PREFIX" ] && - DATADIR=${GCC_EXEC_PREFIX}../../../lib - - -# The default release for this host. -DEFAULT_RELEASE="gnats-3.101" - -# The default organization. -DEFAULT_ORGANIZATION="XEmacs Users" - -# The default site to look for. -GNATS_SITE=xemacs.org - -# Newer config information? -[ -f ${GNATS_ROOT}/gnats-adm/config ] && . ${GNATS_ROOT}/gnats-adm/config - -# What mailer to use. This must come after the config file, since it is -# host-dependent. -MAIL_AGENT="/usr/lib/sendmail -oi -t" - -# How to read the passwd database. -PASSWD="cat /etc/passwd" - -ECHON=bsd - -if [ $ECHON = bsd ] ; then - ECHON1="echo -n" - ECHON2= -elif [ $ECHON = sysv ] ; then - ECHON1=echo - ECHON2='\c' -else - ECHON1=echo - ECHON2= -fi - -# - -if [ -z "$TMPDIR" ]; then - TMPDIR=/tmp -else - if [ "`echo $TMPDIR | grep '/$'`" != "" ]; then - TMPDIR="`echo $TMPDIR | sed -e 's,/$,,'`" - fi -fi - -TEMP=$TMPDIR/p$$ -BAD=$TMPDIR/pbad$$ -REF=$TMPDIR/pf$$ - -# find a user name -if [ "$LOGNAME" = "" ]; then - if [ "$USER" != "" ]; then - LOGNAME="$USER" - else - LOGNAME="UNKNOWN" - fi -fi - -FROM="$LOGNAME" -if [ -z "$REPLYTO" ]; then - REPLYTO="$LOGNAME" -fi - -# Find out the name of the originator of this PR. -if [ -n "$NAME" ]; then - ORIGINATOR="$NAME" -elif [ -f $HOME/.fullname ]; then - ORIGINATOR="`sed -e '1q' $HOME/.fullname`" -else - # Must use temp file due to incompatibilities in quoting behavior - # and to protect shell metacharacters in the expansion of $LOGNAME - $PASSWD | grep "^$LOGNAME:" | awk -F: '{print $5}' | sed -e 's/,.*//' > $TEMP - ORIGINATOR="`cat $TEMP`" - rm -f $TEMP -fi - -if [ -n "$ORGANIZATION" ]; then - if [ -f "$ORGANIZATION" ]; then - ORGANIZATION="`cat $ORGANIZATION`" - fi -else - if [ -n "$DEFAULT_ORGANIZATION" ]; then - ORGANIZATION="$DEFAULT_ORGANIZATION" - elif [ -f $HOME/.organization ]; then - ORGANIZATION="`cat $HOME/.organization`" - elif [ -f $HOME/.signature ]; then - ORGANIZATION="`cat $HOME/.signature`" - fi -fi - -# If they don't have a preferred editor set, then use -if [ -z "$VISUAL" ]; then - if [ -z "$EDITOR" ]; then - EDIT=vi - else - EDIT="$EDITOR" - fi -else - EDIT="$VISUAL" -fi - -# Find out some information. -SYSTEM=`( [ -f /bin/uname ] && /bin/uname -a ) || \ - ( [ -f /usr/bin/uname ] && /usr/bin/uname -a ) || echo ""` -ARCH=`[ -f /bin/arch ] && /bin/arch` -MACHINE=`[ -f /bin/machine ] && /bin/machine` - -COMMAND=`echo $0 | sed -e 's,.*/,,'` -USAGE="Usage: $COMMAND [-PVL] [-t address] [-f filename] [-s severity] - [-c address] [--request-id] [--version]" -REMOVE= -BATCH= -CC= -SEVERITY_C= - -while [ $# -gt 0 ]; do - case "$1" in - -r) ;; # Ignore for backward compat. - -t | --to) if [ $# -eq 1 ]; then echo "$USAGE"; exit 1; fi - shift ; GNATS_ADDR="$1" - EXPLICIT_GNATS_ADDR=true - ;; - -f | --file) if [ $# -eq 1 ]; then echo "$USAGE"; exit 1; fi - shift ; IN_FILE="$1" - if [ "$IN_FILE" != "-" -a ! -r "$IN_FILE" ]; then - echo "$COMMAND: cannot read $IN_FILE" - exit 1 - fi - ;; - -b | --batch) BATCH=true ;; - -c | --cc) if [ $# -eq 1 ]; then echo "$USAGE"; exit 1; fi - shift ; CC="$1" - ;; - -s | --severity) if [ $# -eq 1 ]; then echo "$USAGE"; exit 1; fi - shift ; SEVERITY_C="$1" - ;; - -p | -P | --print) PRINT=true ;; - -L | --list) FORMAT=norm ;; - -l | -CL | --lisp) FORMAT=lisp ;; - --request-id) REQUEST_ID=true ;; - -h | --help) echo "$USAGE"; exit 0 ;; - -V | --version) echo "$VERSION"; exit 0 ;; - -*) echo "$USAGE" ; exit 1 ;; - *) if [ -z "$USER_GNATS_SITE" ]; then - if [ ! -r "$DATADIR/gnats/$1" ]; then - echo "$COMMAND: the GNATS site $1 does not have a categories list." - exit 1 - else - # The site name is the alias they'll have to have created. - USER_GNATS_SITE=$1 - fi - else - echo "$USAGE" ; exit 1 - fi - ;; - esac - shift -done - -if [ -n "$USER_GNATS_SITE" ] && [ "$USER_GNATS_SITE" != "$GNATS_SITE" ]; then - GNATS_SITE=$USER_GNATS_SITE - GNATS_ADDR=$USER_GNATS_SITE-gnats -fi - -if [ "$SUBMITTER" = "unknown" -a -z "$REQUEST_ID" -a -z "$IN_FILE" ]; then - cat << '__EOF__' -It seems that send-pr is not installed with your unique submitter-id. -You need to run - - install-sid YOUR-SID - -where YOUR-SID is the identification code you received with `send-pr'. -`send-pr' will automatically insert this value into the template field -`>Submitter-Id'. If you've downloaded `send-pr' from the Net, use `net' -for this value. If you do not know your id, run `send-pr --request-id' to -get one from your support site. -__EOF__ - exit 1 -fi - -if [ -r "$DATADIR/gnats/$GNATS_SITE" ]; then - CATEGORIES=`grep -v '^#' $DATADIR/gnats/$GNATS_SITE | sort` -else - echo "$COMMAND: could not read $DATADIR/gnats/$GNATS_SITE for categories list." - exit 1 -fi - -if [ -z "$CATEGORIES" ]; then - echo "$COMMAND: the categories list for $GNATS_SITE was empty!" - exit 1 -fi - -case "$FORMAT" in - lisp) echo "$CATEGORIES" | \ - awk 'BEGIN {printf "( "} {printf "(\"%s\") ",$0} END {printf ")\n"}' - exit 0 - ;; - norm) l=`echo "$CATEGORIES" | \ - awk 'BEGIN {max = 0; } { if (length($0) > max) { max = length($0); } } - END {print max + 1;}'` - c=`expr 70 / $l` - if [ $c -eq 0 ]; then c=1; fi - echo "$CATEGORIES" | \ - awk 'BEGIN {print "Known categories:"; i = 0 } - { printf ("%-'$l'.'$l's", $0); if ((++i % '$c') == 0) { print "" } } - END { print ""; }' - exit 0 - ;; -esac - -ORIGINATOR_C='' -ORGANIZATION_C='' -CONFIDENTIAL_C='<[ yes | no ] (one line)>' -SYNOPSIS_C='' -if [ -z "$SEVERITY_C" ]; then - SEVERITY_C='<[ non-critical | serious | critical ] (one line)>' -fi -PRIORITY_C='<[ low | medium | high ] (one line)>' -CATEGORY_C='' -CLASS_C='<[ sw-bug | doc-bug | change-request | support ] (one line)>' -RELEASE_C='' -ENVIRONMENT_C='' -DESCRIPTION_C='' -HOW_TO_REPEAT_C='' -FIX_C='' - -# Catch some signals. ($xs kludge needed by Sun /bin/sh) -xs=0 -trap 'rm -f $REF $TEMP; exit $xs' 0 -trap 'echo "$COMMAND: Aborting ..."; rm -f $REF $TEMP; xs=1; exit' 1 2 3 13 15 - -# If they told us to use a specific file, then do so. -if [ -n "$IN_FILE" ]; then - if [ "$IN_FILE" = "-" ]; then - # The PR is coming from the standard input. - if [ -n "$EXPLICIT_GNATS_ADDR" ]; then - sed -e "s;^[Tt][Oo]:.*;To: $GNATS_ADDR;" > $TEMP - else - cat > $TEMP - fi - else - # Use the file they named. - if [ -n "$EXPLICIT_GNATS_ADDR" ]; then - sed -e "s;^[Tt][Oo]:.*;To: $GNATS_ADDR;" $IN_FILE > $TEMP - else - cat $IN_FILE > $TEMP - fi - fi -else - - if [ -n "$PR_FORM" -a -z "$PRINT_INTERN" ]; then - # If their PR_FORM points to a bogus entry, then bail. - if [ ! -f "$PR_FORM" -o ! -r "$PR_FORM" -o ! -s "$PR_FORM" ]; then - echo "$COMMAND: can't seem to read your template file (\`$PR_FORM'), ignoring PR_FORM" - sleep 1 - PRINT_INTERN=bad_prform - fi - fi - - if [ -n "$PR_FORM" -a -z "$PRINT_INTERN" ]; then - cp $PR_FORM $TEMP || - ( echo "$COMMAND: could not copy $PR_FORM" ; xs=1; exit ) - else - for file in $TEMP $REF ; do - cat > $file << '__EOF__' -SEND-PR: -*- send-pr -*- -SEND-PR: Lines starting with `SEND-PR' will be removed automatically, as -SEND-PR: will all comments (text enclosed in `<' and `>'). -SEND-PR: -SEND-PR: Please consult the send-pr man page `send-pr(1)' or the Texinfo -SEND-PR: manual if you are not sure how to fill out a problem report. -SEND-PR: -SEND-PR: Choose from the following categories: -SEND-PR: -__EOF__ - - # Format the categories so they fit onto lines. - l=`echo "$CATEGORIES" | \ - awk 'BEGIN {max = 0; } { if (length($0) > max) { max = length($0); } } - END {print max + 1;}'` - c=`expr 61 / $l` - if [ $c -eq 0 ]; then c=1; fi - echo "$CATEGORIES" | \ - awk 'BEGIN {printf "SEND-PR: "; i = 0 } - { printf ("%-'$l'.'$l's", $0); - if ((++i % '$c') == 0) { printf "\nSEND-PR: " } } - END { printf "\nSEND-PR:\n"; }' >> $file - - cat >> $file << __EOF__ -To: $GNATS_ADDR -Subject: -From: $FROM -Reply-To: $REPLYTO -Cc: $CC -X-send-pr-version: $VERSION - - ->Submitter-Id: $SUBMITTER ->Originator: $ORIGINATOR ->Organization: -${ORGANIZATION- $ORGANIZATION_C} ->Confidential: $CONFIDENTIAL_C ->Synopsis: $SYNOPSIS_C ->Severity: $SEVERITY_C ->Priority: $PRIORITY_C ->Category: $CATEGORY_C ->Class: $CLASS_C ->Release: ${DEFAULT_RELEASE-$RELEASE_C} ->Environment: - $ENVIRONMENT_C -`[ -n "$SYSTEM" ] && echo System: $SYSTEM` -`[ -n "$ARCH" ] && echo Architecture: $ARCH` -`[ -n "$MACHINE" ] && echo Machine: $MACHINE` ->Description: - $DESCRIPTION_C ->How-To-Repeat: - $HOW_TO_REPEAT_C ->Fix: - $FIX_C -__EOF__ - done - fi - - if [ "$PRINT" = true -o "$PRINT_INTERN" = true ]; then - cat $TEMP - xs=0; exit - fi - - chmod u+w $TEMP - if [ -z "$REQUEST_ID" ]; then - eval $EDIT $TEMP - else - ed -s $TEMP << '__EOF__' -/^Subject/s/^Subject:.*/Subject: request for a customer id/ -/^>Category/s/^>Category:.*/>Category: send-pr/ -w -q -__EOF__ - fi - - if cmp -s $REF $TEMP ; then - echo "$COMMAND: problem report not filled out, therefore not sent" - xs=1; exit - fi -fi - -# -# Check the enumeration fields - -# This is a "sed-subroutine" with one keyword parameter -# (with workaround for Sun sed bug) -# -SED_CMD=' -/$PATTERN/{ -s||| -s|<.*>|| -s|^[ ]*|| -s|[ ]*$|| -p -q -}' - - -while [ -z "$REQUEST_ID" ]; do - CNT=0 - - # 1) Confidential - # - PATTERN=">Confidential:" - CONFIDENTIAL=`eval sed -n -e "\"$SED_CMD\"" $TEMP` - case "$CONFIDENTIAL" in - ""|yes|no) CNT=`expr $CNT + 1` ;; - *) echo "$COMMAND: \`$CONFIDENTIAL' is not a valid value for \`Confidential'." ;; - esac - # - # 2) Severity - # - PATTERN=">Severity:" - SEVERITY=`eval sed -n -e "\"$SED_CMD\"" $TEMP` - case "$SEVERITY" in - ""|non-critical|serious|critical) CNT=`expr $CNT + 1` ;; - *) echo "$COMMAND: \`$SEVERITY' is not a valid value for \`Severity'." - esac - # - # 3) Priority - # - PATTERN=">Priority:" - PRIORITY=`eval sed -n -e "\"$SED_CMD\"" $TEMP` - case "$PRIORITY" in - ""|low|medium|high) CNT=`expr $CNT + 1` ;; - *) echo "$COMMAND: \`$PRIORITY' is not a valid value for \`Priority'." - esac - # - # 4) Category - # - PATTERN=">Category:" - CATEGORY=`eval sed -n -e "\"$SED_CMD\"" $TEMP` - FOUND= - for C in $CATEGORIES - do - if [ "$C" = "$CATEGORY" ]; then FOUND=true ; break ; fi - done - if [ -n "$FOUND" ]; then - CNT=`expr $CNT + 1` - else - if [ -z "$CATEGORY" ]; then - echo "$COMMAND: you must include a Category: field in your report." - else - echo "$COMMAND: \`$CATEGORY' is not a known category." - fi - fi - # - # 5) Class - # - PATTERN=">Class:" - CLASS=`eval sed -n -e "\"$SED_CMD\"" $TEMP` - case "$CLASS" in - ""|sw-bug|doc-bug|change-request|support) CNT=`expr $CNT + 1` ;; - *) echo "$COMMAND: \`$CLASS' is not a valid value for \`Class'." - esac - - [ $CNT -lt 5 -a -z "$BATCH" ] && - echo "Errors were found with the problem report." - - while true; do - if [ -z "$BATCH" ]; then - $ECHON1 "a)bort, e)dit or s)end? $ECHON2" - read input - else - if [ $CNT -eq 5 ]; then - input=s - else - input=a - fi - fi - case "$input" in - a*) - if [ -z "$BATCH" ]; then - echo "$COMMAND: the problem report remains in $BAD and is not sent." - mv $TEMP $BAD - else - echo "$COMMAND: the problem report is not sent." - fi - xs=1; exit - ;; - e*) - eval $EDIT $TEMP - continue 2 - ;; - s*) - break 2 - ;; - esac - done -done -# -# Remove comments and send the problem report -# (we have to use patterns, where the comment contains regex chars) -# -# /^>Originator:/s;$ORIGINATOR;; -sed -e " -/^SEND-PR:/d -/^>Organization:/,/^>[A-Za-z-]*:/s;$ORGANIZATION_C;; -/^>Confidential:/s;<.*>;; -/^>Synopsis:/s;$SYNOPSIS_C;; -/^>Severity:/s;<.*>;; -/^>Priority:/s;<.*>;; -/^>Category:/s;$CATEGORY_C;; -/^>Class:/s;<.*>;; -/^>Release:/,/^>[A-Za-z-]*:/s;$RELEASE_C;; -/^>Environment:/,/^>[A-Za-z-]*:/s;$ENVIRONMENT_C;; -/^>Description:/,/^>[A-Za-z-]*:/s;$DESCRIPTION_C;; -/^>How-To-Repeat:/,/^>[A-Za-z-]*:/s;$HOW_TO_REPEAT_C;; -/^>Fix:/,/^>[A-Za-z-]*:/s;$FIX_C;; -" $TEMP > $REF - -if $MAIL_AGENT < $REF; then - echo "$COMMAND: problem report sent" - xs=0; exit -else - echo "$COMMAND: mysterious mail failure." - if [ -z "$BATCH" ]; then - echo "$COMMAND: the problem report remains in $BAD and is not sent." - mv $REF $BAD - else - echo "$COMMAND: the problem report is not sent." - fi - xs=1; exit -fi diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/tm-au --- a/lib-src/tm-au Mon Aug 13 10:46:01 2007 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,57 +0,0 @@ -#!/bin/sh - -# -# $Id: tm-au,v 1.6 1997/02/15 22:20:26 steve Exp $ -# -# Copyright 1994,1995,1996,1997 Free Software Foundation, Inc. - -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with GNU Emacs; see the file COPYING. If not, write to the -# Free Software Foundation, Inc., 59 Temple Place - Suite 330, -# Boston, MA 02111-1307, USA. - -PATH=${PATH:-/usr/bin:/bin}:`dirname $0 2>/dev/null`; export PATH - -if [ "$TM_TMP_DIR" = "" ]; then - TM_TMP_DIR=/tmp - export TM_TMP_DIR -fi - -if [ "$5" = "" ]; then - filename="$TM_TMP_DIR/mime$$.au" -else - filename="$TM_TMP_DIR/$5" -fi - - -case "$4" in -"play") - echo "$2; $3 ->" - tmdecode $3 $1 $filename - if [ "$AUDIOSERVER" = "" ]; then - case "`uname`" in - IRIX ) sfplay $filename ;; - OSF1 ) decsound -play $filename ;; - * ) cat $filename > /dev/audio ;; - esac - else - autool -v 40 $filename - fi - - trap 'rm -f $filename' 0 1 2 3 13 15 - ;; -"extract") - echo "$2; $3 -> $filename" - echo "extract to $filename" - tmdecode $3 $1 $filename - ;; -esac diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/tm-file --- a/lib-src/tm-file Mon Aug 13 10:46:01 2007 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,38 +0,0 @@ -#!/bin/sh - -# -# $Id: tm-file,v 1.4 1997/01/30 02:22:30 steve Exp $ -# -# Copyright 1994,1995,1996,1997 Free Software Foundation, Inc. - -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with GNU Emacs; see the file COPYING. If not, write to the -# Free Software Foundation, Inc., 59 Temple Place - Suite 330, -# Boston, MA 02111-1307, USA. - -PATH=${PATH:-/usr/bin:/bin}:`dirname $0 2>/dev/null`; export PATH - -if [ "$TM_TMP_DIR" = "" ]; then - TM_TMP_DIR=/tmp - export TM_TMP_DIR -fi - -if [ "$5" = "" ]; then - filename="$TM_TMP_DIR/mime$$" -else - filename="$TM_TMP_DIR/$5" -fi - - -echo "$2; $3 -> $filename" - -tmdecode $3 $1 $filename diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/tm-html --- a/lib-src/tm-html Mon Aug 13 10:46:01 2007 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,62 +0,0 @@ -#!/bin/sh -# -# $Id: tm-html,v 1.4 1997/01/30 02:22:30 steve Exp $ -# -# Copyright 1994,1995,1996,1997 Free Software Foundation, Inc. - -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with GNU Emacs; see the file COPYING. If not, write to the -# Free Software Foundation, Inc., 59 Temple Place - Suite 330, -# Boston, MA 02111-1307, USA. - -PATH=${PATH:-/usr/bin:/bin}:`dirname $0 2>/dev/null`; export PATH - -if [ "$TM_TMP_DIR" = "" ]; then - TM_TMP_DIR=/tmp - export TM_TMP_DIR -fi - -if [ "$TM_WWW_BROWSER" = "" ]; then - TM_WWW_BROWSER=netscape - export TM_WWW_BROWSER -fi - -if [ "$5" = "" ]; then - filename="$TM_TMP_DIR/mime$$.html" -else - filename="$TM_TMP_DIR/$5" -fi - -echo "$2; $3 -> $filename" - -tmdecode "$3" $1 $filename - -case "$4" in -"play") - if [ `echo $TM_WWW_BROWSER | grep netscape` ]; then - echo netscape - if [ -h $HOME/.netscape/lock ]; then - netscape -remote "openURL(file:$filename,new-window)" - else - netscape $filename - fi - else - echo not netscape - $TM_WWW_BROWSER $filename - fi - trap 'rm -f $filename' 0 1 2 3 13 15 - ;; -"extract") - echo "extract to $filename" - ;; -esac diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/tm-image --- a/lib-src/tm-image Mon Aug 13 10:46:01 2007 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,71 +0,0 @@ -#!/bin/sh - -# -# $Id: tm-image,v 1.4 1997/01/30 02:22:30 steve Exp $ -# -# Copyright 1994, 1995, 1996 Free Software Foundation, Inc. - -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with GNU Emacs; see the file COPYING. If not, write to the -# Free Software Foundation, Inc., 59 Temple Place - Suite 330, -# Boston, MA 02111-1307, USA. - -PATH=${PATH:-/usr/bin:/bin}:`dirname $0 2>/dev/null`; export PATH - -if [ "$TM_TMP_DIR" = "" ]; then - TM_TMP_DIR=/tmp - export TM_TMP_DIR -fi -if [ "$5" = "" ]; then - case "$2" in - "image/gif") - filename="$TM_TMP_DIR/mime$$.gif" - ;; - "image/jpeg") - filename="$TM_TMP_DIR/mime$$.jpg" - ;; - "image/tiff"|"image/x-tiff") - filename="$TM_TMP_DIR/mime$$.tif" - ;; - "image/x-xwd") - filename="$TM_TMP_DIR/mime$$.xwd" - ;; - "image/x-xbm") - filename="$TM_TMP_DIR/mime$$.xbm" - ;; - "image/x-pic") - filename="$TM_TMP_DIR/mime$$.pic" - ;; - "image/x-mag") - filename="$TM_TMP_DIR/mime$$.mag" - ;; - *) - filename="$TM_TMP_DIR/mime$$.img" - ;; - esac -else - filename="$TM_TMP_DIR/$5" -fi - -echo "$2; $3 -> $filename" - -tmdecode $3 $1 $filename - -case "$4" in -"play") - xv -geometry +1+1 $filename - trap 'rm -f $filename' 0 1 2 3 13 15 - ;; -"extract") - echo "extract to $filename" - ;; -esac diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/tm-mpeg --- a/lib-src/tm-mpeg Mon Aug 13 10:46:01 2007 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,50 +0,0 @@ -#!/bin/sh - -# -# $Id: tm-mpeg,v 1.4 1997/01/30 02:22:30 steve Exp $ -# -# Copyright 1994, 1995, 1996 Free Software Foundation, Inc. - -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with GNU Emacs; see the file COPYING. If not, write to the -# Free Software Foundation, Inc., 59 Temple Place - Suite 330, -# Boston, MA 02111-1307, USA. - -PATH=${PATH:-/usr/bin:/bin}:`dirname $0 2>/dev/null`; export PATH - -if [ "$TM_TMP_DIR" = "" ]; then - TM_TMP_DIR=/tmp - export TM_TMP_DIR -fi -if [ "$5" = "" ]; then - filename="$TM_TMP_DIR/mime$$.mpg" -else - filename="$TM_TMP_DIR/$5" -fi - -echo "$2; $3 -> $filename" - -tmdecode $3 $1 $filename - -case "$4" in -"play") - if [ "$VIDEO_DITHER" = "" ]; then - VIDEO_DITHER=gray - export VIDEO_DITHER - fi - mpeg_play -dither $VIDEO_DITHER $filename - trap 'rm -f $filename' 0 1 2 3 13 15 - ;; -"extract") - echo "extract to $filename" - ;; -esac diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/tm-plain --- a/lib-src/tm-plain Mon Aug 13 10:46:01 2007 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,48 +0,0 @@ -#!/bin/sh - -# -# $Id: tm-plain,v 1.4 1997/01/30 02:22:30 steve Exp $ -# -# Copyright 1994,1995,1996,1997 Free Software Foundation, Inc. - -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with GNU Emacs; see the file COPYING. If not, write to the -# Free Software Foundation, Inc., 59 Temple Place - Suite 330, -# Boston, MA 02111-1307, USA. - -PATH=${PATH:-/usr/bin:/bin}:`dirname $0 2>/dev/null`; export PATH - -if [ "$TM_TMP_DIR" = "" ]; then - TM_TMP_DIR=/tmp - export TM_TMP_DIR -fi -if [ "$5" = "" ]; then - filename="$TM_TMP_DIR/mime$$.pln" -else - filename="$TM_TMP_DIR/$5" -fi - -case "$4" in -"play") - echo "$2; $3 ->" - tmdecode "$3" "$1" /dev/stdout - ;; -"extract") - echo "$2; $3 -> $filename" - echo "extract to $filename" - tmdecode "$3" "$1" $filename - ;; -"print") - echo "$2; $3 ->" - tmdecode "$3" "$1" /dev/stdout | lpr - ;; -esac diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/tm-ps --- a/lib-src/tm-ps Mon Aug 13 10:46:01 2007 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,50 +0,0 @@ -#!/bin/sh - -# -# $Id: tm-ps,v 1.4 1997/01/30 02:22:30 steve Exp $ -# -# Copyright 1994, 1995, 1996 Free Software Foundation, Inc. - -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with GNU Emacs; see the file COPYING. If not, write to the -# Free Software Foundation, Inc., 59 Temple Place - Suite 330, -# Boston, MA 02111-1307, USA. - -PATH=${PATH:-/usr/bin:/bin}:`dirname $0 2>/dev/null`; export PATH - -if [ "$TM_TMP_DIR" = "" ]; then - TM_TMP_DIR=/tmp - export TM_TMP_DIR -fi -if [ "$5" = "" ]; then - filename="$TM_TMP_DIR/mime$$.pln" -else - filename="$TM_TMP_DIR/$5" -fi - -case "$4" in -"play") - echo "$2; $3 -> $filename" - tmdecode $3 $1 $filename - ghostview $filename - trap 'rm -f $filename' 0 1 2 3 13 15 - ;; -"extract") - echo "$2; $3 -> $filename" - echo "extract to $filename" - tmdecode "$3" "$1" $filename - ;; -"print") - echo "$2; $3 ->" - tmdecode "$3" "$1" /dev/stdout | lpr - ;; -esac diff -r 73c75c43c1f2 -r 19dcec799385 lib-src/tmdecode --- a/lib-src/tmdecode Mon Aug 13 10:46:01 2007 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,59 +0,0 @@ -#!/bin/sh - -# -# $Id: tmdecode,v 1.4 1997/01/30 02:22:30 steve Exp $ -# -# Copyright 1994, 1995, 1996 Free Software Foundation, Inc. - -# This program is free software; you can redistribute it and/or modify -# it under the terms of the GNU General Public License as published by -# the Free Software Foundation; either version 2, or (at your option) -# any later version. -# -# This program is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -# GNU General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with GNU Emacs; see the file COPYING. If not, write to the -# Free Software Foundation, Inc., 59 Temple Place - Suite 330, -# Boston, MA 02111-1307, USA. - -PATH=${PATH:-/usr/bin:/bin}:`dirname $0 2>/dev/null`; export PATH - -trap 'rm -f $2' 0 1 2 3 13 15 - -case "$3" in -/dev/stdout) - OUTPUT= - ;; -*) - OUTPUT='> $3' - ;; -esac - -case "$1" in -""|"7bit"|"8bit"|"binary") - eval "cat $2 $OUTPUT" - ;; -"base64") - #eval "decode-b < $2 $OUTPUT" - eval "mmencode -u $2 $OUTPUT" - ;; -"quoted-printable") - eval "mmencode -q -u $2 $OUTPUT" - ;; -"x-uue"|"x-uuencode") - (cd $TM_TMP_DIR ; uudecode $2) - ;; -"x-gzip64") - #eval "decode-b < $2 | gzip -cd $OUTPUT" - eval "mmencode -u $2 | gzip -cd $OUTPUT" - ;; -*) - echo "unknown encoding" - exit -1 - ;; -esac - -# echo "$2 was removed." diff -r 73c75c43c1f2 -r 19dcec799385 lisp/ChangeLog --- a/lisp/ChangeLog Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/ChangeLog Mon Aug 13 10:46:44 2007 +0200 @@ -1,3 +1,243 @@ +1998-12-08 XEmacs Build Bot + + * XEmacs 21.0.58 is released + +1998-11-27 Jan Vroonhof + + * easymenu.el (easy-menu-add-item): Wraper around add-menu-btton. + (easy-menu-item-present-p): Wrapper around find-menu-item. + (easy-menu-remove-item): Wrapper around delete-menu-item. + + * menubar.el (delete-menu-item): Add 'from-menu' argument. + (add-menu-button): Add 'in-menu' argument. + (add-menu-item-1): Add in-menu support to helper function. + +1998-11-26 Jan Vroonhof + + * faces.el (get-custom-frame-properties): Revert Hrvoje Niksic change + of Dec 4, 1997. + +1998-11-25 Hrvoje Niksic + + * process.el (shell-command-on-region): Report if the command + succeeded or failed. + +1998-11-07 Adrian Aichner + + * msw-faces.el (mswindows-find-smaller-font): Turning font names + into font instances first, like `x-frob-font-size' does. + (mswindows-find-larger-font): ditto + +1998-11-04 Greg Klanderman + + * package-ui.el (pui-install-selected-packages): fix args in call + to `package-get'. + +1998-10-29 Jan Vroonhof + + * package-get.el (host-name): New widget type. + (package-get-remote): Better customization using new type. + (package-get-download-sites): idem dito. + + (package-get-custom): Do not use package-get-all untill we have + runtime dependencies. + + (package-get-remove-copy): Default to 't' we no longer need this + kludge as we do not currently use depenencies. + + (package-get-was-current): New variable. + (package-get-require-base): New 'force-current' argument. + (package-get-update-base): idem + (package-get-package-provider): idem + (package-get-locate-index-file): New 'no-remote' argument. + (package-get-locate-file): idem. + + (package-get-maybe-save-index): New function. + (package-get-update-base): Use it. + +1998-10-28 Greg Klanderman + + * package-get.el (package-get-remote): default to nil; by default, + don't go out to the net via EFS. They must select a download site. + (package-get-download-sites): new variable. + (package-get-download-menu): new function. + (package-get-locate-index-file): new function. + (package-get-update-base): use it. + + * menubar-items.el (default-menubar): add "Update Package Index" + and "Add Download Site" menus under Options | Manage Packages. + +1998-10-19 Greg Klanderman + + * package-get.el (package-get): bugfix code checking installed version + for case where package is not currently installed. + (package-get-require-signed-base-updates): new variable. + (package-get-update-base-from-buffer): remove REMOTE-SOURCE arg, it was + deemed not a goot thing. Use the variable + package-get-allow-unsigned-base-updates instead. + +1998-10-16 Greg Klanderman + + * package-get.el (package-get): Don't install an older version than + we already have unless explicitly told to. Issue a warning. + + * package-ui.el (pui-add-required-packages): when adding + dependencies, don't add packages that are up to date. + (pui-package-symbol-char): Don't consider a package out of date + if you have a newer version installed than the latest version in + package-get-base. + + * package-get.el (package-get-base-filename): document that it may + be a path relative to package-get-remote; new default value. + (package-get-locate-file): new function. + (package-get-update-base): use it to expand package-get-base-filename. + (package-get-save-base): new function to save the package-get database + to file. + (package-get-update-base-from-buffer): add REMOTE-SOURCE argument. + (package-get-update-base): pass the REMOTE-SOURCE arg. + (package-get-update-base-entry): call package-get-custom-add-entry. + (package-get-file-installed-p): removed; no longer needed. + (package-get-create-custom): ditto. + (toplevel): remove code to build and load package-get-custom.el + (package-get-custom-add-entry): new function. + +1998-10-12 Hrvoje Niksic + + * wid-edit.el (widget-button-click): Don't switch window. + +1998-10-22 Jan Vroonhof + + * cus-face.el (custom-set-face-update-spec): Add autoload cookie + +1998-10-15 Greg Klanderman + + * package-get.el (package-get-update-base): use + insert-file-contents-internal, not insert-file-contents-literally. + +1998-10-14 Jan Vroonhof + + * auto-save.el: expand-file 'auto-save-*-dir' at runtime not at + dump time. + +1998-10-15 Greg Klanderman + + * package-get.el (package-get-update-base-entry): new function. + (package-get-update-base): renamed; was `package-get-load-base'. + cleanup, and use package-get-update-base-from-buffer. + (package-get-update-base-from-buffer): new function. + (package-get-update-base-entries): new; helper for above. + Do not eval lisp grabbed over ftp; parse it from new format. + +1998-10-15 Greg Klanderman + + * files.el (set-auto-mode): Don't play games loading package-get + database; package-get-package-provider will handle it all. + +1998-10-14 Greg Klanderman + + * package-get.el (package-get-base-filename): new variable. + (package-get-require-base): new function. + (package-get-pgp-signed-begin-line): new variable. + (package-get-pgp-signature-begin-line): ditto. + (package-get-pgp-signature-end-line): ditto. + (package-get-load-base): new function. + (package-get-interactive-package-query): + (package-get-update-all): + (package-get-dependencies): + (package-get-package-provider): + (package-get-custom): use package-get-require-base. + [package-get-custom loading]: disable for now. + + * package-ui.el (pui-list-packages): use (package-get-require-base) + +1998-10-14 Jan Vroonhof + + * package-ui.el: Correct obvious thinko in choosing extent face. + +1998-10-12 Jan Vroonhof + + * menubar-items.el (default-menubar): pui-list-package has nothing + to with Customize. Move all the package stuff to a new Item in Options. + + * package-ui.el (pui-menu): Add menu and Popup menu. + + * package-get.el (package-get): Use new + package-admin-get-install-dir. + + * package-admin.el (package-admin-get-install-dir): New syntax. + Conserve package location and put mule packages where mule-base is. + + * package-get.el : Customized + + * package-ui.el (pui): Customized + (pui-package-install-dest-dir): New variable. + (pui-install-selected-packages): Use it + +1998-10-12 SL Baur + + * package-get.el (package-get-interactive-package-query): Move + dependency on package-get-base to run-time. + (package-get-update-all): Ditto. + (package-get-dependencies): Ditto. + (package-get-package-provider): Ditto. + (package-get-custom): Ditto. + +1998-10-11 Glynn Clements + + * events.el: Remove 'ascii-character property from 'backspace + and 'delete symbols + +1998-10-11 SL Baur + + * package-get-base.el: removed. + +1998-10-07 Jan Vroonhof + + * x-font-menu.el (font-menu-set-font): Respect font-menu-frame-local + +1998-10-07 Greg Klanderman + + * package-admin.el (package-admin-rmtree): rewritten. need to + check for "." and ".." before symlink check. expand files and + directories with respect to DIRECTORY, not default-directory. + +1998-10-04 Greg Klanderman + + * package-get.el (package-get-all): add INSTALL-DIR argument. + +1998-10-06 Greg Klanderman + + * package-ui.el (pui-add-required-packages): new function, select + dependent packages. + (pui-display-keymap): bind it. + (pui-help-string): document it. + (pui-install-selected-packages): package-get-all -> package-get. + + * package-get.el (package-get-dependencies): new function. + +1998-10-04 Hrvoje Niksic + + * isearch-mode.el (isearch-done): Use regexp-search-ring-max for + regexps. + +1998-09-30 Jan Vroonhof + + * package-admin.el (package-admin-delete-binary-package): + General cleanup. Remove unnessary use of progn and + save-excursion. + (package-admin-delete-binary-package): Do NOT mess with file + modes. That is evil. + (package-admin-delete-binary-package): Wrap all deleting in + condition-case. The data in MANIFEST is untrustworthy. + (package-admin-delete-binary-package): Let the OS worry about non + empty directories. + +1998-10-09 SL Baur + + * lisp-mnt.el (lm-commentary): Fix InfoDock-style comment + processing. + (lm-report-bug): Fix mail address to send bug reports to. + 1998-09-29 SL Baur * XEmacs 21.0-pre14 is released. diff -r 73c75c43c1f2 -r 19dcec799385 lisp/about.el --- a/lisp/about.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/about.el Mon Aug 13 10:46:44 2007 +0200 @@ -1384,6 +1384,7 @@ (print-short "Yasuhiko Kiuchi" "kiuchi@dsp.ksp.fujixerox.co.jp") (print-short "Greg Klanderman" "greg.klanderman@alum.mit.edu") (print-short "Valdis Kletnieks" "Valdis.Kletnieks@vt.edu") + (print-short "Norbert Koch" "n.koch@delta-ii.de") (print-short "Rob Kooper" "kooper@cc.gatech.edu") (print-short "Peter Skov Knudsen" "knu@dde.dk") (print-short "Jens Krinke" "krinke@ips.cs.tu-bs.de") @@ -1510,6 +1511,7 @@ (print-short "Jason Yanowitz" "yanowitz@eternity.cs.umass.edu") (print-short "La Monte Yarroll" "piggy@hilbert.maths.utas.edu.au") (print-short "Blair Zajac" "blair@olympia.gps.caltech.edu") + (print-short "Volker Zell" "vzell@de.oracle.com") (print-short "Daniel Zivkovic" "daniel@canada.sun.com") (print-short "Karel Zuiderveld" "Karel.Zuiderveld@cv.ruu.nl") "\n")) diff -r 73c75c43c1f2 -r 19dcec799385 lisp/auto-autoloads.el --- a/lisp/auto-autoloads.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/auto-autoloads.el Mon Aug 13 10:46:44 2007 +0200 @@ -665,11 +665,15 @@ ;;;*** -;;;### (autoloads (custom-set-faces custom-declare-face) "cus-face" "lisp/cus-face.el") +;;;### (autoloads (custom-set-faces custom-set-face-update-spec custom-declare-face) "cus-face" "lisp/cus-face.el") (autoload 'custom-declare-face "cus-face" "\ Like `defface', but FACE is evaluated as a normal argument." nil nil) +(autoload 'custom-set-face-update-spec "cus-face" "\ +Customize the FACE for display types matching DISPLAY, merging + in the new items from PLIST" nil nil) + (autoload 'custom-set-faces "cus-face" "\ Initialize faces according to user preferences. The arguments should be a list where each entry has the form: @@ -1204,7 +1208,42 @@ ;;;*** -;;;### (autoloads (package-get-custom package-get-package-provider package-get package-get-all package-get-update-all) "package-get" "lisp/package-get.el") +;;;### (autoloads (package-get-custom package-get-package-provider package-get package-get-dependencies package-get-all package-get-update-all package-get-delete-package package-get-save-base package-get-update-base-from-buffer package-get-update-base package-get-update-base-entry package-get-require-base package-get-download-menu) "package-get" "lisp/package-get.el") + +(autoload 'package-get-download-menu "package-get" "\ +Build the `Add Download Site' menu." nil nil) + +(autoload 'package-get-require-base "package-get" "\ +Require that a package-get database has been loaded. +If the optional FORCE-CURRENT argument or the value of +`package-get-always-update' is Non-nil, try to update the database +from a location in `package-get-remote'. Otherwise a local copy is used +if available and remote access is never done. + +Please use FORCE-CURRENT only when the user is explictly dealing with packages +and remote access is likely in the near future." nil nil) + +(autoload 'package-get-update-base-entry "package-get" "\ +Update an entry in `package-get-base'." nil nil) + +(autoload 'package-get-update-base "package-get" "\ +Update the package-get database file with entries from DB-FILE. +Unless FORCE-CURRENT is non-nil never try to update the database." t nil) + +(autoload 'package-get-update-base-from-buffer "package-get" "\ +Update the package-get database with entries from BUFFER. +BUFFER defaults to the current buffer. This command can be +used interactively, for example from a mail or news buffer." t nil) + +(autoload 'package-get-save-base "package-get" "\ +Write the package-get database to FILE. + +Note: This database will be unsigned of course." t nil) + +(autoload 'package-get-delete-package "package-get" "\ +Delete an installation of PACKAGE below directory PKG-TOPDIR. +PACKAGE is a symbol, not a string. +This is just an interactive wrapper for `package-admin-delete-binary-package'." t nil) (autoload 'package-get-update-all "package-get" "\ Fetch and install the latest versions of all currently installed packages." t nil) @@ -1214,10 +1253,18 @@ Uses `package-get-base' to determine just what is required and what package provides that functionality. If VERSION is nil, retrieves latest version. Optional argument FETCHED-PACKAGES is used to keep -track of packages already fetched. +track of packages already fetched. Optional argument INSTALL-DIR, +if non-nil, specifies the package directory where fetched packages +should be installed. Returns nil upon error." t nil) +(autoload 'package-get-dependencies "package-get" "\ +Compute dependencies for PACKAGES. +Uses `package-get-base' to determine just what is required and what +package provides that functionality. Returns the list of packages +required by PACKAGES." nil nil) + (autoload 'package-get "package-get" "\ Fetch PACKAGE from remote site. Optional arguments VERSION indicates which version to retrieve, nil @@ -1245,7 +1292,10 @@ Search for a package that provides SYM and return the name and version. Searches in `package-get-base' for SYM. If SYM is a consp, then it must match a corresponding (provide (SYM VERSION)) from - the package." t nil) + the package. + +If FORCE-CURRENT is non-nil make sure the database is up to date. This might +lead to Emacs accessing remote sites." t nil) (autoload 'package-get-custom "package-get" "\ Fetch and install the latest versions of all customized packages." t nil) diff -r 73c75c43c1f2 -r 19dcec799385 lisp/auto-save.el --- a/lisp/auto-save.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/auto-save.el Mon Aug 13 10:46:44 2007 +0200 @@ -186,7 +186,8 @@ ;;; Preparations to be done at load time -(defvar auto-save-directory-fallback (expand-file-name "~/.autosave/") +;; Do not call expand-file-name! This is evaluated at dump time now! +(defvar auto-save-directory-fallback "~/.autosave/" ;; not user-variable-p, see above "Directory used for local autosaving of remote files if both `auto-save-directory' and `efs-auto-save-remotely' are nil. @@ -199,25 +200,24 @@ auto-save-directory-fallback)) "If non-nil, directory used for hashed autosave filenames.") -(defun auto-save-check-directory (var) - (let ((dir (symbol-value var))) - (if (null dir) - nil - ;; Expand and store back into the variable - (set var (setq dir (expand-file-name dir))) +(defun auto-save-checked-directory (dir) + "Make sure the directory DIR exists and return it expanded if non-nil." + (when dir + (setq dir (expand-file-name dir)) ;; Make sure directory exists - (if (file-directory-p dir) - nil + (unless (file-directory-p dir) ;; Else we create and chmod 0700 the directory (setq dir (directory-file-name dir)) ; some systems need this (make-directory dir) - (set-file-modes dir #o700))))) + (set-file-modes dir #o700)) + dir)) -(mapc #'auto-save-check-directory - '(auto-save-directory auto-save-directory-fallback)) +;; This make no sense at dump time +;; (mapc #'auto-save-check-directory +; '(auto-save-directory auto-save-directory-fallback)) -(and auto-save-hash-p - (auto-save-check-directory 'auto-save-hash-directory)) +;(and auto-save-hash-p +; (auto-save-check-directory 'auto-save-hash-directory)) ;;; Computing an autosave name for a file and vice versa @@ -335,8 +335,12 @@ (string-match "^#%" basename)) nil) ;; now we know it looks like #...# thus substring is safe to use - ((or (equal savedir auto-save-directory) ; 2nd arg may be nil - (equal savedir auto-save-directory-fallback)) + ((or (equal savedir + (and auto-save-directory + (expand-file-name auto-save-directory))) + ; 2nd arg may be nil + (equal savedir + (expand-file-name auto-save-directory-fallback))) ;; it is of the `-fixed-directory' type (auto-save-slashify-name (substring basename 1 -1))) (t @@ -358,10 +362,11 @@ auto-save-hash-directory (> (length base-name) 14)) (expand-file-name (auto-save-cyclic-hash-14 filename) - auto-save-hash-directory) + (auto-save-checked-directory auto-save-hash-directory)) (expand-file-name base-name - (or auto-save-directory - auto-save-directory-fallback))))) + (auto-save-checked-directory + (or auto-save-directory + auto-save-directory-fallback)))))) (defun auto-save-name-in-same-directory (filename &optional prefix) ;; Enclose the non-directory part of FILENAME in `#' to make an auto @@ -374,7 +379,8 @@ (let ((directory (file-name-directory filename))) (or (null directory) (file-writable-p directory) - (setq directory auto-save-directory-fallback)) + (setq directory (auto-save-checked-directory + auto-save-directory-fallback))) (concat directory ; (concat nil) is "" (or prefix "#") (file-name-nondirectory filename) @@ -497,7 +503,8 @@ file ; its original file (total 0) ; # of files offered to recover (count 0)) ; # of files actually recovered - (or (equal auto-save-directory auto-save-directory-fallback) + (or (equal (expand-file-name auto-save-directory) + (expand-file-name auto-save-directory-fallback)) (setq savefiles (nconc savefiles (directory-files auto-save-directory-fallback diff -r 73c75c43c1f2 -r 19dcec799385 lisp/cus-face.el --- a/lisp/cus-face.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/cus-face.el Mon Aug 13 10:46:44 2007 +0200 @@ -223,6 +223,7 @@ (fontobj (font-create-object font))) (font-family fontobj))) +;;;###autoload (defun custom-set-face-update-spec (face display plist) "Customize the FACE for display types matching DISPLAY, merging in the new items from PLIST" diff -r 73c75c43c1f2 -r 19dcec799385 lisp/custom-load.el --- a/lisp/custom-load.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/custom-load.el Mon Aug 13 10:46:44 2007 +0200 @@ -10,12 +10,14 @@ (custom-add-loads 'drag-n-drop '("dragdrop")) (custom-add-loads 'mouse '("mouse" "mwheel")) (custom-add-loads 'etags '("etags")) +(custom-add-loads 'package-tools '("package-get" "package-ui")) (custom-add-loads 'widgets '("wid-browse" "wid-edit")) (custom-add-loads 'menu '("menubar-items")) (custom-add-loads 'minibuffer '("simple" "minibuf")) (custom-add-loads 'log-message '("simple")) (custom-add-loads 'environment '("frame" "keydefs" "minibuf" "modeline" "window-xemacs" "menubar" "x-init" "toolbar-items" "cus-edit" "gnuserv" "sound")) (custom-add-loads 'sound '("sound")) +(custom-add-loads 'pui '("package-ui")) (custom-add-loads 'terminals '("gnuserv")) (custom-add-loads 'auto-save '("files" "auto-save")) (custom-add-loads 'mail '("simple")) @@ -46,6 +48,7 @@ (custom-add-loads 'toolbar '("toolbar-items")) (custom-add-loads 'dired '("files")) (custom-add-loads 'dnd-debug '("dragdrop")) +(custom-add-loads 'package-get '("package-get")) (custom-add-loads 'killing '("simple")) (custom-add-loads 'widget-button '("wid-edit")) (custom-add-loads 'paren-blinking '("simple")) diff -r 73c75c43c1f2 -r 19dcec799385 lisp/easymenu.el --- a/lisp/easymenu.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/easymenu.el Mon Aug 13 10:46:44 2007 +0200 @@ -23,7 +23,9 @@ ;; Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA ;; 02111-1307, USA. -;;; Synched up with: Not synched with FSF. +;;; Synched up with: Not synched with FSF but coordinated with the FSF +;;; easymenu maintor for compatability with FSF 20.4. +;;; Please: Coordinate changes with Inge Frick ;; Commentary: @@ -63,6 +65,15 @@ ;; - Function: easy-menu-remove MENU ;; Remove MENU from the current menubar. +;; - Function: easy-menu-add-item +;; Add item or submenu to existing menu + +;; - Function: easy-menu-item-present-p +;; Locate item + +;; - Function: easy-menu-remove-item +;; Delete item from menu. + ;; Emacs 19 never uses `easy-menu-add' or `easy-menu-remove', menus ;; automatically appear and disappear when the keymaps specified by ;; the MAPS argument to `easy-menu-define' are activated. @@ -200,6 +211,50 @@ (assoc (car menu) current-menubar) (delete-menu-item (list (car menu))))))) +(defsubst easy-menu-normalize (menu) + (if (symbolp menu) + (symbol-value menu) + menu)) + +(defun easy-menu-add-item (menu path item &optional before) + "At the end of the submenu of MENU with path PATH add ITEM. +If ITEM is already present in this submenu, then this item will be changed. +otherwise ITEM will be added at the end of the submenu, unless the optional +argument BEFORE is present, in which case ITEM will instead be added +before the item named BEFORE. +MENU is either a symbol, which have earlier been used as the first +argument in a call to `easy-menu-define', or the value of such a symbol +i.e. a menu, or nil which stands for the current menubar. +PATH is a list of strings for locating the submenu where ITEM is to be +added. If PATH is nil, MENU itself is used. Otherwise, the first +element should be the name of a submenu directly under MENU. This +submenu is then traversed recursively with the remaining elements of PATH. +ITEM is either defined as in `easy-menu-define', a menu defined earlier +by `easy-menu-define' or `easy-menu-create-menu' or an item returned +from `easy-menu-item-present-p' or `easy-menu-remove-item'." + (add-menu-button path item before (easy-menu-normalize menu))) + +(defun easy-menu-item-present-p (menu path name) + "In submenu of MENU with path PATH, return true iff item NAME is present. +MENU and PATH are defined as in `easy-menu-add-item'. +NAME should be a string, the name of the element to be looked for. + +The return value can be used as as an argument to `easy-menu-add-item'." + (car (find-menu-item (or (easy-menu-normalize menu) current-menubar) + (append path (list name))))) + +(defun easy-menu-remove-item (menu path name) + "From submenu of MENU with path PATH remove item NAME. +MENU and PATH are defined as in `easy-menu-add-item'. +NAME should be a string, the name of the element to be removed. + +The return value can be used as as an argument to `easy-menu-add-item'." + (delete-menu-item (append path (list name)) + (easy-menu-normalize menu))) + + + + ;; Think up a good title for the menu. Take the major-mode of the ;; buffer, strip the -mode part, convert hyphens to spaces, and ;; capitalize it. diff -r 73c75c43c1f2 -r 19dcec799385 lisp/events.el --- a/lisp/events.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/events.el Mon Aug 13 10:46:44 2007 +0200 @@ -120,8 +120,6 @@ (while pairs (puthash (pop pairs) (pop pairs) keyboard-translate-table))) -(put 'backspace 'ascii-character ?\b) -(put 'delete 'ascii-character ?\177) (put 'tab 'ascii-character ?\t) (put 'linefeed 'ascii-character ?\n) (put 'clear 'ascii-character 12) diff -r 73c75c43c1f2 -r 19dcec799385 lisp/faces.el --- a/lisp/faces.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/faces.el Mon Aug 13 10:46:44 2007 +0200 @@ -1249,9 +1249,7 @@ ;; and cache it... (set-frame-property frame 'custom-properties cache)) cache)) - ;; We avoid this cache, because various frame and device - ;; properties can change. - ;;(default-custom-frame-properties) + (default-custom-frame-properties) (t (setq default-custom-frame-properties (extract-custom-frame-properties (selected-frame)))))) diff -r 73c75c43c1f2 -r 19dcec799385 lisp/files.el --- a/lisp/files.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/files.el Mon Aug 13 10:46:44 2007 +0200 @@ -1342,17 +1342,12 @@ (setq alist (cdr alist))))))) (if mode (if (not (fboundp mode)) - (progn - (if (or (not (boundp 'package-get-base)) - (not package-get-base)) - (load "package-get-base")) - (require 'package-get) - (let ((name (package-get-package-provider mode))) - (if name - (message "Mode %s is not installed. Download package %s" mode name) - (message "Mode %s either doesn't exist or is not a known package" mode)) - (sit-for 2) - (error "%s" mode))) + (let ((name (package-get-package-provider mode))) + (if name + (message "Mode %s is not installed. Download package %s" mode name) + (message "Mode %s either doesn't exist or is not a known package" mode)) + (sit-for 2) + (error "%s" mode)) (unless (and just-from-file-name (or ;; Don't reinvoke major mode. diff -r 73c75c43c1f2 -r 19dcec799385 lisp/isearch-mode.el --- a/lisp/isearch-mode.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/isearch-mode.el Mon Aug 13 10:46:44 2007 +0200 @@ -587,7 +587,7 @@ (cons isearch-string regexp-search-ring) regexp-search-ring-yank-pointer regexp-search-ring) (if (> (length regexp-search-ring) regexp-search-ring-max) - (setcdr (nthcdr (1- search-ring-max) regexp-search-ring) + (setcdr (nthcdr (1- regexp-search-ring-max) regexp-search-ring) nil)))) (if (not (setq search-ring-yank-pointer ;; really need equal test instead of eq. diff -r 73c75c43c1f2 -r 19dcec799385 lisp/lisp-mnt.el --- a/lisp/lisp-mnt.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/lisp-mnt.el Mon Aug 13 10:46:44 2007 +0200 @@ -407,7 +407,7 @@ (let ((commentary (lm-commentary-mark)) (change-log (lm-history-mark)) (code (lm-code-mark)) - ) + end) (cond ((and commentary change-log) (buffer-substring commentary change-log)) @@ -415,9 +415,9 @@ (buffer-substring commentary code)) (t ;; XEmacs change (Infodock headers? -sb) - (setq commentary (lm-section-mark "DESCRIPTION" t) - code (lm-section-mark "DESCRIP-END")) - (and commentary end (buffer-substring commentary code))))) + (setq commentary (lm-section-mark "DESCRIPTION" t)) + (setq end (lm-section-mark "DESCRIP-END")) + (and commentary end (buffer-substring commentary end))))) (if file (kill-buffer (current-buffer))) ))) @@ -560,7 +560,9 @@ (mail nil (if addr (concat (car addr) " <" (cdr addr) ">") - bug-gnu-emacs) + (or (and (boundp 'report-emacs-bug-beta-address) + report-emacs-bug-beta-address) + "")) topic) (goto-char (point-max)) (insert "\nIn " diff -r 73c75c43c1f2 -r 19dcec799385 lisp/menubar-items.el --- a/lisp/menubar-items.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/menubar-items.el Mon Aug 13 10:46:44 2007 +0200 @@ -231,9 +231,22 @@ ["Saved..." customize-saved] ["Set..." customize-customized] ["Apropos..." customize-apropos] - ["Browse..." customize-browse] - ["List Packages" pui-list-packages] - ["Update Packages" package-get-custom]) + ["Browse..." customize-browse]) + + ("Manage Packages" + ("Add Download Site" + :filter (lambda (&rest junk) + (package-get-download-menu))) + ["Update Package Index" package-get-update-base] + ["List & Install" pui-list-packages] + ("Using Custom" + ("Select" :filter (lambda (&rest junk) + (cdr (custom-menu-create 'packages)))) + ["Update" package-get-custom]) + ["Help" (Info-goto-node "(xemacs)Packages")]) + + "---" + ("Editing Options" ["Overstrike" (progn diff -r 73c75c43c1f2 -r 19dcec799385 lisp/menubar.el --- a/lisp/menubar.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/menubar.el Mon Aug 13 10:46:44 2007 +0200 @@ -218,7 +218,7 @@ (car item-path-list))))) (cons result parent))))) -(defun add-menu-item-1 (leaf-p menu-path new-item before) +(defun add-menu-item-1 (leaf-p menu-path new-item before in-menu) ;; This code looks like it could be cleaned up some more ;; Do we really need 6 calls to find-menu-item? (when before (setq before (normalize-menu-item-name before))) @@ -226,7 +226,7 @@ (cond ((vectorp new-item) (aref new-item 0)) ((consp new-item) (car new-item)) (t nil))) - (menubar current-menubar) + (menubar (or in-menu current-menubar)) (menu (condition-case () (car (find-menu-item menubar menu-path)) (error nil))) @@ -292,7 +292,7 @@ (set-menubar-dirty-flag) new-item)) -(defun add-menu-button (menu-path menu-leaf &optional before) +(defun add-menu-button (menu-path menu-leaf &optional before in-menu) "Add a menu item to some menu, creating the menu first if necessary. If the named item exists already, it is changed. MENU-PATH identifies the menu under which the new menu item should be inserted. @@ -301,12 +301,16 @@ MENU-LEAF is a menubar leaf node. See the documentation of `current-menubar'. BEFORE, if provided, is the name of a menu item before which this item should be added, if this item is not on the menu already. If the item is already - present, it will not be moved." - (add-menu-item-1 t menu-path menu-leaf before)) + present, it will not be moved. +If IN-MENU is present use that instead of `current-menubar' as the menu to +change. +" + ;; Note easymenu.el uses the fact that menu-leaf can be a submenu. + (add-menu-item-1 t menu-path menu-leaf before in-menu)) ;; I actually liked the old name better, but the interface has changed too ;; drastically to keep it. --Stig -(defun add-submenu (menu-path submenu &optional before) +(defun add-submenu (menu-path submenu &optional before in-menu) "Add a menu to the menubar or one of its submenus. If the named menu exists already, it is changed. MENU-PATH identifies the menu under which the new menu should be inserted. @@ -319,7 +323,7 @@ be added, if this menu is not on its parent already. If the menu is already present, it will not be moved." (check-menu-syntax submenu nil) - (add-menu-item-1 nil menu-path submenu before)) + (add-menu-item-1 nil menu-path submenu before in-menu)) (defun purecopy-menubar (x) ;; this calls purecopy on the strings, and the contents of the vectors, @@ -340,11 +344,12 @@ (t (purecopy x)))) -(defun delete-menu-item (path) +(defun delete-menu-item (path &optional from-menu) "Remove the named menu item from the menu hierarchy. PATH is a list of strings which identify the position of the menu item in the menu hierarchy. The documentation of `add-submenu' describes menu-paths." - (let* ((pair (condition-case nil (find-menu-item current-menubar path) + (let* ((pair (condition-case nil (find-menu-item (or from-menu + current-menubar) path) (error nil))) (item (car pair)) (parent (or (cdr pair) current-menubar))) diff -r 73c75c43c1f2 -r 19dcec799385 lisp/msw-faces.el --- a/lisp/msw-faces.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/msw-faces.el Mon Aug 13 10:46:44 2007 +0200 @@ -145,6 +145,9 @@ (defun mswindows-find-smaller-font (font &optional device) "Loads a new version of the given font (or font name) 1 point smaller. Returns the font if it succeeds, nil otherwise." + (if (stringp font) (setq font (make-font-instance font device))) + (if (font-instance-p font) (setq font (font-instance-truename font))) + (if (stringp font) (setq font (make-font-instance font device))) (if (font-instance-p font) (let (old-size (name (mswindows-font-canonicalize-name font))) (string-match "^[a-zA-Z ]+:[a-zA-Z ]*:\\([0-9]+\\):" name) @@ -160,6 +163,9 @@ (defun mswindows-find-larger-font (font &optional device) "Loads a new version of the given font (or font name) 1 point larger. Returns the font if it succeeds, nil otherwise." + (if (stringp font) (setq font (make-font-instance font device))) + (if (font-instance-p font) (setq font (font-instance-truename font))) + (if (stringp font) (setq font (make-font-instance font device))) (if (font-instance-p font) (let (old-size (name (mswindows-font-canonicalize-name font))) (string-match "^[a-zA-Z ]+:[a-zA-Z ]*:\\([0-9]+\\):" name) diff -r 73c75c43c1f2 -r 19dcec799385 lisp/package-admin.el --- a/lisp/package-admin.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/package-admin.el Mon Aug 13 10:46:44 2007 +0200 @@ -146,14 +146,34 @@ ; ;; rest of command line follows ; package-admin-xemacs file pkg-dir)) -(defun package-admin-get-install-dir (pkg-dir) - (when (null pkg-dir) - (when (or (not (listp late-packages)) - (not late-packages)) - (error "No package path")) - (setq pkg-dir (car (last late-packages)))) - pkg-dir - ) +(defun package-admin-get-install-dir (package pkg-dir &optional mule-related) + "If PKG-DIR is non-nil return that, +else return the current location of the package if it is already installed +or return a location appropriate for the package otherwise." + (if pkg-dir + pkg-dir + (let ((package-feature (intern-soft (concat + (symbol-name package) "-autoloads"))) + autoload-dir) + (when (and (not (eq package 'unknown)) + (featurep package-feature) + (setq autoload-dir (feature-file package-feature)) + (setq autoload-dir (file-name-directory autoload-dir)) + (member autoload-dir late-package-load-path)) + ;; Find the corresonding entry in late-package + (setq pkg-dir + (car-safe (member-if (lambda (h) + (string-match (concat "^" (regexp-quote h)) + autoload-dir)) + late-packages)))) + (if pkg-dir + pkg-dir + ;; Ok we need to guess + (if mule-related + (package-admin-get-install-dir 'mule-base nil nil) + (car (last late-packages))))))) + + (defun package-admin-get-manifest-file (pkg-topdir package) "Return the name of the MANIFEST file for package PACKAGE. @@ -299,7 +319,7 @@ (status 1) start err-list ) - (setq pkg-dir (package-admin-get-install-dir pkg-dir)) + (setq pkg-dir (package-admin-get-install-dir 'unknown pkg-dir)) ;; Insure that the current directory doesn't change (save-excursion (set-buffer buf) @@ -334,37 +354,29 @@ (defun package-admin-rmtree (directory) "Delete a directory and all of its contents, recursively. This is a feeble attempt at making a portable rmdir." - (let ( (orig-default-directory default-directory) files dirs dir) - (unwind-protect - (progn - (setq directory (file-name-as-directory directory)) - (setq files (directory-files directory nil nil nil t)) - (setq dirs (directory-files directory nil nil nil 'dirs)) - (while dirs - (setq dir (car dirs)) - (if (file-symlink-p dir) ;; just in case, handle symlinks - (delete-file dir) - (if (not (or (string-equal dir ".") (string-equal dir ".."))) - (package-admin-rmtree (expand-file-name dir directory)))) - (setq dirs (cdr dirs)) - ) - (setq default-directory directory) - (condition-case err - (progn - (while files - (delete-file (car files)) - (setq files (cdr files)) - ) - (delete-directory directory) - ) - (file-error - (message "%s: %s: \"%s\"" (nth 1 err) (nth 2 err) (nth 3 err))) - ) - ) - (progn - (setq default-directory orig-default-directory) - )) - )) + (setq directory (file-name-as-directory directory)) + (let ((files (directory-files directory nil nil nil t)) + (dirs (directory-files directory nil nil nil 'dirs))) + (while dirs + (if (not (member (car dirs) '("." ".."))) + (let ((dir (expand-file-name (car dirs) directory))) + (condition-case err + (if (file-symlink-p dir) ;; just in case, handle symlinks + (delete-file dir) + (package-admin-rmtree dir)) + (file-error + (message "%s: %s: \"%s\"" (nth 1 err) (nth 2 err) (nth 3 err))))) + (setq dirs (cdr dirs)))) + (while files + (condition-case err + (delete-file (expand-file-name (car files) directory)) + (file-error + (message "%s: %s: \"%s\"" (nth 1 err) (nth 2 err) (nth 3 err)))) + (setq files (cdr files))) + (condition-case err + (delete-directory directory) + (file-error + (message "%s: %s: \"%s\"" (nth 1 err) (nth 2 err) (nth 3 err)))))) (defun package-admin-get-lispdir (pkg-topdir package) (let (package-lispdir) @@ -379,8 +391,7 @@ "Delete a binary installation of PACKAGE below directory PKG-TOPDIR. PACKAGE is a symbol, not a string." (let ( (tmpbuf " *pkg-manifest*") manifest-file package-lispdir dirs file) - (if (not pkg-topdir) - (setq pkg-topdir (package-admin-get-install-dir nil))) + (setq pkg-topdir (package-admin-get-install-dir package pkg-topdir)) (setq manifest-file (package-admin-get-manifest-file pkg-topdir package)) (if (file-exists-p manifest-file) (progn @@ -388,89 +399,99 @@ (message "Removing old files for package \"%s\" ..." package) (sit-for 0) (setq tmpbuf (get-buffer-create tmpbuf)) - (save-excursion - (set-buffer tmpbuf) - (buffer-disable-undo tmpbuf) - (erase-buffer tmpbuf) + (with-current-buffer tmpbuf + (buffer-disable-undo) + (erase-buffer) (insert-file-contents manifest-file) (goto-char (point-min)) + ;; For each entry in the MANIFEST ... (while (< (point) (point-max)) (beginning-of-line) (setq file (expand-file-name (buffer-substring (point) - (save-excursion (end-of-line) - (point))) + (point-at-eol)) pkg-topdir)) (if (file-directory-p file) ;; Keep a record of each directory (setq dirs (cons file dirs)) - (progn ;; Delete each file. ;; Make sure that the file is writable. ;; (This is important under MS Windows.) - (set-file-modes file 438) ;; 438 -> #o666 - (delete-file file) - )) - (forward-line 1) - ) + ;; I do not know why it important under MS Windows but + ;; 1. It bombs out out when the file does not exist. This can be condition-cased + ;; 2. If I removed the write permissions, I do not want XEmacs to just ignore them. + ;; If it wants to, XEmacs may ask, but that is about all + ;; (set-file-modes file 438) ;; 438 -> #o666 + ;; Note, user might have removed the file! + (condition-case () + (delete-file file) + (error nil))) ;; We may want to turn the error into a Warning? + (forward-line 1)) + ;; Delete empty directories. (if dirs (let ( (orig-default-directory default-directory) directory files file ) ;; Make sure we preserve the existing `default-directory'. + ;; JV, why does this change the default directory? Does it indeed? (unwind-protect (progn ;; Warning: destructive sort! (setq dirs (nreverse (sort dirs 'string<))) - ;; For each directory ... - (while dirs - (setq directory (file-name-as-directory (car dirs))) - (setq files (directory-files directory)) - ;; Delete the directory if it's empty. - (if (catch 'done - (while files - (setq file (car files)) - (if (and (not (string= file ".")) - (not (string= file ".."))) - (throw 'done nil)) - (setq files (cdr files)) - ) - t) - (delete-directory directory)) - (setq dirs (cdr dirs)) - ) - ) +; ;; For each directory ... +; (while dirs +; (setq directory (file-name-as-directory (car dirs))) +; (setq files (directory-files directory)) +; ;; Delete the directory if it's empty. +; (if (catch 'done +; (while files +; (setq file (car files)) +; (if (and (not (string= file ".")) +; (not (string= file ".."))) +; (throw 'done nil)) +; (setq files (cdr files)) +; ) +; t) +; ( +; (delete-directory directory)) +; (setq dirs (cdr dirs)) +; ) + ;; JV, On all OS's that I know of delete-directory fails on + ;; on non-empty dirs anyway + (mapc + (lambda (dir) + (condition-case () + (delete-directory dir))) + dirs)) (setq default-directory orig-default-directory) ))) ) (kill-buffer tmpbuf) ;; Delete the MANIFEST file - (set-file-modes manifest-file 438) ;; 438 -> #o666 - (delete-file manifest-file) - (message "Removing old files for package \"%s\" ... done" package) - ) - (progn + ;; (set-file-modes manifest-file 438) ;; 438 -> #o666 + ;; Note. Packages can have MANIFEST in MANIFEST. + (condition-case () + (delete-file manifest-file) + (error nil)) ;; Do warning? + (message "Removing old files for package \"%s\" ... done" package)) ;; The manifest file doesn't exist. Fallback to just deleting the ;; package-specific lisp directory, if it exists. ;; ;; Delete old lisp directory, if any ;; Gads, this is ugly. However, we're not supposed to use `concat' ;; in the name of portability. - (if (setq package-lispdir (package-admin-get-lispdir pkg-topdir + (when (setq package-lispdir (package-admin-get-lispdir pkg-topdir package)) - (progn (message "Removing old lisp directory \"%s\" ..." package-lispdir) (sit-for 0) (package-admin-rmtree package-lispdir) (message "Removing old lisp directory \"%s\" ... done" package-lispdir) - )) - )) + )) ;; Delete the package from the database of installed packages. - (package-delete-name package) - )) + (package-delete-name package))) (provide 'package-admin) diff -r 73c75c43c1f2 -r 19dcec799385 lisp/package-get-base.el --- a/lisp/package-get-base.el Mon Aug 13 10:46:01 2007 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,1543 +0,0 @@ -(setq package-get-base -'((bbdb - (standards-version 1.0 - version "1.01" - author-version "2.0" - date "1998-07-19" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "comm" - dump nil - description "The Big Brother Data Base" - filename "bbdb-1.01-pkg.tar.gz" - md5sum "95ab2746d9cf3a105cab61eb65ecd64d" - size 274056 - provides (bbdb) - requires (bbdb edit-utils gnus mh-e rmail supercite vm tm apel mail-lib xemacs-base) - type regular -)) -(eudc - (standards-version 1.0 - version "1.22" - author-version "1.21" - date "1998-08-22" - build-date "1998-09-19" - maintainer "Oscar Figueiredo " - distribution stable - priority low - category "comm" - dump nil - description "Emacs Unified Directory Client (LDAP, PH)." - filename "eudc-1.22-pkg.tar.gz" - md5sum "25cd2405e5adcf796923f206d55cd3d6" - size 45221 - provides (eudc eudc-ldap eudc-ph) - requires (fsf-compat xemacs-base) - type regular -)) -(footnote - (standards-version 1.0 - version "1.06" - author-version "0.18x" - date "1998-08-27" - build-date "1998-09-19" - maintainer "SL Baur " - distribution stable - priority low - category "comm" - dump nil - description "Footnoting in mail message editing modes." - filename "footnote-1.06-pkg.tar.gz" - md5sum "796323a84d97bade70a5d78fd9076a2e" - size 13551 - provides (footnote) - requires (mail-lib xemacs-base) - type regular -)) -(gnats - (standards-version 1.0 - version "1.06" - author-version "3.101" - date "1998-08-01" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority high - category "comm" - dump nil - description "XEmacs bug reports." - filename "gnats-1.06-pkg.tar.gz" - md5sum "5759d3cdefcc57f7a36c2f30a5868abe" - size 186656 - provides (gnats gnats-admin send-pr) - requires (mail-lib xemacs-base) - type regular -)) -(gnus - (standards-version 1.0 - version "1.28" - author-version "5.6.43x1" - date "1998-09-05" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "comm" - dump nil - description "The Gnus Newsreader and Mailreader." - filename "gnus-1.28-pkg.tar.gz" - md5sum "fc47129ff589191a7361d2eac494bde6" - size 1871939 - provides (gnus message) - requires (gnus w3 mh-e mailcrypt rmail mail-lib xemacs-base) - type regular -)) -(irchat - (standards-version 1.0 - version "1.01" - author-version "980625-2" - date "oc - key " - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "comm" - dump nil - description "ZENIRC IRC Client." - filename "irchat-1.01-pkg.tar.gz" - md5sum "c94bd691cb42e5ba23fbfe26daea2dc8" - size 169192 - provides (irchat) - requires () - type regular -)) -(mailcrypt - (standards-version 1.0 - version "1.05" - author-version "3.4" - date "1998-01-24" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "comm" - dump nil - description "Support for messaging encryption with PGP." - filename "mailcrypt-1.05-pkg.tar.gz" - md5sum "9ae0b8a3dd2c9b308024813fef24cc3c" - size 88944 - provides (mailcrypt) - requires (gnus vm mail-lib xemacs-base) - type regular -)) -(mew - (standards-version 1.0 - version "1.01" - author-version "1.93b38" - date "1998-06-21" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution contrib - priority low - category "comm" - dump nil - description "Messaging in an Emacs World." - filename "mew-1.01-pkg.tar.gz" - md5sum "769d0647f7a411a8026aab4bf56d93c6" - size 523578 - provides (mew) - requires (mew) - type regular -)) -(mh-e - (standards-version 1.0 - version "1.07" - author-version "21.0" - date "1998-07-12" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution contrib - priority low - category "comm" - dump nil - description "Front end support for MH." - filename "mh-e-1.07-pkg.tar.gz" - md5sum "d9ac55c06077c00a4db554dcc6e41dea" - size 178838 - provides (mh-e) - requires (mail-lib xemacs-base) - type regular -)) -(net-utils - (standards-version 1.0 - version "1.09" - author-version "21.0" - date "1998-07-01" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "comm" - dump nil - description "Miscellaneous Networking Utilities." - filename "net-utils-1.09-pkg.tar.gz" - md5sum "597c6bc3aac41b64768d4eb7ae167805" - size 115926 - provides (ilisp-browse-cltl2 emacsbug feedmail metamail net-utils rcompile shadowfile webjump webster-www) - requires (w3 efs mail-lib xemacs-base) - type single -)) -(gnus - (standards-version 1.0 - version "1.01" - author-version "0.31" - date "1998-09-08" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution unstable - priority medium - category "comm" - dump nil - description "The Gnus Newsreader and Mailreader." - filename "pgnus-1.01-pkg.tar.gz" - md5sum "2725e2f5f52079a1966f6e2195aab479" - size 1969810 - provides (gnus message) - requires (pgnus w3 mh-e mailcrypt rmail mail-lib xemacs-base) - type regular -)) -(rmail - (standards-version 1.0 - version "1.06" - author-version "21.0" - date "1998-06-28" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution contrib - priority low - category "comm" - dump nil - description "An obsolete Emacs mailer." - filename "rmail-1.06-pkg.tar.gz" - md5sum "cc42e7660a4eb911b8cbc151f331c36b" - size 96472 - provides (rmail rmailsum) - requires (tm apel mail-lib xemacs-base) - type regular -)) -(supercite - (standards-version 1.0 - version "1.09" - author-version "3.55x2" - date "1998-08-9" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "comm" - dump nil - description "An Emacs citation tool for News & Mail messages." - filename "supercite-1.09-pkg.tar.gz" - md5sum "3b2758fd09e036b9c7ce258d0ee61d5a" - size 98926 - provides (supercite) - requires (mail-lib xemacs-base) - type regular -)) -(tm - (standards-version 1.0 - version "1.13" - author-version "21.0" - date "1998-08-27" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "comm" - dump nil - description "Emacs MIME support." - filename "tm-1.13-pkg.tar.gz" - md5sum "ba0feda4e61c1006c8e17c641de0b6d2" - size 336736 - provides (tm tm-edit tm-view mime-setup) - requires (gnus mh-e rmail vm mailcrypt mail-lib apel xemacs-base) - type regular -)) -(vm - (standards-version 1.0 - version "1.11" - author-version "6.62" - date "1998-09-19" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "comm" - dump nil - description "An Emacs mailer." - filename "vm-1.11-pkg.tar.gz" - md5sum "56e65cbfb38283de030195b33f80be1b" - size 503615 - provides (vm) - requires (mail-lib xemacs-base) - type regular -)) -(w3 - (standards-version 1.0 - version "1.09" - author-version "4.0pre23" - date "1998-07-18" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution experimental - priority high - category "comm" - dump nil - description "A Web browser." - filename "w3-1.09-pkg.tar.gz" - md5sum "ceb4e1e0d9e11102b1ff2a5cb7b77d0f" - size 638496 - provides (w3 url) - requires (w3 mail-lib xemacs-base) - type regular -)) -(zenirc - (standards-version 1.0 - version "1.01" - author-version "2.112" - date "1998-08-15" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "comm" - dump nil - description "ZENIRC IRC Client." - filename "zenirc-1.01-pkg.tar.gz" - md5sum "558723a7d70b1608a046068444f5045f" - size 290655 - provides (zenirc) - requires (zenirc) - type regular -)) -(cookie - (standards-version 1.0 - version "1.08" - author-version "21.0" - date "1998-04-07" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "games" - dump nil - description "Spook and Yow (Zippy quotes)." - filename "cookie-1.08-pkg.tar.gz" - md5sum "aa71e9df700ad89eb803d1100af331dd" - size 34274 - provides (cookie1 yow) - requires (xemacs-base) - type regular -)) -(games - (standards-version 1.0 - version "1.06" - author-version "1.04" - date "1998-06-04" - build-date "1998-09-19" - maintainer "Glynn Clements " - distribution stable - priority low - category "games" - dump nil - description "Tetris, Sokoban, and Snake." - filename "games-1.06-pkg.tar.gz" - md5sum "6db6e872cdcce09b3e9b1e3425dcc20a" - size 31993 - provides (gamegrid snake tetris sokoban) - requires (xemacs-base) - type regular -)) -(mine - (standards-version 1.0 - version "1.08" - author-version "1.9" - date "1998-05-09" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "games" - dump nil - description "Minehunt Game." - filename "mine-1.08-pkg.tar.gz" - md5sum "468ed5ccd1b86cd91572a901e156e7e2" - size 66924 - provides (xmine) - requires (xemacs-base) - type regular -)) -(misc-games - (standards-version 1.0 - version "1.07" - author-version "21.0" - date "1998-03-22" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "games" - dump nil - description "Other amusements and diversions." - filename "misc-games-1.07-pkg.tar.gz" - md5sum "c7898266da95831f5797e849f740fd4c" - size 175489 - provides (decipher gomoku hanoi life morse rot13) - requires (xemacs-base) - type single -)) -(Sun - (standards-version 1.0 - version "1.08" - author-version "21.0" - date "1998-07-25" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution sun - priority low - category "libs" - dump nil - description "Support for Sparcworks." - filename "Sun-1.08-pkg.tar.gz" - md5sum "faeaa48c2700604e5742b7a509b2a154" - size 72951 - provides (sccs eos-browser eos-common eos-debugger eos-debugger eos-editor eos-init eos-load eos-menubar eos-toolbar sunpro) - requires (cc-mode xemacs-base) - type regular -)) -(apel - (standards-version 1.0 - version "1.06" - author-version "3.3" - date "1998-07-23" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution mule - priority high - category "libs" - dump nil - description "A Portable Emacs Library. Used by XEmacs MIME support." - filename "apel-1.06-pkg.tar.gz" - md5sum "56aabd95da4333887bfd9134f5cbe6ac" - size 38742 - provides (atype emu-20 emu-e19 emu-x20 emu-xemacs emu file-detect filename install mule-caesar path-util richtext std11-parse std11 tinyrich) - requires (fsf-compat xemacs-base) - type regular -)) -(dired - (standards-version 1.0 - version "1.02" - author-version "7.9" - date "1998-05-05" - build-date "1998-09-19" - maintainer "Mike Sperber " - distribution stable - priority medium - category "libs" - dump nil - description "Manage file systems." - filename "dired-1.02-pkg.tar.gz" - md5sum "fd009a9bcff0f9a14d9f51665fe9c685" - size 197926 - provides (diff dired) - requires (xemacs-base) - type regular -)) -(edebug - (standards-version 1.0 - version "1.05" - author-version "21.0" - date "1998-03-12" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "libs" - dump nil - description "An Emacs Lisp debugger." - filename "edebug-1.05-pkg.tar.gz" - md5sum "26ff707c557ce5ae53317f391897dde9" - size 113971 - provides (edebug cl-read cust-print eval-reg cl-specs) - requires (xemacs-base) - type regular -)) -(efs - (standards-version 1.0 - version "1.10" - author-version "1.17" - date "1998-08-23" - build-date "1998-09-19" - maintainer "Mike Sperber " - distribution stable - priority medium - category "libs" - dump nil - description "Treat files on remote systems the same as local files." - filename "efs-1.10-pkg.tar.gz" - md5sum "5f4fdf921b2800eb5dc0de6241253419" - size 363608 - provides (efs) - requires (xemacs-base vm dired) - type regular -)) -(fsf-compat - (standards-version 1.0 - version "1.02" - author-version "21.0" - date "1998-03-25" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution mule - priority high - category "libs" - dump nil - description "FSF Emacs compatibility files." - filename "fsf-compat-1.02-pkg.tar.gz" - md5sum "3beb2ba9863cbee8a857acf5af00a8e8" - size 18208 - provides (overlay thingatpt timer) - requires () - type single -)) -(mail-lib - (standards-version 1.0 - version "1.17" - author-version "21.0" - date "1998-06-08" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "libs" - dump nil - description "Fundamental lisp files for providing email support." - filename "mail-lib-1.17-pkg.tar.gz" - md5sum "efe51eec9acce37695c5fb092dabb079" - size 127025 - provides (browse-url highlight-headers mail-abbrevs mail-extr mail-utils reporter rfc822 rmail-mini rmailout sendmail smtpmail) - requires (xemacs-base) - type regular -)) -(sounds-au - (standards-version 1.0 - version "1.03" - author-version "21.0" - date "1998-06-30" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority high - category "libs" - dump nil - description "XEmacs Sun sound files." - filename "sounds-au-1.03-pkg.tar.gz" - md5sum "9ae6e0154c4fce763cfd453e98f94682" - size 125773 - provides () - requires () - type regular -)) -(sounds-wav - (standards-version 1.0 - version "1.03" - author-version "21.0" - date "1998-06-30" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority high - category "libs" - dump nil - description "XEmacs Microsoft sound files." - filename "sounds-wav-1.03-pkg.tar.gz" - md5sum "15a8c6e740202d0c7542c5ebc2837838" - size 148595 - provides () - requires () - type regular -)) -(tooltalk - (standards-version 1.0 - version "1.07" - author-version "21.0" - date "1998-07-25" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution contrib - priority low - category "libs" - dump nil - description "Support for building with Tooltalk." - filename "tooltalk-1.07-pkg.tar.gz" - md5sum "d9a97f43212d794ceebc964dc563dd17" - size 9213 - provides () - requires () - type regular -)) -(xemacs-base - (standards-version 1.0 - version "1.24" - author-version "21.0" - date "1998-08-06" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution mule - priority high - category "libs" - dump nil - description "Fundamental XEmacs support, you almost certainly need this." - filename "xemacs-base-1.24-pkg.tar.gz" - md5sum "505536311107548faff51c7a4510ad08" - size 456033 - provides (add-log advice annotations assoc case-table chistory comint-xemacs comint compile debug ebuff-menu echistory edmacro ehelp electric enriched env facemenu ffap helper imenu iso-syntax macros novice outline overlay passwd pp regi ring shell skeleton sort thing time-stamp timezone xbm-button xpm-button) - requires () - type regular -)) -(xemacs-devel - (standards-version 1.0 - version "1.16" - author-version "21.0" - date "1998-08-19" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "libs" - dump nil - description "Emacs Lisp developer support." - filename "xemacs-devel-1.16-pkg.tar.gz" - md5sum "e5b592061957f041afcd45ed5ecc30cf" - size 85457 - provides (docref eldoc elp find-func hide-copyleft ielm regexp-opt trace) - requires (xemacs-base) - type single -)) -(edict - (standards-version 1.0 - version "1.05" - author-version "0.9.8" - date "1998-07-23" - build-date "1998-09-19" - maintainer "Stephen J. Turnbull " - distribution mule - priority high - category "mule" - dump nil - description "Lisp Interface to EDICT, Kanji Dictionary" - filename "edict-1.05-pkg.tar.gz" - md5sum "f3b0db7eb896cbbb0409d04d1f02ebbe" - size 75070 - provides (dui-registry dui edict-edit edict-english edict-japanese edict-morphology edict-test edict ts-mode) - requires (mule-base xemacs-base) - type regular -)) -(egg-its - (standards-version 1.0 - version "1.10" - author-version "21.0" - date "1998-08-11" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution mule - priority high - category "mule" - dump t - description "Wnn (4.2 and 6) support. SJ3 support." - filename "egg-its-1.10-pkg.tar.gz" - md5sum "2eb3fb60b3cfb1f3d7b63bd8a95426a6" - size 255348 - provides (egg-cnpinyin egg-cnzhuyin egg-cwnn-leim egg-jisx0201 egg-jsymbol egg-kwnn-leim egg-leim egg-sj3-client egg-sj3-leim egg-sj3 egg-wnn egg) - requires (leim mule-base fsf-compat xemacs-base) - type regular -)) -(leim - (standards-version 1.0 - version "1.09" - author-version "21.0" - date "1998-07-23" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution mule - priority medium - category "mule" - dump nil - description "Quail. All non-English and non-Japanese language support." - filename "leim-1.09-pkg.tar.gz" - md5sum "dab730405c3843bd2a14a9821a46d1cf" - size 1742759 - provides () - requires (mule-base fsf-compat xemacs-base) - type regular -)) -(locale - (standards-version 1.0 - version "1.09" - author-version "21.0" - date "1998-07-24" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution mule - priority high - category "mule" - dump nil - description "Localized menubars and localized splash screens." - filename "locale-1.09-pkg.tar.gz" - md5sum "c5d2bb5bcd35e8f2f3033b5ef03398fe" - size 32872 - provides () - requires (mule-base) - type regular -)) -(mule-base - (standards-version 1.0 - version "1.22" - author-version "21.0" - date "1998-08-12" - build-date "1998-09-19" - maintainer "SL Baur " - distribution mule - priority high - category "mule" - dump t - description "Basic Mule support, required for building with Mule." - filename "mule-base-1.22-pkg.tar.gz" - md5sum "82741caa8f936d8e007b3adf1e9c63c2" - size 519183 - provides (canna-leim canna char-table china-util cyril-util isearch-ext japan-util ccl can-n-egg mule-help) - requires (fsf-compat xemacs-base) - type regular -)) -(skk - (standards-version 1.0 - version "1.09" - author-version "10.38" - date "1998-07-23" - build-date "1998-09-19" - maintainer "SL Baur " - distribution mule - priority medium - category "mule" - dump t - description "Japanese Language Input Method." - filename "skk-1.09-pkg.tar.gz" - md5sum "21b1d3bb5bdfe939fb629719b67c68ac" - size 1524350 - provides (skk skk-tut) - requires (viper mule-base xemacs-base) - type regular -)) -(calc - (standards-version 1.0 - version "1.08" - author-version "2.02fX3" - date "1998-07-25" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "oa" - dump nil - description "Emacs calculator" - filename "calc-1.08-pkg.tar.gz" - md5sum "b5ffe11d94688709d4131c9d39541866" - size 1609129 - provides (calc) - requires () - type regular -)) -(calendar - (standards-version 1.0 - version "1.07" - author-version "21.0" - date "1998-09-01" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "oa" - dump nil - description "Calendar and diary support." - filename "calendar-1.07-pkg.tar.gz" - md5sum "61f7aafd5d103ed66cca835ed3583abe" - size 251917 - provides (appt cal-dst cal-french cal-mayan cal-x cal-xemacs calendar diary-ins diary-lib holidays lunar solar) - requires (xemacs-base) - type regular -)) -(edit-utils - (standards-version 1.0 - version "1.30" - author-version "21.0" - date "1998-09-18" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority high - category "oa" - dump nil - description "Miscellaneous editor extensions, you probably need this." - filename "edit-utils-1.30-pkg.tar.gz" - md5sum "9ed576dd1f01cd57a9f0b699cdce36fe" - size 595610 - provides (abbrevlist atomic-extents avoid backup-dir balloon-help big-menubar blink-cursor blink-paren bookmark compare-w completion dabbrev desktop detached-minibuf edit-toolbar fast-lock file-part floating-toolbar flow-ctrl foldout func-menu hippie-exp icomplete id-select info-look iswitchb lazy-lock lazy-shot live-icon man mic-paren paren popper mode-motion+ outl-mouse page-ext blink-paren paren permanent-buffers recent-files redo reportmail rsz-minibuf saveconfsavehist saveplace scroll-in-place tempo toolbar-utils tree-menu uniquify where-was-i-db) - requires (xemacs-base) - type single -)) -(forms - (standards-version 1.0 - version "1.07" - author-version "2.10" - date "1998-01-25" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution contrib - priority low - category "oa" - dump nil - description "Forms editing support (obsolete, use Widget instead)." - filename "forms-1.07-pkg.tar.gz" - md5sum "5efd98c58eb5ba6dce1e1a1e4059238d" - size 47896 - provides (forms forms-mode) - requires () - type regular -)) -(frame-icon - (standards-version 1.0 - version "1.04" - author-version "21.0" - date "1998-07-14" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution contrib - priority low - category "oa" - dump nil - description "Set up mode-specific icons for each frame under XEmacs" - filename "frame-icon-1.04-pkg.tar.gz" - md5sum "60c726b43b7dc20fcdd585796697e497" - size 33753 - provides (forms forms-mode) - requires () - type regular -)) -(hm--html-menus - (standards-version 1.0 - version "1.07" - author-version "5.9" - date "1998-01-25" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "oa" - dump nil - description "HTML editing." - filename "hm--html-menus-1.07-pkg.tar.gz" - md5sum "d90b6994d7d0868800b76042a6080bc5" - size 173431 - provides (adapt hm--date hm--html-configuration hm--html-drag-and-drop hm--html-indentation hm--html-keys hm--html-menu hm--html-mode hm--html-not-standard hm--html html-view tmpl-minor-mode) - requires (xemacs-base) - type regular -)) -(ispell - (standards-version 1.0 - version "1.10" - author-version "3.0x2" - date "1998-09-06" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "oa" - dump nil - description "Spell-checking with GNU ispell." - filename "ispell-1.10-pkg.tar.gz" - md5sum "f3b4ea8328648fde2ef6837e42e0e656" - size 66285 - provides (ispell) - requires () - type regular -)) -(pc - (standards-version 1.0 - version "1.12" - author-version "21.0" - date "1998-07-25" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "oa" - dump nil - description "PC style interface emulation." - filename "pc-1.12-pkg.tar.gz" - md5sum "7d0860e82e54ddbd3467980df674f447" - size 17497 - provides (delbs fusion pc-select pending-del s-region) - requires (xemacs-base) - type regular -)) -(psgml - (standards-version 1.0 - version "1.09" - author-version "1.01" - date "1998-07-06" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "oa" - dump nil - description "Validated HTML/SGML editing." - filename "psgml-1.09-pkg.tar.gz" - md5sum "86bc71c63fc2e278717b4d91debfa2eb" - size 427133 - provides (psgml sgml) - requires (edit-utils) - type regular -)) -(sgml - (standards-version 1.0 - version "1.02" - author-version "21.0" - date "1998-01-25" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution contrib - priority low - category "oa" - dump nil - description "SGML/Linuxdoc-SGML editing." - filename "sgml-1.02-pkg.tar.gz" - md5sum "8e959375437e34425058fe348a9f0143" - size 29523 - provides (sgml linuxdoc-sgml) - requires (xemacs-base) - type regular -)) -(slider - (standards-version 1.0 - version "1.07" - author-version "0.3x1" - date "1998-08-13" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution experimental - priority low - category "oa" - dump nil - description "User interface tool." - filename "slider-1.07-pkg.tar.gz" - md5sum "ebfea81a8d3d52550e76ae4efb5e5399" - size 12174 - provides (slider color-selector) - requires () - type regular -)) -(speedbar - (standards-version 1.0 - version "1.06" - author-version "0.6.2" - date "1998-02-07" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "oa" - dump nil - description "??? Document me." - filename "speedbar-1.06-pkg.tar.gz" - md5sum "533b3c4dbfd82d44ed1243c3e285920a" - size 65542 - provides (speedbar) - requires (xemacs-base) - type regular -)) -(strokes - (standards-version 1.0 - version "1.02" - author-version "21.0" - date "1998-01-25" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "oa" - dump nil - description "Mouse enhancement utility." - filename "strokes-1.02-pkg.tar.gz" - md5sum "016516c550b4369a40f666f3dda9afcb" - size 42765 - provides (strokes) - requires (text-modes edit-utils mail-lib xemacs-base) - type regular -)) -(text-modes - (standards-version 1.0 - version "1.10" - author-version "21.0" - date "1998-08-29" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority high - category "oa" - dump nil - description "Miscellaneous support for editing text files." - filename "text-modes-1.10-pkg.tar.gz" - md5sum "732ecc924eff930b5674453588c0bd2c" - size 204272 - provides (autoinsert crontab-edit filladapt fold-isearch folding image-mode iso-acc iso-ascii iso-cvt iso-insert iso-swed swedish tabify whitespace-mode winmgr-mode xpm-mode xrdb-mode) - requires (ispell fsf-compat xemacs-base) - type regular -)) -(time - (standards-version 1.0 - version "1.05" - author-version "1.17" - date "1998-04-24" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "oa" - dump nil - description "Display time & date on the modeline." - filename "time-1.05-pkg.tar.gz" - md5sum "b6a082e80e20a4caceed5f30826a4b22" - size 19932 - provides (time) - requires (xemacs-base) - type regular -)) -(eterm - (standards-version 1.0 - version "1.06" - author-version "21.0" - date "1998-06-28" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "os" - dump nil - description "Terminal emulation." - filename "eterm-1.06-pkg.tar.gz" - md5sum "086de2e838a20a30d67c4f4bb99171d2" - size 110620 - provides (eterm) - requires (xemacs-base) - type regular -)) -(igrep - (standards-version 1.0 - version "1.03" - author-version "2.83" - date "1998-08-11" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "os" - dump nil - description "Enhanced front-end for Grep." - filename "igrep-1.03-pkg.tar.gz" - md5sum "9a8946cef1c03e74d78382447bc345eb" - size 15263 - provides (igrep) - requires (dired xemacs-base) - type regular -)) -(ilisp - (standards-version 1.0 - version "1.05" - author-version "5.8" - date "1998-01-24" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "os" - dump nil - description "Front-end for Inferior Lisp." - filename "ilisp-1.05-pkg.tar.gz" - md5sum "a21c63df2265048e3f0fd4e290ee732f" - size 272263 - provides (ilisp completer) - requires (xemacs-base) - type regular -)) -(os-utils - (standards-version 1.0 - version "1.10" - author-version "21.0" - date "1998-07-14" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "os" - dump nil - description "Miscellaneous O/S utilities." - filename "os-utils-1.10-pkg.tar.gz" - md5sum "d2f6b6f8d3f2dcfb024a0e601d3e81cf" - size 224824 - provides (archive-mode background crypt crypt++ inf-lisp jka-compr lpr mchat ps-print tar-mode telnet terminal uncompress) - requires (xemacs-base) - type single -)) -(view-process - (standards-version 1.0 - version "1.04" - author-version "2.4" - date "1998-01-24" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "os" - dump nil - description "A Unix process browsing tool." - filename "view-process-1.04-pkg.tar.gz" - md5sum "3ad505fa09f8300c034e7c44ab211d15" - size 62718 - provides (view-process-mode) - requires (xemacs-base) - type regular -)) -(ada - (standards-version 1.0 - version "1.04" - author-version "2.27" - date "1998-01-24" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "prog" - dump nil - description "Ada language support." - filename "ada-1.04-pkg.tar.gz" - md5sum "3eb8dc6d057fd9e3c2248f40df0c34f0" - size 55190 - provides (ada-mode ada-stmt) - requires () - type regular -)) -(c-support - (standards-version 1.0 - version "1.08" - author-version "21.0" - date "1998-03-25" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution contrib - priority low - category "prog" - dump nil - description "Basic single-file add-ons for editing C code." - filename "c-support-1.08-pkg.tar.gz" - md5sum "e03535f146371f8fa3ea440ecdb18f55" - size 73625 - provides (c-comment-edit cmacexp ctypes hideif hideshow) - requires (cc-mode xemacs-base) - type regular -)) -(cc-mode - (standards-version 1.0 - version "1.12" - author-version "5.22" - date "1998-03-05" - build-date "1998-09-19" - maintainer "Barry Warsaw " - distribution stable - priority medium - category "prog" - dump nil - description "C, C++ and Java language support." - filename "cc-mode-1.12-pkg.tar.gz" - md5sum "47a0d9fe2c0753985fa65596b68b8db6" - size 191141 - provides (cc-mode) - requires (xemacs-base) - type regular -)) -(debug - (standards-version 1.0 - version "1.05" - author-version "21.0" - date "1998-07-09" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution contrib - priority low - category "prog" - dump nil - description "GUD, gdb, dbx debugging support." - filename "debug-1.05-pkg.tar.gz" - md5sum "bbb9783b4e81cd085adcf2e383cd4fe7" - size 91169 - provides (dbx gdb-highlight gdb gdbsrc gud history) - requires (xemacs-base) - type regular -)) -(ediff - (standards-version 1.0 - version "1.10" - author-version "2.70.2" - date "1998-04-27" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "prog" - dump nil - description "Interface over GNU patch." - filename "ediff-1.10-pkg.tar.gz" - md5sum "a2b4d368c71a21e32660f061f1b52086" - size 274999 - provides (ediff) - requires (pcl-cvs dired xemacs-base) - type regular -)) -(emerge - (standards-version 1.0 - version "1.03" - author-version "21.0" - date "1998-04-07" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "prog" - dump nil - description "Another interface over GNU patch." - filename "emerge-1.03-pkg.tar.gz" - md5sum "2ca964df916ec1f0b0a3f12a85e6741c" - size 60474 - provides (emerge) - requires () - type regular -)) -(jde - (standards-version 1.0 - version "1.05" - author-version "2.05" - date "1998-07-09" - build-date "1998-09-19" - maintainer "Andy Piper " - distribution stable - priority medium - category "prog" - dump nil - description "Java language and development support." - filename "jde-1.05-pkg.tar.gz" - md5sum "fa4444d0c5cbfef6d3f14e4ed04faef7" - size 129630 - provides (jde) - requires (cc-mode debug speedbar edit-utils mail-lib xemacs-base) - type regular -)) -(pcl-cvs - (standards-version 1.0 - version "1.12" - author-version "21.0" - date "1998-06-18" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "prog" - dump nil - description "CVS frontend." - filename "pcl-cvs-1.12-pkg.tar.gz" - md5sum "f69a484d2d8c7c829793f0a12c89ec91" - size 159090 - provides (pcl-cvs dll elib-node generic-sc) - requires (xemacs-base) - type regular -)) -(prog-modes - (standards-version 1.0 - version "1.10" - author-version "21.0" - date "1998-09-04" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "prog" - dump nil - description "Support for various programming languages." - filename "prog-modes-1.10-pkg.tar.gz" - md5sum "61e1d86aba5774f74a5611b1eb7cf62c" - size 548374 - provides (autoconf-mode cperl-mode eiffel3 f90 fortran ksh-mode m4-mode makefile perl-mode postscript python-mode rexx-mode simula-mode tcl teco verilog-mod) - requires (mail-lib xemacs-base) - type regular -)) -(scheme - (standards-version 1.0 - version "1.04" - author-version "21.0" - date "1998-04-11" - build-date "1998-09-19" - maintainer "Karl M. Hegbloom " - distribution contrib - priority low - category "prog" - dump nil - description "Front-end support for Inferior Scheme." - filename "scheme-1.04-pkg.tar.gz" - md5sum "0815a048274697b7213604e02db0c2a9" - size 39734 - provides (scheme xscheme cmuscheme cmuscheme48) - requires (xemacs-base) - type regular -)) -(sh-script - (standards-version 1.0 - version "1.06" - author-version "2.0e" - date "1998-05-12" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "prog" - dump nil - description "Support for editing shell scripts." - filename "sh-script-1.06-pkg.tar.gz" - md5sum "b87b528df00464cbe1533ffdde81cd8e" - size 34485 - provides (sh-script executable) - requires (xemacs-base) - type regular -)) -(vc-cc - (standards-version 1.0 - version "1.08" - author-version "21.0" - date "1998-07-24" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution contrib - priority low - category "prog" - dump nil - description "Version Control for ClearCase (UnFree) systems." - filename "vc-cc-1.08-pkg.tar.gz" - md5sum "81e1ce88b7389e872d732441a5fdb29f" - size 97261 - provides (vc) - requires (dired xemacs-base) - type regular -)) -(vc - (standards-version 1.0 - version "1.12" - author-version "21.0" - date "1998-08-05" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "prog" - dump nil - description "Version Control for Free systems." - filename "vc-1.12-pkg.tar.gz" - md5sum "bf42fcd4d4dd78b5514e0d56e21082fc" - size 83630 - provides (vc) - requires (dired xemacs-base) - type regular -)) -(vhdl - (standards-version 1.0 - version "1.05" - author-version "2.74" - date "1998-01-24" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "prog" - dump nil - description "Support for VHDL." - filename "vhdl-1.05-pkg.tar.gz" - md5sum "486c16af86f0901d5c5385479b5c0e6a" - size 65812 - provides (vhdl-mode) - requires () - type regular -)) -(auctex - (standards-version 1.0 - version "1.12" - author-version "9.7p" - date "1998-08-05" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority medium - category "wp" - dump nil - description "Basic TeX/LaTeX support." - filename "auctex-1.12-pkg.tar.gz" - md5sum "a2826368828e89f0113401a38a49082b" - size 364768 - provides (auc-old bib-cite font-latex latex multi-prompt tex-buf tex-info tex-jp tex-site tex) - requires (xemacs-base) - type regular -)) -(crisp - (standards-version 1.0 - version "1.07" - author-version "1.34" - date "1998-08-18" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "wp" - dump nil - description "Crisp/Brief emulation." - filename "crisp-1.07-pkg.tar.gz" - md5sum "1c8ef81e2dce5a0f0f2625dd66fcbcfb" - size 10273 - provides (crisp scroll-lock) - requires () - type regular -)) -(edt - (standards-version 1.0 - version "1.05" - author-version "21.0" - date "1998-04-07" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution contrib - priority low - category "wp" - dump nil - description "DEC EDIT/EDT emulation." - filename "edt-1.05-pkg.tar.gz" - md5sum "c2d94f654e748bc3170d21f699faee5d" - size 48534 - provides (edt) - requires (xemacs-base) - type regular -)) -(reftex - (standards-version 1.0 - version "1.07" - author-version "3.38" - date "1998-08-11" - build-date "1998-09-19" - maintainer "Carsten Dominik " - distribution stable - priority medium - category "wp" - dump nil - description "Emacs support for LaTeX cross-references, citations.." - filename "reftex-1.07-pkg.tar.gz" - md5sum "cb821b60e394f6a285d2a43617384c79" - size 200286 - provides (reftex) - requires (fsf-compat xemacs-base) - type regular -)) -(texinfo - (standards-version 1.0 - version "1.12" - author-version "21.0" - date "1998-07-20" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority high - category "wp" - dump nil - description "XEmacs TeXinfo support." - filename "texinfo-1.12-pkg.tar.gz" - md5sum "ec1ff24ddc7c2e3dd0c121717a6ea6c1" - size 134975 - provides (makeinfo tex-mode texinfmt texinfo texnfo-tex texnfo-upd) - requires (xemacs-base) - type regular -)) -(textools - (standards-version 1.0 - version "1.06" - author-version "21.0" - date "1998-04-29" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stabl - priority medium - category "wp" - dump nil - description "Miscellaneous TeX support." - filename "textools-1.06-pkg.tar.gz" - md5sum "6805183aa443242b45689ffe6e46855f" - size 83197 - provides (bib-mode bibtex refer-to-bibtex) - requires (xemacs-base) - type single -)) -(tpu - (standards-version 1.0 - version "1.06" - author-version "4.2X" - date "1998-07-23" - build-date "1998-09-19" - maintainer "Kevin Oberman " - distribution normal - priority medium - category "wp" - dump nil - description "DEC EDIT/TPU support." - filename "tpu-1.06-pkg.tar.gz" - md5sum "cd777d6be222b85810927858d88fd642" - size 59897 - provides (tpu) - requires () - type regular -)) -(viper - (standards-version 1.0 - version "1.09" - author-version "3.03" - date "1998-02-25" - build-date "1998-09-19" - maintainer "XEmacs Development Team " - distribution stable - priority low - category "wp" - dump nil - description "VI emulation support." - filename "viper-1.09-pkg.tar.gz" - md5sum "1636a0aece86e5713e8587eea92c81c8" - size 318061 - provides (viper) - requires (xemacs-base) - type regular -)) -)) -(provide 'package-get-base) diff -r 73c75c43c1f2 -r 19dcec799385 lisp/package-get-custom.el --- a/lisp/package-get-custom.el Mon Aug 13 10:46:01 2007 +0200 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,513 +0,0 @@ -(require 'package-get) -(defgroup comm-packages nil - "comm package group" - :group 'packages) - -(defcustom eudc-package nil - "Emacs Unified Directory Client (LDAP, PH)." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom footnote-package nil - "Footnoting in mail message editing modes." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom gnats-package nil - "XEmacs bug reports." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom gnus-package nil - "The Gnus Newsreader and Mailreader." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom irchat-package nil - "ZENIRC IRC Client." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom mailcrypt-package nil - "Support for messaging encryption with PGP." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom mew-package nil - "Messaging in an Emacs World." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom mh-e-package nil - "Front end support for MH." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom net-utils-package nil - "Miscellaneous Networking Utilities." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom gnus-package nil - "The Gnus Newsreader and Mailreader." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom rmail-package nil - "An obsolete Emacs mailer." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom supercite-package nil - "An Emacs citation tool for News & Mail messages." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom tm-package nil - "Emacs MIME support." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom vm-package nil - "An Emacs mailer." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom w3-package nil - "A Web browser." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom zenirc-package nil - "ZENIRC IRC Client." - :group 'comm-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defgroup games-packages nil - "games package group" - :group 'packages) - -(defcustom cookie-package nil - "Spook and Yow (Zippy quotes)." - :group 'games-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom games-package nil - "Tetris, Sokoban, and Snake." - :group 'games-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom mine-package nil - "Minehunt Game." - :group 'games-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom misc-games-package nil - "Other amusements and diversions." - :group 'games-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defgroup libs-packages nil - "libs package group" - :group 'packages) - -(defcustom Sun-package nil - "Support for Sparcworks." - :group 'libs-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom apel-package nil - "A Portable Emacs Library. Used by XEmacs MIME support." - :group 'libs-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom dired-package nil - "Manage file systems." - :group 'libs-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom edebug-package nil - "An Emacs Lisp debugger." - :group 'libs-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom efs-package nil - "Treat files on remote systems the same as local files." - :group 'libs-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom fsf-compat-package nil - "FSF Emacs compatibility files." - :group 'libs-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom mail-lib-package nil - "Fundamental lisp files for providing email support." - :group 'libs-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom sounds-au-package nil - "XEmacs Sun sound files." - :group 'libs-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom sounds-wav-package nil - "XEmacs Microsoft sound files." - :group 'libs-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom tooltalk-package nil - "Support for building with Tooltalk." - :group 'libs-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom xemacs-base-package nil - "Fundamental XEmacs support, you almost certainly need this." - :group 'libs-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom xemacs-devel-package nil - "Emacs Lisp developer support." - :group 'libs-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defgroup mule-packages nil - "mule package group" - :group 'packages) - -(defcustom edict-package nil - "Lisp Interface to EDICT, Kanji Dictionary" - :group 'mule-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom egg-its-package nil - "Wnn (4.2 and 6) support. SJ3 support." - :group 'mule-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom leim-package nil - "Quail. All non-English and non-Japanese language support." - :group 'mule-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom locale-package nil - "Localized menubars and localized splash screens." - :group 'mule-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom mule-base-package nil - "Basic Mule support, required for building with Mule." - :group 'mule-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom skk-package nil - "Japanese Language Input Method." - :group 'mule-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defgroup oa-packages nil - "oa package group" - :group 'packages) - -(defcustom calc-package nil - "Emacs calculator" - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom calendar-package nil - "Calendar and diary support." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom edit-utils-package nil - "Miscellaneous editor extensions, you probably need this." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom forms-package nil - "Forms editing support (obsolete, use Widget instead)." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom frame-icon-package nil - "Set up mode-specific icons for each frame under XEmacs" - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom hm--html-menus-package nil - "HTML editing." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom ispell-package nil - "Spell-checking with GNU ispell." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom pc-package nil - "PC style interface emulation." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom psgml-package nil - "Validated HTML/SGML editing." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom sgml-package nil - "SGML/Linuxdoc-SGML editing." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom slider-package nil - "User interface tool." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom speedbar-package nil - "??? Document me." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom strokes-package nil - "Mouse enhancement utility." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom text-modes-package nil - "Miscellaneous support for editing text files." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom time-package nil - "Display time & date on the modeline." - :group 'oa-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defgroup os-packages nil - "os package group" - :group 'packages) - -(defcustom eterm-package nil - "Terminal emulation." - :group 'os-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom igrep-package nil - "Enhanced front-end for Grep." - :group 'os-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom ilisp-package nil - "Front-end for Inferior Lisp." - :group 'os-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom os-utils-package nil - "Miscellaneous O/S utilities." - :group 'os-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom view-process-package nil - "A Unix process browsing tool." - :group 'os-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defgroup prog-packages nil - "prog package group" - :group 'packages) - -(defcustom ada-package nil - "Ada language support." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom c-support-package nil - "Basic single-file add-ons for editing C code." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom cc-mode-package nil - "C, C++ and Java language support." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom debug-package nil - "GUD, gdb, dbx debugging support." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom ediff-package nil - "Interface over GNU patch." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom emerge-package nil - "Another interface over GNU patch." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom jde-package nil - "Java language and development support." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom pcl-cvs-package nil - "CVS frontend." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom prog-modes-package nil - "Support for various programming languages." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom scheme-package nil - "Front-end support for Inferior Scheme." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom sh-script-package nil - "Support for editing shell scripts." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom vc-cc-package nil - "Version Control for ClearCase (UnFree) systems." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom vc-package nil - "Version Control for Free systems." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom vhdl-package nil - "Support for VHDL." - :group 'prog-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defgroup wp-packages nil - "wp package group" - :group 'packages) - -(defcustom auctex-package nil - "Basic TeX/LaTeX support." - :group 'wp-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom crisp-package nil - "Crisp/Brief emulation." - :group 'wp-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom edt-package nil - "DEC EDIT/EDT emulation." - :group 'wp-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom reftex-package nil - "Emacs support for LaTeX cross-references, citations.." - :group 'wp-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom texinfo-package nil - "XEmacs TeXinfo support." - :group 'wp-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom textools-package nil - "Miscellaneous TeX support." - :group 'wp-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom tpu-package nil - "DEC EDIT/TPU support." - :group 'wp-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - -(defcustom viper-package nil - "VI emulation support." - :group 'wp-packages - :initialize 'package-get-ever-installed-p - :type 'boolean) - diff -r 73c75c43c1f2 -r 19dcec799385 lisp/package-get.el --- a/lisp/package-get.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/package-get.el Mon Aug 13 10:46:44 2007 +0200 @@ -3,6 +3,8 @@ ;; Copyright (C) 1998 by Pete Ware ;; Author: Pete Ware +;; Heavy-Modifications: Greg Klanderman +;; Jan Vroonhof ;; Keywords: internal ;; This file is part of XEmacs. @@ -29,6 +31,9 @@ ;; package-get - ;; Retrieve a package and any other required packages from an archive ;; +;; +;; Note (JV): Most of this no longer aplies! +;; ;; The idea: ;; A new XEmacs lisp-only release is generated with the following steps: ;; 1. The maintainer runs some yet to be written program that @@ -97,8 +102,17 @@ ;;; Code: (require 'package-admin) -(require 'package-get-base) +;; (require 'package-get-base) + +(defgroup package-tools nil + "Tools to manipulate packages." + :group 'emacs) +(defgroup package-get nil + "Automatic Package Fetcher and Installer." + :prefix "package-get" + :group 'package-tools) + (defvar package-get-base nil "List of packages that are installed at this site. For each element in the alist, car is the package name and the cdr is @@ -145,25 +159,332 @@ be lexically ordered. It is debatable if it makes sense to have more than one version of a package available.") -(defvar package-get-dir (temp-directory) - "*Where to store temporary files for staging.") +(defcustom package-get-dir (temp-directory) + "*Where to store temporary files for staging." + :tag "Temporary directory" + :type 'directory + :group 'package-get) -(defvar package-get-remote - '(("ftp.xemacs.org" "/pub/xemacs/packages")) +(define-widget 'host-name 'string + "A Host name." + :tag "Host") + +(defcustom package-get-remote nil "*List of remote sites to contact for downloading packages. List format is '(site-name directory-on-site). Each site is tried in order until the package is found. As a special case, `site-name' can be -`nil', in which case `directory-on-site' is treated as a local directory.") +`nil', in which case `directory-on-site' is treated as a local directory." + :tag "Package repository" + :type '(repeat (choice (list :tag "Local" (const :tag "Local" nil) directory ) + (list :tag "Remote" host-name directory) )) + :group 'package-get) + +(defcustom package-get-download-sites + '( + ;; North America + ("xemacs.org" "ftp.xemacs.org" "pub/xemacs/packages") + ("cso.uiuc.edu" "ftp.cso.uiuc.edu" "pub/packages/xemacs/packages") + + ;; South America + ("unicamp.br" "ftp.unicamp.br" "pub/xemacs/packages") + + ;; Europe + ("sunsite.cnlab-switch.ch" "sunsite.cnlab-switch.ch" "mirror/xemacs/packages") + ("tu-darmstadt.de" "ftp.tu-darmstadt.de" "pub/editors/xemacs/packages") + ("sunsite.auc.dk" "sunsite.auc.dk" "pub/emacs/xemacs/packages") + ("pasteur.fr" "ftp.pasteur.fr" "pub/computing/xemacs/packages") + ("cenatls.cena.dgac.fr" "ftp.cenatls.cena.dgac.fr" "pub/Emacs/xemacs/packages") + ("kfki.hu" "ftp.kfki.hu" "pub/packages/xemacs/packages") + ("uniroma2.it" "ftp.uniroma2.it" "unix/misc/dist/XEMACS/packages") + ("icm.edu.pl" "ftp.icm.edu.pl" "pub/unix/editors/xemacs/packages") + ("sunet.se" "ftp.sunet.se" "pub/gnu/xemacs/packages") + ("doc.ic.ac.uk" "ftp.doc.ic.ac.uk" "packages/xemacs/packages") + ("srcc.msu.su" "ftp1.srcc.msu.su" "mirror/ftp.xemacs.org/packages") + + ;; Asia + ("usyd.edu.au" "ftp.usyd.edu.au" "pub/Xemacs/packages") + ("netlab.is.tsukuba.ac.jp" "ftp.netlab.is.tsukuba.ac.jp" "pub/GNU/xemacs/packages") + ("jaist.ac.jp" "ftp.jaist.ac.jp" "pub/GNU/xemacs/packages") + ("ring.aist.go.jp" "ring.aist.go.jp" "pub/text/xemacs/packages") + ("ring.asahi-net.or.jp" "ring.asahi-net.or.jp" "pub/text/xemacs/packages") + ("SunSITE.sut.ac.jp" "SunSITE.sut.ac.jp" "pub/archives/packages/xemacs/packages") + ("dti.ad.jp" "ftp.dti.ad.jp" "pub/unix/editor/xemacs/packages") + ("kreonet.re.kr" "ftp.kreonet.re.kr" "pub/tools/emacs/xemacs/packages") + ) + "*List of remote sites available for downloading packages. +List format is '(site-description site-name directory-on-site). +SITE-DESCRIPTION is a textual description of the site. SITE-NAME +is the internet address of the download site. DIRECTORY-ON-SITE +is the directory on the site in which packages may be found. +This variable is used to initialize `package-get-remote', the +variable actually used to specify package download sites." + :tag "Package download sites" + :type '(repeat (list hostname directory)) + :group 'package-get) + +(defcustom package-get-remove-copy t + "*After copying and installing a package, if this is T, then remove the +copy. Otherwise, keep it around." + :type 'boolean + :group 'package-get) + +;; #### it may make sense for this to be a list of names. +;; #### also, should we rename "*base*" to "*index*" or "*db*"? +;; "base" is a pretty poor name. +(defcustom package-get-base-filename "package-index.LATEST.pgp" + "*Name of the default package-get database file. +This may either be a relative path, in which case it is interpreted +with respect to `package-get-remote', or an absolute path." + :type 'file + :group 'package-get) + +(defcustom package-get-always-update nil + "*If Non-nil always make sure we are using the latest package index (base). +Otherwise respect the `force-current' argument of `package-get-require-base'." + :type 'boolean + :group 'package-get) + +(defcustom package-get-require-signed-base-updates t + "*If set to a non-nil value, require explicit user confirmation for updates +to the package-get database which cannot have their signature verified via PGP. +When nil, updates which are not PGP signed are allowed without confirmation." + :type 'boolean + :group 'package-get) + +(defvar package-get-was-current nil + "Non-nil we did our best to fetch a current database.") + +;;;###autoload +(defun package-get-download-menu () + "Build the `Add Download Site' menu." + (mapcar (lambda (site) + (vector (car site) + `(push (quote ,(cdr site)) + package-get-remote))) + package-get-download-sites)) + +;;;###autoload +(defun package-get-require-base (&optional force-current) + "Require that a package-get database has been loaded. +If the optional FORCE-CURRENT argument or the value of +`package-get-always-update' is Non-nil, try to update the database +from a location in `package-get-remote'. Otherwise a local copy is used +if available and remote access is never done. + +Please use FORCE-CURRENT only when the user is explictly dealing with packages +and remote access is likely in the near future." + (setq force-current (or force-current package-get-always-update)) + (unless (and (boundp 'package-get-base) + package-get-base + (or (not force-current) package-get-was-current)) + (package-get-update-base nil force-current)) + (if (or (not (boundp 'package-get-base)) + (not package-get-base)) + (error "Package-get database not loaded") + (setq package-get-was-current force-current))) + +(defconst package-get-pgp-signed-begin-line "^-----BEGIN PGP SIGNED MESSAGE-----" + "Text for start of PGP signed messages.") +(defconst package-get-pgp-signature-begin-line "^-----BEGIN PGP SIGNATURE-----" + "Text for beginning of PGP signature.") +(defconst package-get-pgp-signature-end-line "^-----END PGP SIGNATURE-----" + "Text for end of PGP signature.") + +;;;###autoload +(defun package-get-update-base-entry (entry) + "Update an entry in `package-get-base'." + (let ((existing (assq (car entry) package-get-base))) + (if existing + (setcdr existing (cdr entry)) + (setq package-get-base (cons entry package-get-base)) + (package-get-custom-add-entry (car entry) (car (cdr entry)))))) + +(defun package-get-locate-file (file &optional nil-if-not-found no-remote) + "Locate an existing FILE with respect to `package-get-remote'. +If FILE is an absolute path or is not found, simply return FILE. +If optional argument NIL-IF-NOT-FOUND is non-nil, return nil +if FILE can not be located. +If NO-REMOTE is non-nil never search remote locations." + (if (file-name-absolute-p file) + file + (let ((entries package-get-remote) + (expanded nil)) + (while entries + (unless (and no-remote (caar entries)) + (let ((expn (package-get-remote-filename (car entries) file))) + (if (and expn (file-exists-p expn)) + (setq entries nil + expanded expn)))) + (setq entries (cdr entries))) + (or expanded + (and (not nil-if-not-found) + file))))) -(defvar package-get-remove-copy nil - "*After copying and installing a package, if this is T, then remove the -copy. Otherwise, keep it around.") +(defun package-get-locate-index-file (no-remote) + "Locate the package-get index file. Do not return remote paths if NO-REMOTE +is non-nil." + (or (package-get-locate-file package-get-base-filename t no-remote) + (locate-data-file package-get-base-filename) + package-get-base-filename)) + +(defvar package-get-user-package-location user-init-directory) + +(defun package-get-maybe-save-index (filename) + "Offer to save the current buffer as the local package index file, +if different." + (let ((location (package-get-locate-index-file t))) + (unless (and filename (equal filename location)) + (unless (equal (md5 (current-buffer)) + (with-temp-buffer + (insert-file-contents location) + (md5 (current-buffer)))) + (unless (file-writable-p location) + (setq location (expand-file-name package-get-base-filename + (expand-file-name "etc/" package-get-user-package-location)))) + (when (y-or-n-p (concat "Update package index in" location "? ")) + (write-file location)))))) + + +;;;###autoload +(defun package-get-update-base (&optional db-file force-current) + "Update the package-get database file with entries from DB-FILE. +Unless FORCE-CURRENT is non-nil never try to update the database." + (interactive + (let ((dflt (package-get-locate-index-file nil))) + (list (read-file-name "Load package-get database: " + (file-name-directory dflt) + dflt + t + (file-name-nondirectory dflt))))) + (setq db-file (expand-file-name (or db-file + (package-get-locate-index-file + (not force-current))))) + (if (not (file-exists-p db-file)) + (error "Package-get database file `%s' does not exist" db-file)) + (if (not (file-readable-p db-file)) + (error "Package-get database file `%s' not readable" db-file)) + (let ((buf (get-buffer-create "*package database*"))) + (unwind-protect + (save-excursion + (set-buffer buf) + (erase-buffer buf) + (insert-file-contents-internal db-file) + (package-get-update-base-from-buffer buf) + (if (file-remote-p db-file) + (package-get-maybe-save-index db-file))) + (kill-buffer buf)))) + +;;;###autoload +(defun package-get-update-base-from-buffer (&optional buf) + "Update the package-get database with entries from BUFFER. +BUFFER defaults to the current buffer. This command can be +used interactively, for example from a mail or news buffer." + (interactive) + (setq buf (or buf (current-buffer))) + (let (content-beg content-end beg end) + (save-excursion + (set-buffer buf) + (goto-char (point-min)) + (setq content-beg (point)) + (setq content-end (save-excursion (goto-char (point-max)) (point))) + (when (re-search-forward package-get-pgp-signed-begin-line nil t) + (setq beg (match-beginning 0)) + (setq content-beg (match-end 0))) + (when (re-search-forward package-get-pgp-signature-begin-line nil t) + (setq content-end (match-beginning 0))) + (when (re-search-forward package-get-pgp-signature-end-line nil t) + (setq end (point))) + (if (not (and content-beg content-end beg end)) + (or (not package-get-require-signed-base-updates) + (yes-or-no-p "Package-get entries not PGP signed, continue? ") + (error "Package-get database not updated"))) + (if (and content-beg content-end beg end) + (if (not (condition-case nil + (or (fboundp 'mc-pgp-verify-region) + (load-library "mc-pgp") + (fboundp 'mc-pgp-verify-region)) + (error nil))) + (or (not package-get-require-signed-base-updates) + (yes-or-no-p + "No mailcrypt; can't verify package-get DB signature, continue? ") + (error "Package-get database not updated")))) + (if (and beg end + (fboundp 'mc-pgp-verify-region) + (or (not + (condition-case err + (mc-pgp-verify-region beg end) + (file-error + (and (string-match "No such file" (nth 2 err)) + (or (not package-get-require-signed-base-updates) + (yes-or-no-p + (concat "Can't find PGP, continue without " + "package-get DB verification? "))))) + (t nil))))) + (error "Package-get PGP signature failed to verify")) + ;; ToDo: We shoud call package-get-maybe-save-index on the region + (package-get-update-base-entries content-beg content-end) + (message "Updated package-get database")))) + +(defun package-get-update-base-entries (beg end) + "Update the package-get database with the entries found between +BEG and END in the current buffer." + (save-excursion + (goto-char beg) + (if (not (re-search-forward "^(package-get-update-base-entry" nil t)) + (error "Buffer does not contain package-get database entries")) + (beginning-of-line) + (let ((count 0)) + (while (and (< (point) end) + (re-search-forward "^(package-get-update-base-entry" nil t)) + (beginning-of-line) + (let ((entry (read (current-buffer)))) + (if (or (not (consp entry)) + (not (eq (car entry) 'package-get-update-base-entry))) + (error "Invalid package-get database entry found")) + (package-get-update-base-entry + (car (cdr (car (cdr entry))))) + (setq count (1+ count)))) + (message "Got %d package-get database entries" count)))) + +;;;###autoload +(defun package-get-save-base (file) + "Write the package-get database to FILE. + +Note: This database will be unsigned of course." + (interactive "FSave package-get database to: ") + (package-get-require-base t) + (let ((buf (get-buffer-create "*package database*"))) + (unwind-protect + (save-excursion + (set-buffer buf) + (erase-buffer buf) + (goto-char (point-min)) + (let ((entries package-get-base) entry plist) + (insert ";; Package Index file -- Do not edit manually.\n") + (insert ";;;@@@\n") + (while entries + (setq entry (car entries)) + (setq plist (car (cdr entry))) + (insert "(package-get-update-base-entry (quote\n") + (insert (format "(%s\n" (symbol-name (car entry)))) + (while plist + (insert (format " %s%s %S\n" + (if (eq plist (car (cdr entry))) "(" " ") + (symbol-name (car plist)) + (car (cdr plist)))) + (setq plist (cdr (cdr plist)))) + (insert "))\n))\n;;;@@@\n") + (setq entries (cdr entries)))) + (insert ";; Package Index file ends here\n") + (write-region (point-min) (point-max) file)) + (kill-buffer buf)))) (defun package-get-interactive-package-query (get-version package-symbol) "Perform interactive querying for package and optional version. Query for a version if GET-VERSION is non-nil. Return package name as a symbol instead of a string if PACKAGE-SYMBOL is non-nil. The return value is suitable for direct passing to `interactive'." + (package-get-require-base t) (let ( (table (mapcar '(lambda (item) (let ( (name (symbol-name (car item))) ) (cons name name) @@ -206,6 +527,7 @@ (defun package-get-update-all () "Fetch and install the latest versions of all currently installed packages." (interactive) + (package-get-require-base t) ;; Load a fresh copy (catch 'exit (mapcar (lambda (pkg) @@ -215,12 +537,14 @@ packages-package-list))) ;;;###autoload -(defun package-get-all (package version &optional fetched-packages) +(defun package-get-all (package version &optional fetched-packages install-dir) "Fetch PACKAGE with VERSION and all other required packages. Uses `package-get-base' to determine just what is required and what package provides that functionality. If VERSION is nil, retrieves latest version. Optional argument FETCHED-PACKAGES is used to keep -track of packages already fetched. +track of packages already fetched. Optional argument INSTALL-DIR, +if non-nil, specifies the package directory where fetched packages +should be installed. Returns nil upon error." (interactive (package-get-interactive-package-query t nil)) @@ -233,7 +557,7 @@ (catch 'exit (setq version (package-get-info-prop this-package 'version)) (unless (package-get-installedp package version) - (if (not (package-get package version)) + (if (not (package-get package version nil install-dir)) (progn (setq fetched-packages nil) (throw 'exit nil)))) @@ -248,7 +572,7 @@ (while this-requires (if (not (member (car this-requires) fetched-packages)) (let* ((reqd-package (package-get-package-provider - (car this-requires))) + (car this-requires) t)) (reqd-version (cadr reqd-package)) (reqd-name (car reqd-package))) (if (null reqd-name) @@ -256,7 +580,8 @@ (car this-requires))) (if (not (setq fetched-packages (package-get-all reqd-name reqd-version - fetched-packages))) + fetched-packages + install-dir))) (throw 'exit nil))) ) (setq this-requires (cdr this-requires))) @@ -264,6 +589,42 @@ fetched-packages )) +;;;###autoload +(defun package-get-dependencies (packages) + "Compute dependencies for PACKAGES. +Uses `package-get-base' to determine just what is required and what +package provides that functionality. Returns the list of packages +required by PACKAGES." + (package-get-require-base t) + (let ((orig-packages packages) + dependencies provided) + (while packages + (let* ((package (car packages)) + (the-package (package-get-info-find-package + package-get-base package)) + (this-package (package-get-info-version + the-package nil)) + (this-requires (package-get-info-prop this-package 'requires)) + (new-depends (set-difference + (mapcar + #'(lambda (reqd) + (let* ((reqd-package (package-get-package-provider reqd)) + (reqd-version (cadr reqd-package)) + (reqd-name (car reqd-package))) + (if (null reqd-name) + (error "Unable to find a provider for %s" reqd)) + reqd-name)) + this-requires) + dependencies)) + (this-provides (package-get-info-prop this-package 'provides))) + (setq dependencies + (union dependencies new-depends)) + (setq provided + (union provided (union (list package) this-provides))) + (setq packages + (union new-depends (cdr packages))))) + (set-difference dependencies orig-packages))) + (defun package-get-load-package-file (lispdir file) (let (pathname) (setq pathname (expand-file-name file lispdir)) @@ -328,10 +689,14 @@ successfully installed but errors occurred during initialization, or `nil' upon error." (interactive (package-get-interactive-package-query nil t)) + (catch 'skip-update (let* ((this-package (package-get-info-version (package-get-info-find-package package-get-base package) version)) + (latest (package-get-info-prop this-package 'version)) + (installed (package-get-key package :version)) + (this-requires (package-get-info-prop this-package 'requires)) (found nil) (search-dirs package-get-remote) (base-filename (package-get-info-prop this-package 'filename)) @@ -343,8 +708,25 @@ (if (null base-filename) (error "No filename associated with package %s, version %s" package version)) - (if (null install-dir) - (setq install-dir (package-admin-get-install-dir nil))) + (setq install-dir + (package-admin-get-install-dir package install-dir + (or (eq package 'mule-base) (memq 'mule-base this-requires)))) + + ;; If they asked for the latest using version=nil, don't get an older + ;; version than we already have. + (if installed + (if (> (if (stringp installed) + (string-to-number installed) + installed) + (if (stringp latest) + (string-to-number latest) + latest)) + (if (not (null version)) + (warn "Installing %s package version %s, you had a newer version %s" + package latest installed) + (warn "Skipping %s package, you have a newer version %s" + package installed) + (throw 'skip-update t)))) ;; Contrive a list of possible package filenames. ;; Ugly. Is there a better way to do this? @@ -354,7 +736,7 @@ (list (concat (match-string 1 base-filename) ".tgz"))))) - (setq version (package-get-info-prop this-package 'version)) + (setq version latest) (unless (and (eq conflict 'never) (package-get-installedp package version)) ;; Find the package from the search list in package-get-remote @@ -474,7 +856,7 @@ (if (and found package-get-remove-copy) (delete-file full-package-filename)) package-status - )) + ))) (defun package-get-info-find-package (which name) "Look in WHICH for the package called NAME and return all the info @@ -575,12 +957,16 @@ (if (floatp version) version (string-to-number version)))) ;;;###autoload -(defun package-get-package-provider (sym) +(defun package-get-package-provider (sym &optional force-current) "Search for a package that provides SYM and return the name and version. Searches in `package-get-base' for SYM. If SYM is a consp, then it must match a corresponding (provide (SYM VERSION)) from - the package." + the package. + +If FORCE-CURRENT is non-nil make sure the database is up to date. This might +lead to Emacs accessing remote sites." (interactive "SSymbol: ") + (package-get-require-base force-current) (let ((packages package-get-base) (done nil) (found nil)) @@ -590,12 +976,14 @@ (while (and (not done) this-package) (if (or (eq this-name sym) (eq (cons this-name - (package-get-info-prop (car this-package) 'version)) + (package-get-info-prop (car this-package) 'version)) sym) - (member sym (package-get-info-prop (car this-package) 'provides))) + (member sym + (package-get-info-prop (car this-package) 'provides))) (progn (setq done t) - (setq found (list (caar packages) - (package-get-info-prop (car this-package) 'version)))) + (setq found + (list (caar packages) + (package-get-info-prop (car this-package) 'version)))) (setq this-package (cdr this-package))))) (setq packages (cdr packages))) found)) @@ -612,11 +1000,12 @@ (defun package-get-custom () "Fetch and install the latest versions of all customized packages." (interactive) + (package-get-require-base t) ;; Load a fresh copy (load "package-get-custom.el") (mapcar (lambda (pkg) (if (eval (intern (concat (symbol-name (car pkg)) "-package"))) - (package-get-all (car pkg) nil)) + (package-get (car pkg) nil)) t) package-get-base)) @@ -629,80 +1018,26 @@ (intern (substring (symbol-name pkg) 0 (match-beginning 0)))) t))) -(defun package-get-file-installed-p (file &optional paths) - "Return absolute-path of FILE if FILE exists in PATHS. -If PATHS is omitted, `load-path' is used." - (if (null paths) - (setq paths load-path) - ) - (catch 'tag - (let (path) - (while paths - (setq path (expand-file-name file (car paths))) - (if (file-exists-p path) - (throw 'tag path) - ) - (setq paths (cdr paths)) - )))) - -(defun package-get-create-custom () - "Creates a package customization file package-get-custom.el. -Entries in the customization file are retrieved from package-get-base.el." - (interactive) - ;; Load a fresh copy - (let ((custom-buffer (find-file-noselect - (or (package-get-file-installed-p - "package-get-custom.el") - (expand-file-name - "package-get-custom.el" - (file-name-directory - (package-get-file-installed-p - "package-get-base.el")) - )))) - (pkg-groups nil)) - - ;; clear existing stuff - (delete-region (point-min custom-buffer) - (point-max custom-buffer) custom-buffer) - (insert-string "(require 'package-get)\n" custom-buffer) +(defvar package-get-custom-groups nil + "List of package-get-custom groups") - (mapcar (lambda (pkg) - (let ((category (plist-get (car (cdr pkg)) 'category))) - (or (memq (intern category) pkg-groups) - (progn - (setq pkg-groups (cons (intern category) pkg-groups)) - (insert-string - (concat "(defgroup " category "-packages nil\n" - " \"" category " package group\"\n" - " :group 'packages)\n\n") custom-buffer))) - - (insert-string - (concat "(defcustom " (symbol-name (car pkg)) - "-package nil \n" - " \"" (plist-get (car (cdr pkg)) 'description) "\"\n" - " :group '" category "-packages\n" - " :initialize 'package-get-ever-installed-p\n" - " :type 'boolean)\n\n") custom-buffer))) - package-get-base) custom-buffer) - ) +(defun package-get-custom-add-entry (package props) + (let* ((category (plist-get props 'category)) + (group (intern (concat category "-packages"))) + (custom-var (intern (concat (symbol-name package) "-package"))) + (description (plist-get props 'description))) + (when (not (memq group package-get-custom-groups)) + (setq package-get-custom-groups (cons package + package-get-custom-groups)) + (eval `(defgroup ,group nil + ,(concat category " package group") + :group 'packages))) + (eval `(defcustom ,custom-var nil + ,description + :group ',group + :initialize 'package-get-ever-installed-p + :type 'boolean)))) -;; need this first to avoid infinite dependency loops + (provide 'package-get) - -;; potentially update the custom dependencies every time we load this -(let ((custom-file (package-get-file-installed-p "package-get-custom.el")) - (package-file (package-get-file-installed-p "package-get-base.el"))) - ;; update custom file if it doesn't exist - (if (or (not custom-file) - (and (< (car (nth 5 (file-attributes custom-file))) - (car (nth 5 (file-attributes package-file)))) - (< (car (nth 5 (file-attributes custom-file))) - (car (nth 5 (file-attributes package-file)))))) - (save-excursion - (message "generating package customizations...") - (set-buffer (package-get-create-custom)) - (save-buffer) - (message "generating package customizations...done"))) - (load "package-get-custom.el")) - ;;; package-get.el ends here diff -r 73c75c43c1f2 -r 19dcec799385 lisp/package-ui.el --- a/lisp/package-ui.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/package-ui.el Mon Aug 13 10:46:44 2007 +0200 @@ -30,23 +30,52 @@ ;; User-changeable variables: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -(defvar pui-up-to-date-package-face nil - "The face to use for packages that are up-to-date.") +(defgroup pui nil + "Conventient interface to the package system." + :group 'package-tools + :tag "Package User interface" + :prefix "pui-") -(defvar pui-selected-package-face (get-face 'bold) - "The face to use for selected packages. -Set this to `nil' to use the `default' face.") +(defcustom pui-package-install-dest-dir nil + "*If non-nil (Automatic) path to package tree to install packages in. +Otherwise, use old path for installed packages and make a guess for +new ones." + :group 'pui + :tag "Install Location" + :type '(choice (const :tag "Automatic" nil) + (directory))) + +(defcustom pui-list-verbose t + "*If non-nil, display verbose info in the package list buffer." + :group 'pui + :tag "Verbose Listing" + :type 'boolean) -(defvar pui-outdated-package-face (get-face 'red) - "The face to use for outdated packages. -Set this to `nil' to use the `default' face.") +(defcustom pui-up-to-date-package-face nil + "*The face to use for packages that are up-to-date." + :group 'pui + :type 'face) + +(defcustom pui-selected-package-face 'bold + "*The face to use for selected packages. +Set this to `nil' to use the `default' face." + :group 'pui + :type 'face) -(defvar pui-uninstalled-package-face (get-face 'italic) - "The face to use for uninstalled packages. -Set this to `nil' to use the `default' face.") +(defcustom pui-outdated-package-face 'red + "*The face to use for outdated packages. +Set this to `nil' to use the `default' face." + :group 'pui + :type 'face) -(defvar pui-list-verbose t - "If non-nil, display verbose info in the package list buffer.") +(defcustom pui-uninstalled-package-face 'italic + "*The face to use for uninstalled packages. +Set this to `nil' to use the `default' face." + :group 'pui + :type 'face) + + + (defvar pui-info-buffer "*Packages*" "Buffer to use for displaying package information.") @@ -71,6 +100,7 @@ (define-key m [return] 'pui-toggle-package-key) (define-key m "x" 'pui-install-selected-packages) (define-key m "I" 'pui-install-selected-packages) + (define-key m "r" 'pui-add-required-packages) (define-key m "n" 'next-line) (define-key m "+" 'next-line) (define-key m "p" 'previous-line) @@ -82,7 +112,8 @@ (let ((m (make-sparse-keymap))) (set-keymap-name m 'pui-package-keymap) (define-key m 'button2 'pui-toggle-package-event) - (define-key m 'button3 'pui-toggle-package-event) +;; We use a popup menu +;; (define-key m 'button3 'pui-toggle-package-event) m) "Keymap to use over package names/descriptions.") @@ -182,9 +213,15 @@ (defun pui-package-symbol-char (pkg-sym version) (progn (if (package-get-info-find-package packages-package-list pkg-sym) - (if (package-get-installedp pkg-sym version) - (list " " pui-up-to-date-package-face) - (list "*" pui-outdated-package-face)) + (let ((installed (package-get-key pkg-sym :version))) + (if (>= (if (stringp installed) + (string-to-number installed) + installed) + (if (stringp version) + (string-to-number version) + version)) + (list " " pui-up-to-date-package-face) + (list "*" pui-outdated-package-face))) (list "-" pui-uninstalled-package-face)) )) @@ -209,8 +246,8 @@ (progn (setq disp (pui-package-symbol-char pkg-sym version)) (setq sym-char (car disp)) - (if (cdr disp) - (set-extent-face extent (car (cdr disp))) + (if (car (cdr disp)) + (set-extent-face extent (get-face (car (cdr disp)))) (set-extent-face extent (get-face 'default))) )) (save-excursion @@ -301,7 +338,8 @@ (message "Installing selected packages ...") (sit-for 0) (if (catch 'done (mapcar (lambda (pkg) - (if (not (package-get-all pkg nil)) + (if (not (package-get pkg nil nil + pui-package-install-dest-dir)) (throw 'done nil))) pui-selected-packages) t) @@ -316,6 +354,61 @@ (error "No packages have been selected!")) )) +(defun pui-add-required-packages () + "Select packages required by those already selected for installation." + (interactive) + (let ((tmpbuf "*Required-Packages*") do-select) + (if pui-selected-packages + (let ((dependencies + (delq nil (mapcar + (lambda (pkg) + (let ((installed + (package-get-key pkg :version)) + (current + (package-get-info-prop + (package-get-info-version + (package-get-info-find-package + package-get-base pkg) nil) + 'version))) + (if (< (if (stringp installed) + (string-to-number installed) + installed) + (if (stringp current) + (string-to-number current) + current)) + pkg + nil))) + (package-get-dependencies pui-selected-packages))))) + ;; Don't change window config when asking the user if he really + ;; wants to add the packages. We do this to avoid messing up + ;; the window configuration if errors occur (we don't want to + ;; display random buffers in addition to the error buffer, if + ;; errors occur, which would normally be caused by display-buffer). + (save-window-excursion + (with-output-to-temp-buffer tmpbuf + (display-completion-list (sort + (mapcar #'(lambda (pkg) + (symbol-name pkg)) + dependencies) + 'string<) + :activate-callback nil + :help-string "Required packages:\n" + :completion-string t)) + (setq tmpbuf (get-buffer-create tmpbuf)) + (display-buffer tmpbuf) + (setq do-select (y-or-n-p "Select these packages? ")) + (kill-buffer tmpbuf)) + (if do-select + (progn + (setq pui-selected-packages + (union pui-selected-packages dependencies)) + (map-extents #'(lambda (extent maparg) + (pui-update-package-display extent)) + nil nil nil nil nil 'pui) + (message "added dependencies")) + (clear-message))) + (error "No packages have been selected!")))) + (defun pui-help-echo (extent &optional force-update) "Display additional package info in the modeline. EXTENT determines the package to display (the package information is @@ -371,6 +464,7 @@ Useful keys: `\\[pui-toggle-package-key]' to select/unselect the current package for installation. + `\\[pui-add-required-packages]' to add any packages required by those selected. `\\[pui-install-selected-packages]' to install selected packages. `\\[pui-display-info]' to display additional information about the package in the modeline. `\\[pui-list-packages]' to refresh the package list. @@ -379,6 +473,21 @@ ") )) +(defvar pui-menu + '("Packages" + ["Select" pui-toggle-package-key t] + ["Info" pui-display-info t] + "---" + ["Add Required" pui-add-required-packages t] + ["Install Selected" pui-install-selected-packages t] + "---" + ["Verbose" pui-toggle-verbosity-redisplay + :active t :style toggle :selected pui-list-verbose] + ["Refresh" pui-list-packages t] + ["Help" pui-help t] + ["Quit" pui-quit t])) + + ;;;###autoload (defun pui-list-packages () "List all packages and package information. @@ -387,6 +496,7 @@ which are out-of-date (a newer version is available). The user can then select packages for installation via the keyboard or mouse." (interactive) + (package-get-require-base t) (let ( (outbuf (get-buffer-create pui-info-buffer)) (sep-string "===============================================================================\n") start ) @@ -452,8 +562,8 @@ (point))) ) (setq extent (make-extent b e)) - (if (cdr disp) - (set-extent-face extent (car (cdr disp))) + (if (car (cdr disp)) + (set-extent-face extent (get-face (car (cdr disp)))) (set-extent-face extent (get-face 'default))) (set-extent-property extent 'highlight t) (set-extent-property extent 'pui t) @@ -474,10 +584,15 @@ (delete-other-windows) (goto-char start) (setq pui-selected-packages nil) ; Reset list + (when (featurep 'menubar) + (set-buffer-menubar current-menubar) + (add-submenu '() pui-menu) + (setq mode-popup-menu pui-menu)) (clear-message) ; (message (substitute-command-keys "Press `\\[pui-help]' for help.")) )) + (provide 'package-ui) ;;; package-ui.el ends here diff -r 73c75c43c1f2 -r 19dcec799385 lisp/process.el --- a/lisp/process.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/process.el Mon Aug 13 10:46:44 2007 +0200 @@ -245,6 +245,7 @@ (let ((buffer (get-buffer-create (or output-buffer "*Shell Command Output*"))) (success nil) + (exit-status nil) (directory default-directory)) (unwind-protect (if (eq buffer (current-buffer)) @@ -254,9 +255,10 @@ (progn (setq buffer-read-only nil) (delete-region (max start end) (point-max)) (delete-region (point-min) (max start end)) - (call-process-region (point-min) (point-max) - shell-file-name t t nil - shell-command-switch command) + (setq exit-status + (call-process-region (point-min) (point-max) + shell-file-name t t nil + shell-command-switch command)) (setq success t)) ;; Clear the output buffer, ;; then run the command with output there. @@ -266,9 +268,10 @@ ;; XEmacs change (setq default-directory directory) (erase-buffer)) - (call-process-region start end shell-file-name - nil buffer nil - shell-command-switch command) + (setq exit-status + (call-process-region start end shell-file-name + nil buffer nil + shell-command-switch command)) (setq success t)) ;; Report the amount of output. (let ((lines (save-excursion @@ -280,7 +283,9 @@ (if success (display-message 'command - "(Shell command completed with no output)")) + (if (eql exit-status 0) + "(Shell command succeeded with no output)" + "(Shell command failed with no output)"))) (kill-buffer buffer)) ((and success (= lines 1)) (message "%s" diff -r 73c75c43c1f2 -r 19dcec799385 lisp/wid-edit.el --- a/lisp/wid-edit.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/wid-edit.el Mon Aug 13 10:46:44 2007 +0200 @@ -1063,48 +1063,49 @@ (defun widget-button-click (event) "Invoke button below mouse pointer." - (interactive "@e") - (cond ((event-glyph event) - (widget-glyph-click event)) - ((widget-event-point event) - (let* ((pos (widget-event-point event)) - (button (get-char-property pos 'button))) - (if button - (let* ((extent (widget-get button :button-extent)) - (face (extent-property extent 'face)) - (mouse-face (extent-property extent 'mouse-face)) - (help-echo (extent-property extent 'help-echo))) - (unwind-protect - (progn - ;; Merge relevant faces, and make the result mouse-face. - (let ((merge `(widget-button-pressed-face ,mouse-face))) - (nconc merge (if (listp face) - face (list face))) - (setq merge (delete-if-not 'find-face merge)) - (set-extent-property extent 'mouse-face merge)) - (unless (widget-apply button :mouse-down-action event) - ;; Wait for button release. - (while (not (button-release-event-p - (setq event (next-event)))) - (dispatch-event event))) - ;; Disallow mouse-face and help-echo. - (set-extent-property extent 'mouse-face nil) - (set-extent-property extent 'help-echo nil) - (setq pos (widget-event-point event)) - (unless (eq (current-buffer) (extent-object extent)) - ;; Barf if dispatch-event tripped us by - ;; changing buffer. - (error "Buffer changed during mouse motion")) - ;; Do the associated action. - (when (and pos (extent-in-region-p extent pos pos)) - (widget-apply-action button event))) - ;; Unwinding: fully release the button. - (set-extent-property extent 'mouse-face mouse-face) - (set-extent-property extent 'help-echo help-echo))) - ;; This should not happen! - (error "`widget-button-click' called outside button")))) - (t - (message "You clicked somewhere weird")))) + (interactive "e") + (with-current-buffer (event-buffer event) + (cond ((event-glyph event) + (widget-glyph-click event)) + ((widget-event-point event) + (let* ((pos (widget-event-point event)) + (button (get-char-property pos 'button))) + (if button + (let* ((extent (widget-get button :button-extent)) + (face (extent-property extent 'face)) + (mouse-face (extent-property extent 'mouse-face)) + (help-echo (extent-property extent 'help-echo))) + (unwind-protect + (progn + ;; Merge relevant faces, and make the result mouse-face. + (let ((merge `(widget-button-pressed-face ,mouse-face))) + (nconc merge (if (listp face) + face (list face))) + (setq merge (delete-if-not 'find-face merge)) + (set-extent-property extent 'mouse-face merge)) + (unless (widget-apply button :mouse-down-action event) + ;; Wait for button release. + (while (not (button-release-event-p + (setq event (next-event)))) + (dispatch-event event))) + ;; Disallow mouse-face and help-echo. + (set-extent-property extent 'mouse-face nil) + (set-extent-property extent 'help-echo nil) + (setq pos (widget-event-point event)) + (unless (eq (current-buffer) (extent-object extent)) + ;; Barf if dispatch-event tripped us by + ;; changing buffer. + (error "Buffer changed during mouse motion")) + ;; Do the associated action. + (when (and pos (extent-in-region-p extent pos pos)) + (widget-apply-action button event))) + ;; Unwinding: fully release the button. + (set-extent-property extent 'mouse-face mouse-face) + (set-extent-property extent 'help-echo help-echo))) + ;; This should not happen! + (error "`widget-button-click' called outside button")))) + (t + (message "You clicked somewhere weird"))))) (defun widget-button1-click (event) "Invoke glyph below mouse pointer." diff -r 73c75c43c1f2 -r 19dcec799385 lisp/x-font-menu.el --- a/lisp/x-font-menu.el Mon Aug 13 10:46:01 2007 +0200 +++ b/lisp/x-font-menu.el Mon Aug 13 10:46:44 2007 +0200 @@ -472,12 +472,12 @@ (signal 'error '("couldn't parse font name for default face"))) (when weight (signal 'error '("Setting weight currently not supported"))) -; (setq new-default-face-font -; (font-menu-load-font (or family from-family) -; (or weight from-weight) -; (or size from-size) -; from-slant -; font-menu-preferred-resolution)) + (setq new-default-face-font + (font-menu-load-font (or family from-family) + (or weight from-weight) + (or size from-size) + from-slant + font-menu-preferred-resolution)) (dolist (face (delq 'default (face-list))) (when (face-font-instance face) (message "Changing font of `%s'..." face) @@ -490,17 +490,20 @@ (sit-for 1))))) ;; Set the default face's font after hacking the other faces, so that ;; the frame size doesn't change until we are all done. - - (when (and family (not (equal family from-family))) - (setq new-props (append (list :family family) new-props))) - (when (and size (not (equal size from-size))) - (setq new-props (append (list :size (concat (int-to-string - (/ size 10)) "pt")) new-props))) - (custom-set-face-update-spec 'default '((type x)) new-props) - ;;; WMP - we need to honor font-menu-this-frame-only-p here! -; (set-face-font 'default new-default-face-font -; (and font-menu-this-frame-only-p (selected-frame))) - (message "Font %s" (face-font-name 'default)))) + + ;; If we need to be frame local we do the changes ourselves. + (if font-menu-this-frame-only-p + ;;; WMP - we need to honor font-menu-this-frame-only-p here! + (set-face-font 'default new-default-face-font + (and font-menu-this-frame-only-p (selected-frame))) + ;; OK Let Customize do it. + (when (and family (not (equal family from-family))) + (setq new-props (append (list :family family) new-props))) + (when (and size (not (equal size from-size))) + (setq new-props (append + (list :size (concat (int-to-string (/ size 10)) "pt")) new-props))) + (custom-set-face-update-spec 'default '((type x)) new-props) + (message "Font %s" (face-font-name 'default))))) (defun font-menu-change-face (face diff -r 73c75c43c1f2 -r 19dcec799385 man/ChangeLog --- a/man/ChangeLog Mon Aug 13 10:46:01 2007 +0200 +++ b/man/ChangeLog Mon Aug 13 10:46:44 2007 +0200 @@ -1,3 +1,15 @@ +1998-12-08 XEmacs Build Bot + + * XEmacs 21.0.58 is released + +1998-10-09 SL Baur + + * Makefile (MAKEINFO): Undo no-split change. + +1998-09-30 SL Baur + + * Makefile (MAKEINFO): Specify no-split. + 1998-09-29 SL Baur * XEmacs 21.0-pre14 is released. diff -r 73c75c43c1f2 -r 19dcec799385 man/xemacs/packages.texi --- a/man/xemacs/packages.texi Mon Aug 13 10:46:01 2007 +0200 +++ b/man/xemacs/packages.texi Mon Aug 13 10:46:44 2007 +0200 @@ -103,7 +103,7 @@ access it via the menus: @example - Options->Customize->List Packages + Options->Manage Packages->List & Install @end example Or, you can get to it via the keyboard: @@ -147,13 +147,18 @@ If you're going to install over the network, you only have to insure that EFS @ref{(EFS)} works, and that it can get outside a firewall, if you happen to be behind one. You shouldn't have to do anything else; -XEmacs already knows where to go. +XEmacs already knows where to go. However you can add your own mirrors +to this list. See @code{package-get-remote}. The easiest way to install a package is to use the visual package browser and installer, using the menu pick: @example - Options->Customize->List Packages + Options->Manage Packages->List & Install +@end example +or +@example + Options->Manage Packages->Using Custom->Select-> ... @end example You can also access it using the keyboard: @@ -182,10 +187,12 @@ installed and is up-to-date. From here, you can select or unselect packages for installation using -the @key{RET} key, or using the @kbd{Mouse-2} or @kbd{Mouse-3} buttons. -Once you've finished selecting the packages, you can press the @kbd{x} -key to actually install the packages. Note that you will have to -restart XEmacs for XEmacs to recognize any new packages. +the @key{RET} key, the @kbd{Mouse-2} button or selecting "Select" from +the (Popup) Menu. +Once you've finished selecting the packages, you can +press the @kbd{x} key (or use the menu) to actually install the +packages. Note that you will have to restart XEmacs for XEmacs to +recognize any new packages. Key summary: @@ -194,7 +201,6 @@ Display simple help. @item @key{RET} @itemx @key{Mouse-2} -@itemx @key{Mouse-3} Toggle between selecting and unselecting a package for installation. @item x Install selected packages. @@ -221,11 +227,15 @@ @example Options->Customize->Emacs->Packages-> ... @end example +or +@example + Options->Manage Packages->Using Custom->Select-> ... +@end example Set their state to on, and then do: @example - Options->Customize->Update Packages + Options->Manage Packages->Using Custom->Update Packages @end example This will automatically retrieve the packages you have selected from the diff -r 73c75c43c1f2 -r 19dcec799385 nt/ChangeLog --- a/nt/ChangeLog Mon Aug 13 10:46:01 2007 +0200 +++ b/nt/ChangeLog Mon Aug 13 10:46:44 2007 +0200 @@ -1,3 +1,12 @@ +1998-12-08 XEmacs Build Bot + + * XEmacs 21.0.58 is released + +1998-10-29 Andy Piper + + * xemacs.mak ($(LIB_SRC)/movemail.exe): add etags dependencies to + pull in getopt and friends. + 1998-09-29 SL Baur * XEmacs 21.0-pre14 is released. diff -r 73c75c43c1f2 -r 19dcec799385 nt/runemacs.c --- a/nt/runemacs.c Mon Aug 13 10:46:01 2007 +0200 +++ b/nt/runemacs.c Mon Aug 13 10:46:44 2007 +0200 @@ -41,6 +41,7 @@ int wait_for_child = FALSE; DWORD ret_code = 0; char *new_cmdline; + char *basename; char *p; char modname[MAX_PATH]; @@ -48,6 +49,10 @@ goto error; if ((p = strrchr (modname, '\\')) == NULL) goto error; + + basename = alloca(strlen(p) + 1); + strcpy (basename, p + 1); + *p = 0; new_cmdline = alloca (MAX_PATH + strlen (cmdline) + 1); @@ -90,36 +95,45 @@ char sym_link_name[MAX_PATH+1], real_name[MAX_PATH+1]; strcpy(sym_link_name, new_cmdline); - strcat(sym_link_name, "\\xemacs"); - if (lstat(sym_link_name, &stbuf) == 0) + if (strcmp(basename, "rungnuclient.exe") == 0) + strcat(new_cmdline, "\\gnuclient.exe "); + else if (strcmp(basename, "runemacs.exe") == 0) { - if ((stbuf.st_mode & S_IFLNK) == S_IFLNK) + strcat(sym_link_name, "\\xemacs"); + + if (lstat(sym_link_name, &stbuf) == 0) { - if (readlink(sym_link_name, real_name, sizeof(real_name)) == -1) + if ((stbuf.st_mode & S_IFLNK) == S_IFLNK) { - MessageBox (NULL, "Error reading symbolic link for xemacs", - "Error", MB_ICONSTOP); - return 1; + if (readlink(sym_link_name, real_name, sizeof(real_name)) == -1) + { + MessageBox (NULL, "Error reading symbolic link for xemacs", + "Error", MB_ICONSTOP); + return 1; + } + else + { + strcat(new_cmdline, "\\"); + strcat(new_cmdline, real_name); + strcat(new_cmdline, " "); + } } else - { - strcat(new_cmdline, "\\"); - strcat(new_cmdline, real_name); - strcat(new_cmdline, " "); - } + strcat(new_cmdline, "\\xemacs "); } else - strcat(new_cmdline, "\\xemacs "); - } - else - { - MessageBox (NULL, "can't locate XEmacs executable", - "Error", MB_ICONSTOP); - return 1; + { + MessageBox (NULL, "can't locate XEmacs executable", + "Error", MB_ICONSTOP); + return 1; + } } } #else - strcat (new_cmdline, "\\xemacs.exe "); + if (strcmp(basename, "rungnuclient.exe") == 0) + strcat (new_cmdline, "\\gnuclient.exe "); + else + strcat (new_cmdline, "\\xemacs.exe "); #endif #endif @@ -166,6 +180,6 @@ return (int) ret_code; error: - MessageBox (NULL, "Could not start XEmacs.", "Error", MB_ICONSTOP); + MessageBox (NULL, "Could not start XEmacs or gnuclient.", "Error", MB_ICONSTOP); return 1; } diff -r 73c75c43c1f2 -r 19dcec799385 nt/xemacs.mak --- a/nt/xemacs.mak Mon Aug 13 10:46:01 2007 +0200 +++ b/nt/xemacs.mak Mon Aug 13 10:46:44 2007 +0200 @@ -439,7 +439,7 @@ # Individual dependencies ETAGS_DEPS = $(LIB_SRC)/getopt.c $(LIB_SRC)/getopt1.c $(LIB_SRC)/../src/regex.c $(LIB_SRC)/etags.exe : $(LIB_SRC)/etags.c $(ETAGS_DEPS) -#### ootags??? +$(LIB_SRC)/movemail.exe: $(LIB_SRC)/movemail.c $(ETAGS_DEPS) LIB_SRC_TOOLS = \ $(LIB_SRC)/make-docfile.exe \ diff -r 73c75c43c1f2 -r 19dcec799385 src/ChangeLog --- a/src/ChangeLog Mon Aug 13 10:46:01 2007 +0200 +++ b/src/ChangeLog Mon Aug 13 10:46:44 2007 +0200 @@ -1,3 +1,175 @@ +1998-12-08 XEmacs Build Bot + + * XEmacs 21.0.58 is released + +1998-12-02 Didier Verna + + * menubar-x.c (menu_item_descriptor_to_widget_value_1): set the + accelerator field to nil for labels. + set the dummy accelerator field to nil also (from Martin). + +1998-12-02 P. E. Jareth Hein + + * unexec.c: Changed a #ifndef statement to fix XEmacs on BSDI 3.0 + +1998-11-27 SL Baur + + * mule-charset.c (complex_vars_of_mule_charset): Fix graphic + property in control-1 charset. + From Julian Bradfield + +1998-11-26 Jan Vroonhof + + * gui-x.c (button_item_to_widget_value): Ignore :key-sequence + keyword. + Add stub for :label. + + * gui.c (gui_item_add_keyval_pair): ditto. + + * menubar-x.c (menu_item_descriptor_to_widget_value_1): Ignore + :key-sequence keyword. + Add stub for:label. + Support :active for submenus like the Windows code and FSF Emacs. + +1998-11-25 Hrvoje Niksic + + * chartab.c (Freset_char_table): Fix wrong placement of #endif. + +1998-11-24 Hrvoje Niksic + + * chartab.c (Freset_char_table): Don't blindly fill chartables of + type `char' with nils. + + * chartab.c (canonicalize_char_table_value): Coerce ints to chars + for tables of type `char'. + +1998-11-26 Didier Verna + + * input-method-xlib.c (Initialize_Locale): don't call + XtSetLanguageProc. We've done the whole work here. + * input-method-xfs.c (Initialize_Locale): ditto. + * input-method-motif.c (Initialize_Locale): ditto. + +1998-11-26 Didier Verna + + * process-unix.c (unix_create_process): handle properly + Vfile_name_coding_system for converting the program and directory + names. + +1998-11-27 SL Baur + + * m/arm.h: New file. + From James LewisMoss + +1998-11-27 Takeshi Hagiwara + + * m/mips-nec.h: + Fix the realpath() problem of UnixWare2.1.3. + Patches for NEC's sysv4.2 machine. + +1998-11-15 Michael Sperber [Mr. Preprocessor] + + * linuxplay.c: Including instead of makes + sound work on AIX with OSS installed. Linux should still work. + +1998-11-03 Andy Piper + + * config.h.in: name change for cygwin/version.h + + * configure.in: check for cygwin/version.h now. + + * cygwin32.h: track CYGWIN_DLL_VERSION_MAJOR -> + CYGWIN_VERSION_DLL_MAJOR name change in cygwin b20. + move cygwin32/version.h to cygwin/version.h + +1998-11-03 Olivier Galibert + + * lisp.h (struct Lisp_Bit_Vector): Fix declaration of bits from + int to long. + +1998-10-22 Andy Piper + + * cygwin32.h: track CYGWIN_DLL_VERSION_MAJOR -> + CYGWIN_VERSION_DLL_MAJOR name change in cygwin b20. + enable BROKEN_SIGIO under b20 to make QUIT work. + +1998-10-22 Andy Piper + + * frame-msw.c (mswindows_size_frame_internal): force frame sizing + to fit within the constraints of the screen size. I.e. make the + frame small enough to fit and move it if some of it will be + off-screen. + +1998-11-24 SL Baur + + * gifrlib.h: Clean up types for 64 bit compile. + * dgif_lib.c (DGifInitRead): Ditto. + (MakeSavedImage): Ditto. + * emacs.c (decode_path): Ditto. + From Steve Carney + +1998-10-16 William M. Perry + + * glyphs-msw.c (bitmap_table): Fixed typo in builtin bitmaps + (cehckboxes instead of checkboxes). + +1998-10-13 Raymond Toy + + * runemacs.c (WinMain): If the basename is "rungnuclient.exe", run + gnuclient. Otherwise, we run xemacs as we always did. This gets + rid of the annoying DOS window when running gnuclient. + +1998-10-13 Andy Piper + + * dragdrop.c (vars_of_dragdrop): rename HAVE_MSWINDOWS -> + HAVE_MS_WINDOWS typo. + +1998-10-13 SL Baur + + * process-unix.c (unix_send_process): Set closed flag on writable + pipe after SIGPIPE is received and before we call deactivate_process. + +1998-10-03 Gunnar Evermann + + * window.c (Fset_window_start): respect narrowing when + checking wheter start is at the beginning of a line. + (Fset_window_buffer): Ditto + Fixes repeatable crash in VM. + +1998-10-09 SL Baur + + * window.c (specifier_vars_of_window): Set default vertical + divider width to 1 on ttys. + +1998-10-08 Martin Buchholz + + * alloc.c: + * unexec.c: + * malloc.c: + Add to get ptrdiff_t declaration + +1998-10-07 Jonathan Harris + + * scrollbar-msw.c: Use the same vertical scrollbar drag hack as + is used for Motif or Lucid scrollbars under X. + +1998-10-08 Pierre Wendling + + * m/alpha.h (UNEXEC): quoted to avoid bad expansion when running + `configure' + +1998-10-06 Takeshi Hagiwara + + * frame-x.c (x_delete_frame): Fix an argument of XtDestroyWidget. + +1998-10-05 Andy Piper + + * s/cygwin32.h: more cygwin b20 reorganisation. + +1998-09-30 SL Baur + + * callproc.c (child_setup): Fix spelling typo. + 1998-09-29 SL Baur * XEmacs 21.0-pre14 is released. diff -r 73c75c43c1f2 -r 19dcec799385 src/alloc.c --- a/src/alloc.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/alloc.c Mon Aug 13 10:46:44 2007 +0200 @@ -56,6 +56,8 @@ #include "sysfile.h" #include "window.h" +#include + #ifdef DOUG_LEA_MALLOC #include #endif diff -r 73c75c43c1f2 -r 19dcec799385 src/callproc.c --- a/src/callproc.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/callproc.c Mon Aug 13 10:46:44 2007 +0200 @@ -744,7 +744,7 @@ environ = env; execvp (new_argv[0], new_argv); - stdout_out ("Cant't exec program %s\n", new_argv[0]); + stdout_out ("Can't exec program %s\n", new_argv[0]); _exit (1); #endif /* not WINDOWSNT */ } diff -r 73c75c43c1f2 -r 19dcec799385 src/chartab.c --- a/src/chartab.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/chartab.c Mon Aug 13 10:46:44 2007 +0200 @@ -552,13 +552,15 @@ switch (ct->type) { case CHAR_TABLE_TYPE_CHAR: + fill_char_table (ct, make_char (0)); + break; case CHAR_TABLE_TYPE_DISPLAY: case CHAR_TABLE_TYPE_GENERIC: #ifdef MULE case CHAR_TABLE_TYPE_CATEGORY: +#endif /* MULE */ fill_char_table (ct, Qnil); break; -#endif /* MULE */ case CHAR_TABLE_TYPE_SYNTAX: fill_char_table (ct, make_int (Sinherit)); @@ -775,7 +777,7 @@ #endif /* MULE */ -static Lisp_Object +Lisp_Object get_char_table (Emchar ch, struct Lisp_Char_Table *ct) { #ifdef MULE @@ -987,6 +989,10 @@ CHECK_CHAR_COERCE_INT (cdr); return Fcons (car, cdr); } + break; + case CHAR_TABLE_TYPE_CHAR: + CHECK_CHAR_COERCE_INT (value); + break; default: break; } diff -r 73c75c43c1f2 -r 19dcec799385 src/chartab.h --- a/src/chartab.h Mon Aug 13 10:46:01 2007 +0200 +++ b/src/chartab.h Mon Aug 13 10:46:44 2007 +0200 @@ -180,6 +180,7 @@ void fill_char_table (struct Lisp_Char_Table *ct, Lisp_Object value); void put_char_table (struct Lisp_Char_Table *ct, struct chartab_range *range, Lisp_Object val); +Lisp_Object get_char_table (Emchar, struct Lisp_Char_Table *); int map_char_table (struct Lisp_Char_Table *ct, struct chartab_range *range, int (*fn) (struct chartab_range *range, diff -r 73c75c43c1f2 -r 19dcec799385 src/config.h.in --- a/src/config.h.in Mon Aug 13 10:46:01 2007 +0200 +++ b/src/config.h.in Mon Aug 13 10:46:44 2007 +0200 @@ -194,7 +194,7 @@ #undef HAVE_ULIMIT_H #undef HAVE_X11_XLOCALE_H #undef HAVE_LINUX_VERSION_H -#undef HAVE_CYGWIN32_VERSION_H +#undef HAVE_CYGWIN_VERSION_H #undef HAVE_INTTYPES_H #undef HAVE_SYS_UN_H #undef HAVE_A_OUT_H diff -r 73c75c43c1f2 -r 19dcec799385 src/dgif_lib.c --- a/src/dgif_lib.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/dgif_lib.c Mon Aug 13 10:46:44 2007 +0200 @@ -110,7 +110,7 @@ /* The GIF Version number is ignored at this time. Maybe we should do */ /* something more useful with it. */ Buf[GIF_STAMP_LEN] = 0; - if (strncmp(GIF_STAMP, Buf, GIF_VERSION_POS) != 0) { + if (strncmp(GIF_STAMP, (const char *) Buf, GIF_VERSION_POS) != 0) { GifInternError(GifFile, D_GIF_ERR_NOT_GIF_FILE); } @@ -819,10 +819,11 @@ /****************************************************************************** * Image block allocation functions * ******************************************************************************/ -SavedImage *MakeSavedImage(GifFileType *GifFile, SavedImage *CopyFrom) /* * Append an image block to the SavedImages array */ +SavedImage * +MakeSavedImage(GifFileType *GifFile, SavedImage *CopyFrom) { SavedImage *sp; @@ -856,7 +857,7 @@ CopyFrom->ImageDesc.ColorMap->Colors); /* next, the raster */ - sp->RasterBits = (char *)malloc(sizeof(GifPixelType) + sp->RasterBits = (GifPixelType*)malloc(sizeof(GifPixelType) * CopyFrom->ImageDesc.Height * CopyFrom->ImageDesc.Width); memcpy(sp->RasterBits, diff -r 73c75c43c1f2 -r 19dcec799385 src/dragdrop.c --- a/src/dragdrop.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/dragdrop.c Mon Aug 13 10:46:44 2007 +0200 @@ -130,7 +130,7 @@ Vdragdrop_protocols = Qnil; -#ifdef HAVE_MSWINDOWS +#ifdef HAVE_MS_WINDOWS Vdragdrop_protocols = Fcons ( Qmswindows , Vdragdrop_protocols ); #endif #ifdef HAVE_CDE diff -r 73c75c43c1f2 -r 19dcec799385 src/emacs.c --- a/src/emacs.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/emacs.c Mon Aug 13 10:46:44 2007 +0200 @@ -2520,7 +2520,7 @@ GET_C_CHARPTR_INT_FILENAME_DATA_ALLOCA (path, newpath); - len = strlen (newpath); + len = strlen ((const char *) newpath); /* #### Does this make sense? It certainly does for decode_env_path(), but it looks dubious here. Does any code depend on decode_path("") returning nil instead of an empty diff -r 73c75c43c1f2 -r 19dcec799385 src/frame-msw.c --- a/src/frame-msw.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/frame-msw.c Mon Aug 13 10:46:44 2007 +0200 @@ -26,6 +26,7 @@ Ultimately based on FSF. Substantially rewritten for XEmacs by Ben Wing. Rewritten for mswindows by Jonathan Harris, November 1997 for 21.0. + Graphics features added and frame resizing fiddled with by Andy Piper. */ #include @@ -594,7 +595,7 @@ int pixel_width, pixel_height; int size_p = (dest->width >=0 || dest->height >=0); int move_p = (dest->top >=0 || dest->left >=0); - + struct device* d = XDEVICE (FRAME_DEVICE (f)); char_to_real_pixel_size (f, dest->width, dest->height, &pixel_width, &pixel_height); if (dest->width < 0) @@ -607,7 +608,7 @@ dest->left = rect.left; if (dest->top < 0) dest->top = rect.top; - + rect.left = rect.top = 0; rect.right = pixel_width; rect.bottom = pixel_height; @@ -617,12 +618,41 @@ GetMenu (FRAME_MSWINDOWS_HANDLE(f)) != NULL, GetWindowLong (FRAME_MSWINDOWS_HANDLE(f), GWL_EXSTYLE)); + /* resize and move the window so that it fits on the screen. This is + not restrictive since this will happen later anyway in WM_SIZE. We + have to do this after adjusting the rect to account for menubar + etc. */ + pixel_width = rect.right - rect.left; + pixel_height = rect.bottom - rect.top; + if (pixel_width > DEVICE_MSWINDOWS_HORZRES(d)) + { + pixel_width = DEVICE_MSWINDOWS_HORZRES(d); + size_p=1; + } + if (pixel_height > DEVICE_MSWINDOWS_VERTRES(d)) + { + pixel_height = DEVICE_MSWINDOWS_VERTRES(d); + size_p=1; + } + + /* adjust position so window is on screen */ + if (dest->left + pixel_width > DEVICE_MSWINDOWS_HORZRES(d)) + { + dest->left = DEVICE_MSWINDOWS_HORZRES(d) - pixel_width; + move_p=1; + } + if (dest->top + pixel_height > DEVICE_MSWINDOWS_VERTRES(d)) + { + dest->top = DEVICE_MSWINDOWS_VERTRES(d) - pixel_height; + move_p=1; + } + if (IsIconic (FRAME_MSWINDOWS_HANDLE(f)) || IsZoomed (FRAME_MSWINDOWS_HANDLE(f))) ShowWindow (FRAME_MSWINDOWS_HANDLE(f), SW_RESTORE); SetWindowPos (FRAME_MSWINDOWS_HANDLE(f), NULL, - dest->left, dest->top, rect.right - rect.left, rect.bottom - rect.top, + dest->left, dest->top, pixel_width, pixel_height, SWP_NOACTIVATE | SWP_NOZORDER | SWP_NOSENDCHANGING | (size_p ? 0 : SWP_NOSIZE) | (move_p ? 0 : SWP_NOMOVE)); diff -r 73c75c43c1f2 -r 19dcec799385 src/frame-x.c --- a/src/frame-x.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/frame-x.c Mon Aug 13 10:46:44 2007 +0200 @@ -2631,6 +2631,7 @@ x_delete_frame (struct frame *f) { Widget w = FRAME_X_SHELL_WIDGET (f); + Display *dpy = XtDisplay (w); #ifndef HAVE_SESSION if (FRAME_X_TOP_LEVEL_FRAME_P (f)) @@ -2638,20 +2639,17 @@ #endif /* HAVE_SESSION */ #ifdef EXTERNAL_WIDGET - { - Display *dpy = XtDisplay (w); - expect_x_error (dpy); - /* for obscure reasons having (I think) to do with the internal - window-to-widget hierarchy maintained by Xt, we have to call - XtUnrealizeWidget() here. Xt can really suck. */ - if (f->being_deleted) - XtUnrealizeWidget (w); - XtDestroyWidget (w); - x_error_occurred_p (dpy); - } + expect_x_error (dpy); + /* for obscure reasons having (I think) to do with the internal + window-to-widget hierarchy maintained by Xt, we have to call + XtUnrealizeWidget() here. Xt can really suck. */ + if (f->being_deleted) + XtUnrealizeWidget (w); + XtDestroyWidget (w); + x_error_occurred_p (dpy); #else XtDestroyWidget (w); - XFlush (XtDisplay(w)); /* make sure the windows are really gone! */ + XFlush (dpy); /* make sure the windows are really gone! */ #endif /* EXTERNAL_WIDGET */ if (FRAME_X_GEOM_FREE_ME_PLEASE (f)) diff -r 73c75c43c1f2 -r 19dcec799385 src/gifrlib.h --- a/src/gifrlib.h Mon Aug 13 10:46:01 2007 +0200 +++ b/src/gifrlib.h Mon Aug 13 10:46:44 2007 +0200 @@ -167,15 +167,15 @@ /* This is the in-core version of an extension record */ typedef struct { - int ByteCount; - char *Bytes; /* on malloc(3) heap */ + int ByteCount; + GifByteType *Bytes; /* on malloc(3) heap */ } ExtensionBlock; /* This holds an image header, its unpacked raster bits, and extensions */ typedef struct SavedImage { GifImageDesc ImageDesc; - char *RasterBits; /* on malloc(3) heap */ + GifPixelType *RasterBits; /* on malloc(3) heap */ int Function; int ExtensionBlockCount; diff -r 73c75c43c1f2 -r 19dcec799385 src/glyphs-msw.c --- a/src/glyphs-msw.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/glyphs-msw.c Mon Aug 13 10:46:44 2007 +0200 @@ -1041,7 +1041,7 @@ { "size", OBM_SIZE }, { "btsize", OBM_BTSIZE }, { "check", OBM_CHECK }, - { "cehckboxes", OBM_CHECKBOXES }, + { "checkboxes", OBM_CHECKBOXES }, { "btncorners" , OBM_BTNCORNERS }, {0} }; diff -r 73c75c43c1f2 -r 19dcec799385 src/gui.c --- a/src/gui.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/gui.c Mon Aug 13 10:46:44 2007 +0200 @@ -29,8 +29,8 @@ #include "bytecode.h" /* for struct Lisp_Compiled_Function */ Lisp_Object Q_active, Q_suffix, Q_keys, Q_style, Q_selected; -Lisp_Object Q_filter, Q_config, Q_included; -Lisp_Object Q_accelerator; +Lisp_Object Q_filter, Q_config, Q_included, Q_key_sequence; +Lisp_Object Q_accelerator, Q_label; Lisp_Object Qtoggle, Qradio; #ifdef HAVE_POPUPS @@ -134,6 +134,8 @@ else if (EQ (key, Q_style)) pgui_item->style = val; else if (EQ (key, Q_selected)) pgui_item->selected = val; else if (EQ (key, Q_keys)) pgui_item->keys = val; + else if (EQ (key, Q_key_sequence)) ; /* ignored for FSF compatability */ + else if (EQ (key, Q_label)) ; /* ignored for 21.0 implement in 21.2 */ else signal_simple_error_2 ("Unknown keyword in gui item", key, pgui_item->name); } @@ -337,12 +339,14 @@ defkeyword (&Q_active, ":active"); defkeyword (&Q_suffix, ":suffix"); defkeyword (&Q_keys, ":keys"); + defkeyword (&Q_key_sequence,":key-sequence"); defkeyword (&Q_style, ":style"); defkeyword (&Q_selected, ":selected"); defkeyword (&Q_filter, ":filter"); defkeyword (&Q_config, ":config"); defkeyword (&Q_included, ":included"); defkeyword (&Q_accelerator, ":accelerator"); + defkeyword (&Q_label, ":label"); defsymbol (&Qtoggle, "toggle"); defsymbol (&Qradio, "radio"); diff -r 73c75c43c1f2 -r 19dcec799385 src/gui.h --- a/src/gui.h Mon Aug 13 10:46:01 2007 +0200 +++ b/src/gui.h Mon Aug 13 10:46:44 2007 +0200 @@ -69,6 +69,7 @@ extern Lisp_Object Q_accelerator, Q_active, Q_config, Q_filter, Q_included; extern Lisp_Object Q_keys, Q_selected, Q_suffix, Qradio, Qtoggle; +extern Lisp_Object Q_key_sequence, Q_label; void gui_item_init (struct gui_item *pgui_item); void gui_item_add_keyval_pair (struct gui_item *pgui_item, diff -r 73c75c43c1f2 -r 19dcec799385 src/input-method-motif.c --- a/src/input-method-motif.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/input-method-motif.c Mon Aug 13 10:46:44 2007 +0200 @@ -41,7 +41,12 @@ { char *locale; - XtSetLanguageProc (NULL, (XtLanguageProc) NULL, NULL); + /* dverna - Nov. 98: ### DON'T DO THIS !!! The default XtLanguageProc + routine calls setlocale(LC_ALL, lang) which fucks up our lower-level + locale management, and especially the value of LC_NUMERIC. Anyway, since + at this point, we don't know yet whether we're gonna need an X11 frame, + we should really do it manually and not use Xlib's dumb default routine */ + /*XtSetLanguageProc (NULL, (XtLanguageProc) NULL, NULL);*/ if ((locale = setlocale (LC_ALL, "")) == NULL) { stderr_out ("Can't set locale.\n"); diff -r 73c75c43c1f2 -r 19dcec799385 src/input-method-xfs.c --- a/src/input-method-xfs.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/input-method-xfs.c Mon Aug 13 10:46:44 2007 +0200 @@ -42,7 +42,12 @@ { char *locale; - XtSetLanguageProc (NULL, (XtLanguageProc) NULL, NULL); + /* dverna - Nov. 98: ### DON'T DO THIS !!! The default XtLanguageProc + routine calls setlocale(LC_ALL, lang) which fucks up our lower-level + locale management, and especially the value of LC_NUMERIC. Anyway, since + at this point, we don't know yet whether we're gonna need an X11 frame, + we should really do it manually and not use Xlib's dumb default routine */ + /*XtSetLanguageProc (NULL, (XtLanguageProc) NULL, NULL);*/ if ((locale = setlocale (LC_ALL, "")) == NULL) { stderr_out ("Can't set locale.\n"); diff -r 73c75c43c1f2 -r 19dcec799385 src/input-method-xlib.c --- a/src/input-method-xlib.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/input-method-xlib.c Mon Aug 13 10:46:44 2007 +0200 @@ -79,7 +79,12 @@ { char *locale; - XtSetLanguageProc (NULL, (XtLanguageProc) NULL, NULL); + /* dverna - Nov. 98: ### DON'T DO THIS !!! The default XtLanguageProc + routine calls setlocale(LC_ALL, lang) which fucks up our lower-level + locale management, and especially the value of LC_NUMERIC. Anyway, since + at this point, we don't know yet whether we're gonna need an X11 frame, + we should really do it manually and not use Xlib's dumb default routine */ + /*XtSetLanguageProc (NULL, (XtLanguageProc) NULL, NULL);*/ if ((locale = setlocale (LC_ALL, "")) == NULL) { stderr_out ("Can't set locale.\n"); diff -r 73c75c43c1f2 -r 19dcec799385 src/linuxplay.c --- a/src/linuxplay.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/linuxplay.c Mon Aug 13 10:46:44 2007 +0200 @@ -65,7 +65,7 @@ #include #include #include -#include +#include #include #include #include diff -r 73c75c43c1f2 -r 19dcec799385 src/lisp.h --- a/src/lisp.h Mon Aug 13 10:46:01 2007 +0200 +++ b/src/lisp.h Mon Aug 13 10:46:44 2007 +0200 @@ -960,7 +960,7 @@ struct lrecord_header lheader; Lisp_Object next; long size; - unsigned int bits[1]; + unsigned long bits[1]; }; DECLARE_LRECORD (bit_vector, struct Lisp_Bit_Vector); diff -r 73c75c43c1f2 -r 19dcec799385 src/m/alpha.h --- a/src/m/alpha.h Mon Aug 13 10:46:01 2007 +0200 +++ b/src/m/alpha.h Mon Aug 13 10:46:44 2007 +0200 @@ -32,5 +32,5 @@ # define TEXT_START 0x120000000 # define DATA_START 0x140000000 /* The program to be used for unexec. */ -# define UNEXEC unexalpha.o +# define UNEXEC "unexalpha.o" #endif diff -r 73c75c43c1f2 -r 19dcec799385 src/m/arm.h --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/m/arm.h Mon Aug 13 10:46:44 2007 +0200 @@ -0,0 +1,135 @@ +/* Machine description file for digital/intel arm/strongarm + Copyright (C) 1987 Free Software Foundation, Inc. + +This file is part of GNU Emacs. + +GNU Emacs is free software; you can redistribute it and/or modify +it under the terms of the GNU General Public License as published by +the Free Software Foundation; either version 2, or (at your option) +any later version. + +GNU Emacs is distributed in the hope that it will be useful, +but WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +GNU General Public License for more details. + +You should have received a copy of the GNU General Public License +along with XEmacs; see the file COPYING. If not, write to +the Free Software Foundation, Inc., 59 Temple Place - Suite 330, +Boston, MA 02111-1307, USA. */ + +/* Synched up with: FSF 19.31. */ + +/* Define WORD_MACHINE if addresses and such have + * to be corrected before they can be used as byte counts. */ + +#undef WORD_MACHINE + +/* Now define a symbol for the cpu type, if your compiler + does not define it automatically: + Ones defined so far include vax, m68000, ns16000, pyramid, + orion, tahoe, APOLLO and many others */ + +#ifndef arm +#define arm +#endif + +/* crt0.c, if it is used, should use the i386-bsd style of entry. + with no extra dummy args. On USG and XENIX, + NO_REMAP says this isn't used. */ + +/* Mly 16-Jan-96 16:38:32: this is part of a prototype -- same bug present in + other m*.h files */ +#define CRT0_DUMMIES int bogus_fp, + +/* crt0.c should define a symbol `start' and do .globl with a dot. */ + +#define DOT_GLOBAL_START + +#ifdef USG5_4 /* Older USG systems do not support the load average. */ +/* Data type of load average, as read out of kmem. */ + +#define LOAD_AVE_TYPE long + +/* Convert that into an integer that is 100 for a load average of 1.0 */ +/* This is totally uncalibrated. */ + + +/* FSHIFT and FSCALE are defined in param.h, but are required by + LOAD_AVE_CVT, so they need to be defined here. */ + +#ifndef FSHIFT +#define FSHIFT 8 /* bits to right of fixed binary point */ +#endif + +#ifndef FSCALE +#define FSCALE (1< says using vfork + under i386-unknown-sysv4.2 makes C-g sometimes cause a SIGSEGV + in TTY mode; the problem goes away if you use fork */ +#ifdef USG5_4_2 +#define vfork fork +#endif diff -r 73c75c43c1f2 -r 19dcec799385 src/m/mips-nec.h --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/m/mips-nec.h Mon Aug 13 10:46:44 2007 +0200 @@ -0,0 +1,145 @@ +/* m- file for Mips machines. + Copyright (C) 1987, 1992, 1993, 1995 Free Software Foundation, Inc. + + This file contains some changes for our SVR4 based SINIX-Mips 5.4. + I hope this is helpful to port the emacs to our RM?00 series and + maybe to the DC/OSx (Mips-based) machines of Pyramid Inc. + (Marco.Walther@mch.sni.de) + +This file is part of GNU Emacs. + +GNU Emacs is free software; you can redistribute it and/or modify +it under the terms of the GNU General Public License as published by +the Free Software Foundation; either version 2, or (at your option) +any later version. + +GNU Emacs is distributed in the hope that it will be useful, +but WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +GNU General Public License for more details. + +You should have received a copy of the GNU General Public License +along with XEmacs; see the file COPYING. If not, write to +the Free Software Foundation, Inc., 59 Temple Place - Suite 330, +Boston, MA 02111-1307, USA. */ + +/* Synched up with: FSF 19.31. */ + +/* The following line tells the configuration script what sort of + operating system this machine is likely to run. + USUAL-OPSYS="note" + +NOTE-START +Use m-mips4.h for RISCOS version 4; use s-bsd4-3.h with the BSD world. +Note that the proper m- file for the Decstation is m-pmax.h. +This is the m- file for SNI RM*00 machines. Use s- sinix5-4.h file! +With this the file mips-siemens.h is obsolete. +NOTE-END */ + +/* Define WORD_MACHINE if addresses and such have + * to be corrected before they can be used as byte counts. */ + +#undef WORD_MACHINE + +/* Define how to take a char and sign-extend into an int. + On machines where char is signed, this is a no-op. */ + +#define SIGN_EXTEND_CHAR(c) ((signed char)(c)) + +/* Now define a symbol for the cpu type, if your compiler + does not define it automatically: + Ones defined so far include vax, m68000, ns16000, pyramid, + orion, tahoe, APOLLO and many others */ +#ifndef mips +# define mips +#endif + +/* Define EXPLICIT_SIGN_EXTEND if XINT must explicitly sign-extend + the 24-bit bit field into an int. In other words, if bit fields + are always unsigned. + + If you use NO_UNION_TYPE, this flag does not matter. */ + +#define EXPLICIT_SIGN_EXTEND + +/* Data type of load average, as read out of kmem. */ + +#define LOAD_AVE_TYPE long + +/* Convert that into an integer that is 100 for a load average of 1.0 */ + +#define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / 256.0) + +/* CDC EP/IX 1.4.3 uses /unix */ + +#undef KERNEL_FILE +#define KERNEL_FILE "/unix" + +/* Define CANNOT_DUMP on machines where unexec does not work. + Then the function dump-emacs will not be defined + and temacs will do (load "loadup") automatically unless told otherwise. */ + +#undef CANNOT_DUMP + +/* Define VIRT_ADDR_VARIES if the virtual addresses of + pure and impure space as loaded can vary, and even their + relative order cannot be relied on. + + Otherwise Emacs assumes that text space precedes data space, + numerically. */ + +/* #define VIRT_ADDR_VARIES */ + +/* Define C_ALLOCA if this machine does not support a true alloca + and the one written in C should be used instead. + Define HAVE_ALLOCA to say that the system provides a properly + working alloca function and it should be used. + Define neither one if an assembler-language alloca + in the file alloca.s should be used. */ + +#ifdef __GNUC__ +#define HAVE_ALLOCA +#else +#define C_ALLOCA +#endif + +/* Define NO_REMAP if memory segmentation makes it not work well + to change the boundary between the text section and data section + when Emacs is dumped. If you define this, the preloaded Lisp + code will not be sharable; but that's better than failing completely. */ + +#define NO_REMAP + +/* Describe layout of the address space in an executing process. */ +/* MARCO ??? +*/ +#define TEXT_START 0x400000 +/* +#define DATA_START 0x10000000 +#define DATA_SEG_BITS 0x10000000 +*/ + +#undef ORDINARY_LINK + +#undef LIBS_DEBUG + +/* Alter some of the options used when linking. */ + +#undef LIBS_MACHINE +/* #define LIBS_MACHINE "-lmld" */ /* mrb */ +#define START_FILES "pre-crt0.o /usr/ccs/lib/crt1.o /usr/ccs/lib/crti.o /usr/ccs/lib/values-Xt.o" + +#ifdef LIB_STANDARD +#undef LIB_STANDARD +#endif +#define LIB_STANDARD "-lc /usr/ccs/lib/crtn.o" + +#ifdef __GNUC__ +#define C_DEBUG_SWITCH +#define C_OPTIMIZE_SWITCH "-O" +#define LD_SWITCH_MACHINE +#else +#define C_DEBUG_SWITCH "-DSYSV" +#define C_OPTIMIZE_SWITCH "-DSYSV " +#define LD_SWITCH_MACHINE +#endif diff -r 73c75c43c1f2 -r 19dcec799385 src/malloc.c --- a/src/malloc.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/malloc.c Mon Aug 13 10:46:44 2007 +0200 @@ -166,6 +166,8 @@ #endif /* not emacs */ +#include + /* Define getpagesize () if the system does not. */ #include "getpagesize.h" diff -r 73c75c43c1f2 -r 19dcec799385 src/menubar-x.c --- a/src/menubar-x.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/menubar-x.c Mon Aug 13 10:46:44 2007 +0200 @@ -146,8 +146,10 @@ { Lisp_Object key, val; Lisp_Object include_p = Qnil, hook_fn = Qnil, config_tag = Qnil; + Lisp_Object active_p = Qt; Lisp_Object accel; int included_spec = 0; + int active_spec = 0; wv->type = CASCADE_TYPE; wv->enabled = 1; wv->name = (char *) XSTRING_DATA (LISP_GETTEXT (XCAR (desc))); @@ -172,6 +174,8 @@ config_tag = val; else if (EQ (key, Q_filter)) hook_fn = val; + else if (EQ (key, Q_active)) + active_p = val, active_spec = 1; else if (EQ (key, Q_accelerator)) { if ( SYMBOLP (val) @@ -180,6 +184,10 @@ else signal_simple_error ("bad keyboard accelerator", val); } + else if (EQ (key, Q_label)) + { + /* implement in 21.2 */ + } else signal_simple_error ("unknown menu cascade keyword", cascade); } @@ -191,7 +199,11 @@ wv = NULL; goto menu_item_done; } - if (!NILP (hook_fn)) + + if (active_spec) + active_p = Feval (active_p); + + if (!NILP (hook_fn) && !NILP (active_p)) { #if defined LWLIB_MENUBARS_LUCID || defined LWLIB_MENUBARS_MOTIF if (filter_p || depth == 0) @@ -236,6 +248,24 @@ wv->contents = title_wv; prev = sep_wv; } + wv->enabled = ! NILP (active_p); + if (deep_p && !wv->enabled && !NILP (desc)) + { + widget_value *dummy; + /* Add a fake entry so the menus show up */ + wv->contents = dummy = xmalloc_widget_value (); + dummy->name = "(inactive)"; + dummy->accel = NULL; + dummy->enabled = 0; + dummy->selected = 0; + dummy->value = NULL; + dummy->type = BUTTON_TYPE; + dummy->call_data = NULL; + dummy->next = NULL; + + goto menu_item_done; + } + } else if (menubar_root_p) { @@ -248,8 +278,7 @@ signal_simple_error ("menu name (first element) must be a string", desc); } - - wv->enabled = 1; + if (deep_p || menubar_root_p) { widget_value *next; diff -r 73c75c43c1f2 -r 19dcec799385 src/menubar.c --- a/src/menubar.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/menubar.c Mon Aug 13 10:46:44 2007 +0200 @@ -501,6 +501,13 @@ Basically, the filter function should have no side-effects. + :key-sequence keys Used in FSF Emacs as an hint to an equivalent keybinding. + Ignored by XEnacs for easymenu.el compatability. + + :label
(unimplemented!) Like :suffix, but replaces label + completely. + (might be added in 21.2). + For example: ("File" diff -r 73c75c43c1f2 -r 19dcec799385 src/mule-charset.c --- a/src/mule-charset.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/mule-charset.c Mon Aug 13 10:46:44 2007 +0200 @@ -1249,7 +1249,7 @@ build_string ("iso8859-1")); Vcharset_control_1 = make_charset (-1, Qcontrol_1, LEADING_BYTE_CONTROL_1, 2, - CHARSET_TYPE_94, 1, 0, 0, + CHARSET_TYPE_94, 1, 1, 0, CHARSET_LEFT_TO_RIGHT, build_string ("Control characters"), build_string ("")); diff -r 73c75c43c1f2 -r 19dcec799385 src/process-unix.c --- a/src/process-unix.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/process-unix.c Mon Aug 13 10:46:44 2007 +0200 @@ -735,7 +735,7 @@ /* Nothing below here GCs so our string pointers shouldn't move. */ new_argv = alloca_array (char *, nargv + 2); - new_argv[0] = (char *) XSTRING_DATA (program); + GET_C_STRING_FILENAME_DATA_ALLOCA (program, new_argv[0]); for (i = 0; i < nargv; i++) { Lisp_Object tem = argv[i]; @@ -743,7 +743,7 @@ new_argv[i + 1] = (char *) XSTRING_DATA (tem); } new_argv[i + 1] = 0; - current_dir = (char *) XSTRING_DATA (cur_dir); + GET_C_STRING_FILENAME_DATA_ALLOCA (cur_dir, current_dir); #ifdef HAVE_PTYS if (!NILP (Vprocess_connection_type)) @@ -1198,6 +1198,10 @@ else { /* We got here from a longjmp() from the SIGPIPE handler */ signal (SIGPIPE, old_sigpipe); + /* Close the file lstream so we don't attempt to write to it further */ + /* #### There is controversy over whether this might cause fd leakage */ + /* my tests say no. -slb */ + XLSTREAM (p->pipe_outstream)->flags &= ~LSTREAM_FL_IS_OPEN; p->status_symbol = Qexit; p->exit_code = 256; /* #### SIGPIPE ??? */ p->core_dumped = 0; diff -r 73c75c43c1f2 -r 19dcec799385 src/s/cygwin32.h --- a/src/s/cygwin32.h Mon Aug 13 10:46:01 2007 +0200 +++ b/src/s/cygwin32.h Mon Aug 13 10:46:44 2007 +0200 @@ -71,8 +71,8 @@ /* cheesy way to determine cygwin version */ #ifndef NOT_C_CODE #include -#ifdef HAVE_CYGWIN32_VERSION_H -#include +#ifdef HAVE_CYGWIN_VERSION_H +#include #else #ifdef SIGIO #define CYGWIN_B19 @@ -85,7 +85,7 @@ extern int cygwin32_win32_to_posix_path_list_buf_size(const char*); extern void cygwin32_posix_to_win32_path_list(const char*, char*); extern int cygwin32_posix_to_win32_path_list_buf_size(const char*); -#ifndef CYGWIN_DLL_VERSION_MAJOR +#ifndef CYGWIN_VERSION_DLL_MAJOR struct timeval; struct timezone; struct itimerval; @@ -115,6 +115,21 @@ #define SND_FILENAME 0x2000L #define VK_APPS 0x5D #define SIF_TRACKPOS 0x0010 +#define ICC_BAR_CLASSES 4 +#define FW_BLACK FW_HEAVY +#define FW_ULTRABOLD FW_EXTRABOLD +#define FW_DEMIBOLD FW_SEMIBOLD +#define FW_ULTRALIGHT FW_EXTRALIGHT +#define APPCMD_FILTERINITS 0x20L +#define CBF_FAIL_SELFCONNECTIONS 0x1000 +#define CBF_SKIP_ALLNOTIFICATIONS 0x3C0000 +#define CBF_FAIL_ADVISES 0x4000 +#define CBF_FAIL_POKES 0x10000 +#define CBF_FAIL_REQUESTS 0x20000 +#define SZDDESYS_TOPIC "System" +#define JOHAB_CHARSET 130 +#define MAC_CHARSET 77 + #endif #endif @@ -130,28 +145,18 @@ #define C_SWITCH_SYSTEM -Wno-sign-compare -fno-caller-saves #define LIBS_SYSTEM -lwinmm -#define ICC_BAR_CLASSES 4 -#define FW_BLACK FW_HEAVY -#define FW_ULTRABOLD FW_EXTRABOLD -#define FW_DEMIBOLD FW_SEMIBOLD -#define FW_ULTRALIGHT FW_EXTRALIGHT -#define APPCMD_FILTERINITS 0x20L -#define CBF_FAIL_SELFCONNECTIONS 0x1000 -#define CBF_SKIP_ALLNOTIFICATIONS 0x3C0000 -#define CBF_FAIL_ADVISES 0x4000 -#define CBF_FAIL_POKES 0x10000 -#define CBF_FAIL_REQUESTS 0x20000 -#define SZDDESYS_TOPIC "System" -#define JOHAB_CHARSET 130 -#define MAC_CHARSET 77 #define TEXT_START -1 #define TEXT_END -1 #define DATA_END -1 #define HEAP_IN_DATA #define UNEXEC "unexcw.o" -/* #define BROKEN_SIGIO */ + +#ifdef CYGWIN_VERSION_DLL_MAJOR +#define BROKEN_SIGIO +#else #define PROCESS_IO_BLOCKING +#endif #define strnicmp strncasecmp #ifndef HAVE_SOCKETS #define HAVE_SOCKETS diff -r 73c75c43c1f2 -r 19dcec799385 src/scrollbar-msw.c --- a/src/scrollbar-msw.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/scrollbar-msw.c Mon Aug 13 10:46:44 2007 +0200 @@ -34,11 +34,13 @@ #include "specifier.h" #include "window.h" -/* This has really different semantics in Windows than in Motif. - There's no corresponding method; we just do not change slider - size while dragging. It makes the scrollbar look smother and - prevents some weird behavior when scrolled near the bottom */ -static int inhibit_slider_size_change = 0; +/* We use a similar sort of vertical scrollbar drag hack for mswindows + * scrollbars as is used for Motif or Lucid scrollbars under X. + * We do character-based instead of line-based scrolling, which can mean that + * without the hack it is impossible to drag to the end of a buffer. */ +#define VERTICAL_SCROLLBAR_DRAG_HACK + +static int vertical_drag_in_progress = 0; static void mswindows_create_scrollbar_instance (struct frame *f, int vertical, @@ -59,6 +61,7 @@ CW_USEDEFAULT, CW_USEDEFAULT, FRAME_MSWINDOWS_HANDLE (f), NULL, NULL, NULL); + SCROLLBAR_MSW_INFO (sb).cbSize = sizeof(SCROLLINFO); SCROLLBAR_MSW_INFO (sb).fMask = SIF_ALL; GetScrollInfo(SCROLLBAR_MSW_HANDLE (sb), SB_CTL, &SCROLLBAR_MSW_INFO (sb)); @@ -110,10 +113,8 @@ int new_scrollbar_x, int new_scrollbar_y) { - struct frame *f; int pos_changed = 0; - - f = XFRAME (w->frame); + int vert = GetWindowLong (SCROLLBAR_MSW_HANDLE (sb), GWL_STYLE) & SBS_VERT; #if 0 stderr_out ("[%d, %d], page = %d, pos = %d, inhibit = %d\n", new_minimum, new_maximum, @@ -122,17 +123,23 @@ /* These might be optimized, but since at least one will change at each call, it's probably not worth it. */ - SCROLLBAR_MSW_INFO (sb).cbSize = sizeof(SCROLLINFO); SCROLLBAR_MSW_INFO (sb).nMin = new_minimum; SCROLLBAR_MSW_INFO (sb).nMax = new_maximum; - SCROLLBAR_MSW_INFO (sb).nPage = new_slider_size + 1; /* for DISABLENOSCROLL */ + SCROLLBAR_MSW_INFO (sb).nPage = new_slider_size + 1; /* +1 for DISABLENOSCROLL */ SCROLLBAR_MSW_INFO (sb).nPos = new_slider_position; - SCROLLBAR_MSW_INFO (sb).fMask = (inhibit_slider_size_change +#ifndef VERTICAL_SCROLLBAR_DRAG_HACK + SCROLLBAR_MSW_INFO (sb).fMask = ((vert && vertical_drag_in_progress) ? SIF_RANGE | SIF_POS : SIF_ALL | SIF_DISABLENOSCROLL); - - SetScrollInfo(SCROLLBAR_MSW_HANDLE (sb), SB_CTL, &SCROLLBAR_MSW_INFO (sb), - !pos_changed); +#else + SCROLLBAR_MSW_INFO (sb).fMask = SIF_ALL | SIF_DISABLENOSCROLL; + + /* Ignore XEmacs' requests to update the thumb position and size; they don't + * bear any relation to reality because we're reporting made-up positions */ + if (!(vert && vertical_drag_in_progress)) +#endif + SetScrollInfo (SCROLLBAR_MSW_HANDLE (sb), SB_CTL, &SCROLLBAR_MSW_INFO (sb), + TRUE); UPDATE_POS_FIELD (scrollbar_x); UPDATE_POS_FIELD (scrollbar_y); @@ -171,14 +178,13 @@ struct scrollbar_instance *sb; SCROLLINFO scrollinfo; int vert = GetWindowLong (hwnd, GWL_STYLE) & SBS_VERT; + int value; sb = (struct scrollbar_instance *)GetWindowLong (hwnd, GWL_USERDATA); win = real_window (sb->mirror, 1); frame = XWINDOW (win)->frame; f = XFRAME (frame); - inhibit_slider_size_change = code == SB_THUMBTRACK; - /* SB_LINEDOWN == SB_CHARLEFT etc. This is the way they will always be - any Windows is binary compatible backward with old programs */ @@ -221,12 +227,40 @@ case SB_THUMBTRACK: case SB_THUMBPOSITION: scrollinfo.cbSize = sizeof(SCROLLINFO); - scrollinfo.fMask = SIF_TRACKPOS; + scrollinfo.fMask = SIF_ALL; GetScrollInfo (hwnd, SB_CTL, &scrollinfo); + vertical_drag_in_progress = vert; +#ifdef VERTICAL_SCROLLBAR_DRAG_HACK + if (vert && (scrollinfo.nTrackPos > scrollinfo.nPos)) + /* new buffer position = + * buffer position at start of drag + + * ((text remaining in buffer at start of drag) * + * (amount that the thumb has been moved) / + * (space that remained past end of the thumb at start of drag)) */ + value = (int) + (scrollinfo.nPos + + (((double) + (scrollinfo.nMax - scrollinfo.nPos) + * (scrollinfo.nTrackPos - scrollinfo.nPos)) + / (scrollinfo.nMax - scrollinfo.nPage - scrollinfo.nPos))) + - 2; /* ensure that the last line doesn't disappear off screen */ + else +#endif + value = scrollinfo.nTrackPos; mswindows_enqueue_misc_user_event (frame, vert ? Qscrollbar_vertical_drag : Qscrollbar_horizontal_drag, - Fcons (win, make_int (scrollinfo.nTrackPos))); + Fcons (win, make_int (value))); + break; + + case SB_ENDSCROLL: +#ifdef VERTICAL_SCROLLBAR_DRAG_HACK + if (vertical_drag_in_progress) + /* User has just dropped the thumb - finally update it */ + SetScrollInfo (SCROLLBAR_MSW_HANDLE (sb), SB_CTL, + &SCROLLBAR_MSW_INFO (sb), TRUE); +#endif + vertical_drag_in_progress = 0; break; } } diff -r 73c75c43c1f2 -r 19dcec799385 src/unexec.c --- a/src/unexec.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/unexec.c Mon Aug 13 10:46:44 2007 +0200 @@ -190,6 +190,7 @@ # define __STDC_EXTENDED__ 1 # endif +# include # include # include # include @@ -287,7 +288,7 @@ #ifdef __STDC__ #ifndef __sys_stdtypes_h -#ifndef _PTRDIFF_T +#if !defined(_PTRDIFF_T) && !defined(_BSD_PTRDIFF_T_) typedef long ptrdiff_t; #endif #endif diff -r 73c75c43c1f2 -r 19dcec799385 src/window.c --- a/src/window.c Mon Aug 13 10:46:01 2007 +0200 +++ b/src/window.c Mon Aug 13 10:46:44 2007 +0200 @@ -1635,7 +1635,8 @@ /* this is not right, but much easier than doing what is right. */ /* w->start_at_line_beg = 0; */ /* WTF is the above supposed to mean? GE */ - w->start_at_line_beg = beginning_of_line_p (XBUFFER (w->buffer), XINT (pos)); + w->start_at_line_beg = beginning_of_line_p (XBUFFER (w->buffer), + marker_position (w->start[CURRENT_DISP])); if (NILP (noforce)) w->force_start = 1; w->redo_modeline = 1; @@ -3167,7 +3168,7 @@ Fset_marker (w->sb_point, w->start[CURRENT_DISP], buffer); /* set start_at_line_beg correctly. GE */ w->start_at_line_beg = beginning_of_line_p (XBUFFER (buffer), - XBUFFER (buffer)->last_window_start); + marker_position (w->start[CURRENT_DISP])); w->force_start = 0; /* Lucid fix */ SET_LAST_MODIFIED (w, 1); SET_LAST_FACECHANGE (w); @@ -5670,7 +5671,7 @@ { Lisp_Object fb = Qnil; #ifdef HAVE_TTY - fb = Fcons (Fcons (list1 (Qtty), Qzero), fb); + fb = Fcons (Fcons (list1 (Qtty), make_int (1)), fb); #endif #ifdef HAVE_X_WINDOWS fb = Fcons (Fcons (list1 (Qx), make_int (3)), fb); diff -r 73c75c43c1f2 -r 19dcec799385 version.sh --- a/version.sh Mon Aug 13 10:46:01 2007 +0200 +++ b/version.sh Mon Aug 13 10:46:44 2007 +0200 @@ -1,8 +1,8 @@ #!/bin/sh emacs_major_version=21 emacs_minor_version=0 -emacs_beta_version= -xemacs_codename="Poitou" +emacs_beta_version=58 +xemacs_codename="Poitou58" infodock_major_version=4 infodock_minor_version=0 -infodock_build_version=5 +infodock_build_version=6