November 2005 - xemacs-cvs＠xemacs.org - XEmacs Mailing List Archives

CVS update by viteno packages/xemacs-packages ... 19 years, 1 month

CVS Monitor

User: viteno Date: 05/11/16 09:08:54 Modified: packages/xemacs-packages Makefile Log: Decouple ess and liece from the build. Revision Changes Path 1.584 +3 -0 XEmacs/packages/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/ChangeLog,v retrieving revision 1.583 retrieving revision 1.584 diff -u -p -r1.583 -r1.584 --- ChangeLog 2005/11/16 07:52:34 1.583 +++ ChangeLog 2005/11/16 08:08:50 1.584 ＠＠ -1,5 +1,8 ＠＠ 2005-11-16 Norbert Koch <viteno(a)xemacs.org> + * package-compile.el: + * xemacs-packages/Makefile (PACKAGES): Remove ess and liece. + * Packages released: ediff viper. 2005-11-15 Norbert Koch <viteno(a)xemacs.org> 1.69 +0 -3 XEmacs/packages/package-compile.el Index: package-compile.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/package-compile.el,v retrieving revision 1.68 retrieving revision 1.69 diff -u -p -r1.68 -r1.69 --- package-compile.el 2005/04/04 13:27:15 1.68 +++ package-compile.el 2005/11/16 08:08:50 1.69 ＠＠ -118,7 +118,6 ＠＠ ("emerge" . "xemacs-packages") ("erc" . "xemacs-packages") ("eshell" . "xemacs-packages") - ("ess" . "xemacs-packages") ("eterm" . "xemacs-packages") ("eudc" . "xemacs-packages") ("escreen" . "xemacs-packages") ＠＠ -140,7 +139,6 ＠＠ ("ilisp" . "xemacs-packages") ("ispell" . "xemacs-packages") ("jde" . "xemacs-packages") - ("liece" . "xemacs-packages") ("mail-lib" . "xemacs-packages") ("mailcrypt" . "xemacs-packages") ("mew" . "xemacs-packages") ＠＠ -232,7 +230,6 ＠＠ (dir (expand-file-name package (expand-file-name area package-source-root)))) (cond ((or (equal package "bbdb") - (equal package "ess") (equal package "gnus") (equal package "jde") (equal package "lookup") 1.39 +2 -2 XEmacs/packages/xemacs-packages/Makefile Index: Makefile =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/Makefile,v retrieving revision 1.38 retrieving revision 1.39 diff -u -p -r1.38 -r1.39 --- Makefile 2005/04/04 13:27:18 1.38 +++ Makefile 2005/11/16 08:08:53 1.39 ＠＠ -45,10 +45,10 ＠＠ PACKAGES := xemacs-base fsf-compat mail- \ Sun ada auctex bbdb build c-support calc calendar clearcase \ cookie crisp dictionary docbookide ecb ediff edt emerge \ - erc escreen eshell ess eudc footnote forms fortran-modes \ + erc escreen eshell eudc footnote forms fortran-modes \ frame-icon games general-docs gnats gnus haskell-mode \ hm--html-menus hyperbole ibuffer idlwave igrep ilisp \ - jde liece mailcrypt mew mh-e mine misc-games mmm-mode \ + jde mailcrypt mew mh-e mine misc-games mmm-mode \ ocaml oo-browser pc pcl-cvs pcomplete perl-modes pgg \ prog-modes ps-print psgml psgml-dtds python-modes re-builder \ reftex riece rmail ruby-modes sasl scheme semantic sgml \

1 participants
0 comments

CVS update by viteno xemacs-builds/viteno ... 19 years, 1 month

CVS Monitor

User: viteno Date: 05/11/16 09:01:09 Modified: xemacs-builds/viteno package-index setup-packages.ini Log: Package database backup: - ediff-1.58 - viper-1.46 Revision Changes Path 1.260 +12 -12 XEmacs/xemacs-builds/viteno/package-index Index: package-index =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs-builds/viteno/package-index,v retrieving revision 1.259 retrieving revision 1.260 diff -u -p -r1.259 -r1.260 --- package-index 2005/11/15 07:29:12 1.259 +++ package-index 2005/11/16 08:01:08 1.260 ＠＠ -1681,19 +1681,19 ＠＠ semantic-sas (package-get-update-base-entry (quote (viper (standards-version 1.1 - version "1.45" + version "1.46" author-version "3.09" - date " 1.44 rele" - build-date "2005-11-08" + date "2005-11-16" + build-date "2005-11-16" maintainer "Michael Kifer <kifer(a)cs.sunysb.edu>" distribution xemacs priority low category "standard" dump nil description "VI emulation support." - filename "viper-1.45-pkg.tar.gz" - md5sum "425f40c2fc70c9c2912427a2ae6709e4" - size 334614 + filename "viper-1.46-pkg.tar.gz" + md5sum "e7f1ded79c43ee94ebb8c780572ba4f3" + size 334931 provides (viper-cmd viper-ex viper-init viper-keym viper-macs viper-mous viper-util viper) requires (xemacs-base) type regular ＠＠ -2055,19 +2055,19 ＠＠ semantic-sas (package-get-update-base-entry (quote (ediff (standards-version 1.1 - version "1.57" + version "1.58" author-version "2.75" - date " 1.56 rele" - build-date "2005-11-08" + date "2005-11-16" + build-date "2005-11-16" maintainer "Michael Kifer <kifer(a)cs.sunysb.edu>" distribution xemacs priority medium category "standard" dump nil description "Interface over GNU patch." - filename "ediff-1.57-pkg.tar.gz" - md5sum "41f8ab87168ee5a5ec11673ee2616e94" - size 313869 + filename "ediff-1.58-pkg.tar.gz" + md5sum "b5e6dfc0cab30974bc3686e136cf2cf3" + size 313930 provides (ediff-diff ediff-help ediff-hook ediff-init ediff-merg ediff-mult ediff-ptch ediff-tbar ediff-util ediff-vers ediff-wind ediff) requires (pcl-cvs elib dired xemacs-base edebug prog-modes) type regular 1.248 +4 -4 XEmacs/xemacs-builds/viteno/setup-packages.ini Index: setup-packages.ini =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs-builds/viteno/setup-packages.ini,v retrieving revision 1.247 retrieving revision 1.248 diff -u -p -r1.247 -r1.248 --- setup-packages.ini 2005/11/15 07:29:12 1.247 +++ setup-packages.ini 2005/11/16 08:01:08 1.248 ＠＠ -140,8 +140,8 ＠＠ version: 1.17 install: packages/debug-1.17-pkg.tar.gz 108073 ＠ ediff -version: 1.57 -install: packages/ediff-1.57-pkg.tar.gz 313869 +version: 1.58 +install: packages/ediff-1.58-pkg.tar.gz 313930 ＠ emerge version: 1.11 ＠＠ -208,8 +208,8 ＠＠ version: 1.14 install: packages/tpu-1.14-pkg.tar.gz 59529 ＠ viper -version: 1.45 -install: packages/viper-1.45-pkg.tar.gz 334614 +version: 1.46 +install: packages/viper-1.46-pkg.tar.gz 334931 ＠ eterm version: 1.17

1 participants
0 comments

CVS update by viteno packages/xemacs-packages/viper ... 19 years, 1 month

CVS Monitor

User: viteno Date: 05/11/16 08:53:20 Modified: packages/xemacs-packages/viper ChangeLog Makefile Log: Increment VERSION in Makefile Revision Changes Path 1.69 +4 -0 XEmacs/packages/xemacs-packages/viper/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/viper/ChangeLog,v retrieving revision 1.68 retrieving revision 1.69 diff -u -p -r1.68 -r1.69 --- ChangeLog 2005/11/15 18:53:49 1.68 +++ ChangeLog 2005/11/16 07:53:18 1.69 ＠＠ -1,3 +1,7 ＠＠ +2005-11-16 Norbert Koch <viteno(a)xemacs.org> + + * Makefile (VERSION): XEmacs package 1.46 released. + 2005-11-15 Michael Kifer <kifer(a)cs.stonybrook.edu> * viper-utils (viper-non-word-characters-reformed-vi): quote `-' in 1.54 +1 -1 XEmacs/packages/xemacs-packages/viper/Makefile Index: Makefile =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/viper/Makefile,v retrieving revision 1.53 retrieving revision 1.54 diff -u -p -r1.53 -r1.54 --- Makefile 2005/11/07 21:44:56 1.53 +++ Makefile 2005/11/16 07:53:18 1.54 ＠＠ -17,7 +17,7 ＠＠ # the Free Software Foundation, Inc., 59 Temple Place - Suite 330, # Boston, MA 02111-1307, USA. -VERSION = 1.45 +VERSION = 1.46 AUTHOR_VERSION = 3.09 MAINTAINER = Michael Kifer <kifer(a)cs.sunysb.edu> PACKAGE = viper

1 participants
0 comments

CVS update by viteno packages/xemacs-packages/ediff ... 19 years, 1 month

CVS Monitor

User: viteno Date: 05/11/16 08:52:57 Modified: packages/xemacs-packages/ediff ChangeLog Makefile Log: Increment VERSION in Makefile Revision Changes Path 1.95 +4 -0 XEmacs/packages/xemacs-packages/ediff/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/ediff/ChangeLog,v retrieving revision 1.94 retrieving revision 1.95 diff -u -p -r1.94 -r1.95 --- ChangeLog 2005/11/15 18:51:36 1.94 +++ ChangeLog 2005/11/16 07:52:56 1.95 ＠＠ -1,3 +1,7 ＠＠ +2005-11-16 Norbert Koch <viteno(a)xemacs.org> + + * Makefile (VERSION): XEmacs package 1.58 released. + 2005-11-15 Michael Kifer <kifer(a)cs.stonybrook.edu> * ediff-util (ediff-make-temp-file): use proper file-name-handler 1.70 +1 -1 XEmacs/packages/xemacs-packages/ediff/Makefile Index: Makefile =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/ediff/Makefile,v retrieving revision 1.69 retrieving revision 1.70 diff -u -p -r1.69 -r1.70 --- Makefile 2005/11/07 21:44:27 1.69 +++ Makefile 2005/11/16 07:52:56 1.70 ＠＠ -17,7 +17,7 ＠＠ # the Free Software Foundation, Inc., 59 Temple Place - Suite 330, # Boston, MA 02111-1307, USA. -VERSION = 1.57 +VERSION = 1.58 AUTHOR_VERSION = 2.75 MAINTAINER = Michael Kifer <kifer(a)cs.sunysb.edu> PACKAGE = ediff

1 participants
0 comments

CVS update by viteno packages ... 19 years, 1 month

CVS Monitor

User: viteno Date: 05/11/16 08:52:34 Modified: packages ChangeLog Log: Package release Revision Changes Path 1.583 +4 -0 XEmacs/packages/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/ChangeLog,v retrieving revision 1.582 retrieving revision 1.583 diff -u -p -r1.582 -r1.583 --- ChangeLog 2005/11/15 06:33:20 1.582 +++ ChangeLog 2005/11/16 07:52:34 1.583 ＠＠ -1,3 +1,7 ＠＠ +2005-11-16 Norbert Koch <viteno(a)xemacs.org> + + * Packages released: ediff viper. + 2005-11-15 Norbert Koch <viteno(a)xemacs.org> * Packages released: gnus.

1 participants
0 comments

CVS update by stephent xemacs/src ... 19 years, 1 month

CVS Monitor

User: stephent Date: 05/11/16 08:22:49 Modified: xemacs/src ChangeLog database.c event-Xt.c sound.c Log: Assorted minor fixes. TODO comment in configure.ac: <87irutytzq.fsf(a)tleepslib.sk.tsukuba.ac.jp> Avoid warning, don't redefine integer types on Mac OS X: <87ek5hytvq.fsf(a)tleepslib.sk.tsukuba.ac.jp> Fix uninitialized variable: <87acg5yttp.fsf(a)tleepslib.sk.tsukuba.ac.jp> Eliminate warnings for unused parameters and functions: <8764qtytrp.fsf(a)tleepslib.sk.tsukuba.ac.jp> Quiet byte-compiler in select.el: <871x1hytow.fsf(a)tleepslib.sk.tsukuba.ac.jp> Quiet compiler about unused parameters in sound.el: <87wtj9xf16.fsf(a)tleepslib.sk.tsukuba.ac.jp> Revision Changes Path 1.469 +4 -0 XEmacs/xemacs/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/ChangeLog,v retrieving revision 1.468 retrieving revision 1.469 diff -u -p -r1.468 -r1.469 --- ChangeLog 2005/11/13 10:39:39 1.468 +++ ChangeLog 2005/11/16 07:22:37 1.469 ＠＠ -1,3 +1,7 ＠＠ +2005-11-16 Stephen J. Turnbull <stephen(a)xemacs.org> + + * configure.ac (checks for typedefs): TODO comment. + 2005-11-13 Ben Wing <ben(a)xemacs.org> * dynodump/Makefile.in.in: 1.20 +1 -0 XEmacs/xemacs/configure.ac Index: configure.ac =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/configure.ac,v retrieving revision 1.19 retrieving revision 1.20 diff -u -p -r1.19 -r1.20 --- configure.ac 2005/11/13 07:31:55 1.19 +++ configure.ac 2005/11/16 07:22:37 1.20 ＠＠ -2763,6 +2763,7 ＠＠ AC_TYPE_PID_T AC_TYPE_UID_T AC_TYPE_MODE_T AC_TYPE_OFF_T +dnl #### deprecated 2.13-ism AC_CHECK_TYPE(ssize_t, int) dnl not AC_CHECK_TYPE; lisp.h does hairy conditional typedef 1.697 +5 -0 XEmacs/xemacs/lisp/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/ChangeLog,v retrieving revision 1.696 retrieving revision 1.697 diff -u -p -r1.696 -r1.697 --- ChangeLog 2005/11/13 10:57:59 1.696 +++ ChangeLog 2005/11/16 07:22:40 1.697 ＠＠ -1,3 +1,8 ＠＠ +2005-11-16 Stephen J. Turnbull <stephen(a)xemacs.org> + + * select.el (get-selection): + Quiet bytecompiler (unused condition-case variable). + 2005-11-13 Ben Wing <ben(a)xemacs.org> * syntax.el: 1.16 +1 -1 XEmacs/xemacs/lisp/select.el Index: select.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/select.el,v retrieving revision 1.15 retrieving revision 1.16 diff -u -p -r1.15 -r1.16 --- select.el 2005/03/12 20:57:42 1.15 +++ select.el 2005/11/16 07:22:40 1.16 ＠＠ -131,7 +131,7 ＠＠ there is no selection an error is signal (catch 'converted (if targets (dolist (current-preference data-type) - (condition-case err + (condition-case nil (if (and (memq current-preference targets) (setq res (get-selection-internal type current-preference))) 1.74 +8 -1 XEmacs/xemacs/lwlib/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lwlib/ChangeLog,v retrieving revision 1.73 retrieving revision 1.74 diff -u -p -r1.73 -r1.74 --- ChangeLog 2005/11/13 10:39:34 1.73 +++ ChangeLog 2005/11/16 07:22:42 1.74 ＠＠ -1,9 +1,16 ＠＠ +2005-11-16 Stephen J. Turnbull <stephen(a)xemacs.org> + + * xlwcheckbox.c (CheckboxInit): Mark unused parameters. C++ + correctness. + (CheckboxRealize): Don't compile at all if unused. + + * xlwradio.c (RadioDestroy): #if 0 dead code for later removal. + 2005-11-13 Ben Wing <ben(a)xemacs.org> * Makefile.in.in: Add targets distclean-noconfig, realclean-noconfig, extraclean-noconfig. Do some refactoring for cleanliness. - 2005-11-08 Marcus Crestani <crestani(a)xemacs.org> 1.7 +9 -2 XEmacs/xemacs/lwlib/xlwradio.c Index: xlwradio.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lwlib/xlwradio.c,v retrieving revision 1.6 retrieving revision 1.7 diff -u -p -r1.6 -r1.7 --- xlwradio.c 2005/11/10 15:47:33 1.6 +++ xlwradio.c 2005/11/16 07:22:43 1.7 ＠＠ -89,13 +89,17 ＠＠ Boston, MA 02111-1307, USA. */ static void RadioInit (Widget, Widget, ArgList, Cardinal *); static void RadioExpose (Widget, XEvent *, Region); static void RadioResize (Widget); -static void RadioDestroy (Widget, XtPointer, XtPointer); static void RadioClassInit (void); static void RadioClassPartInit (WidgetClass); static Boolean RadioSetValues (Widget, Widget, Widget, ArgList, Cardinal *); static void DrawDiamond (Widget); static XtGeometryResult RadioQueryGeometry (Widget, XtWidgetGeometry *, XtWidgetGeometry *); +#if 0 +/* #### This function isn't used and is slated for destruction. + Can we just nuke it? */ +static void RadioDestroy (Widget, XtPointer, XtPointer); +#endif /* Action procs */ ＠＠ -245,6 +249,9 ＠＠ RadioInit (Widget request, * Returns: none. */ +#if 0 +/* #### This function isn't used and is slated for destruction. + Can we just nuke it? */ /* ARGSUSED */ static void RadioDestroy (Widget UNUSED (w), ＠＠ -253,7 +260,7 ＠＠ RadioDestroy (Widget UNUSED (w), { /* TODO: get rid of this */ } - +#endif /* React to size change from manager. Label widget will compute some internal * stuff, but we need to override. This code requires knowledge of the 1.4 +4 -8 XEmacs/xemacs/lwlib/xlwcheckbox.c Index: xlwcheckbox.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lwlib/xlwcheckbox.c,v retrieving revision 1.3 retrieving revision 1.4 diff -u -p -r1.3 -r1.4 --- xlwcheckbox.c 2004/09/20 19:19:17 1.3 +++ xlwcheckbox.c 2005/11/16 07:22:43 1.4 ＠＠ -225,13 +225,13 ＠＠ CheckboxInit (Widget UNUSED (request), #if DRAW_CHECK Widget new, #else - Widget UNUSED (new), + Widget UNUSED (new_), #endif ArgList UNUSED (args), Cardinal *UNUSED (num_args)) { #if DRAW_CHECK - CheckboxWidget cw = (CheckboxWidget) new; + CheckboxWidget cw = (CheckboxWidget) new_; cw->checkbox.checkmark = None ; cw->checkbox.checkmark_GC = None ; #endif ＠＠ -280,17 +280,13 ＠＠ CheckboxRealize(Widget w, */ /* ARGSUSED */ +#if DRAW_CHECK static void CheckboxDestroy ( -#if DRAW_CHECK Widget w, -#else - Widget UNUSED (w), -#endif XtPointer UNUSED (junk), XtPointer UNUSED (garbage)) { -#if DRAW_CHECK CheckboxWidget cw = (CheckboxWidget) w; /* TODO: cache this via xmu */ ＠＠ -298,8 +294,8 ＠＠ CheckboxDestroy ( XFreePixmap( XtDisplay(w), cw->checkbox.checkmark ) ; if( cw->checkbox.checkmark_GC != None ) XtReleaseGC(w, cw->checkbox.checkmark_GC) ; -#endif } +#endif /* DRAW_CHECK */ 1.885 +15 -0 XEmacs/xemacs/src/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/ChangeLog,v retrieving revision 1.884 retrieving revision 1.885 diff -u -p -r1.884 -r1.885 --- ChangeLog 2005/11/13 10:48:01 1.884 +++ ChangeLog 2005/11/16 07:22:44 1.885 ＠＠ -1,3 +1,18 ＠＠ +2005-11-16 Stephen J. Turnbull <stephen(a)xemacs.org> + + * sound.c (USED_IF_HAVE_NATIVE_OR_NAS, USED_IF_HAVE_ANY): + New conditional UNUSED macros. + (Fplay_sound_file, Fdevice_sound_enabled_p, init_device_sound): + Use them. + +2005-11-16 Stephen J. Turnbull <stephen(a)xemacs.org> + + * event-Xt.c (x_to_emacs_keysym): Initialize len. + +2005-11-16 Stephen J. Turnbull <stephen(a)xemacs.org> + + * database.c: Don't redefine integer types for Mac OS X, either. + 2005-11-13 Ben Wing <ben(a)xemacs.org> * alloc.c: 1.38 +1 -1 XEmacs/xemacs/src/database.c Index: database.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/database.c,v retrieving revision 1.37 retrieving revision 1.38 diff -u -p -r1.37 -r1.38 --- database.c 2005/10/25 11:16:22 1.37 +++ database.c 2005/11/16 07:22:46 1.38 ＠＠ -47,7 +47,7 ＠＠ Boston, MA 02111-1307, USA. */ #ifdef HAVE_INTTYPES_H #define __BIT_TYPES_DEFINED__ #include <inttypes.h> -#if !defined(__FreeBSD__) && !defined(__NetBSD__) +#if !defined(__FreeBSD__) && !defined(__NetBSD__) && !defined(__APPLE__) typedef uint8_t u_int8_t; typedef uint16_t u_int16_t; typedef uint32_t u_int32_t; 1.88 +2 -2 XEmacs/xemacs/src/event-Xt.c Index: event-Xt.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/event-Xt.c,v retrieving revision 1.87 retrieving revision 1.88 diff -u -p -r1.87 -r1.88 --- event-Xt.c 2005/09/27 05:29:44 1.87 +++ event-Xt.c 2005/11/16 07:22:46 1.88 ＠＠ -836,7 +836,7 ＠＠ x_to_emacs_keysym (XKeyPressedEvent *eve KeySym keysym = 0; #ifdef HAVE_XIM - int len; + int len = 0; /* Some implementations of XmbLookupString don't return XBufferOverflow correctly, so increase the size of the xim input buffer from 64 to the more reasonable size 513, as Emacs has done. ＠＠ -893,7 +893,7 ＠＠ x_to_emacs_keysym (XKeyPressedEvent *eve stderr_out (" keysym=%s", XKeysymToString (keysym)); if (status == XLookupChars || status == XLookupBoth) { - if (len != 1) + if (len > 1) { int j; stderr_out (" chars=\""); 1.25 +22 -9 XEmacs/xemacs/src/sound.c Index: sound.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/sound.c,v retrieving revision 1.24 retrieving revision 1.25 diff -u -p -r1.24 -r1.25 --- sound.c 2005/05/05 17:10:54 1.24 +++ sound.c 2005/11/16 07:22:46 1.25 ＠＠ -51,6 +51,25 ＠＠ Boston, MA 02111-1307, USA. */ #include "syswindows.h" #endif +#ifdef HAVE_NAS_SOUND +#define USED_IF_HAVE_NAS(decl) decl +#else +#define USED_IF_HAVE_NAS(decl) UNUSED (decl) +#endif + +#if defined(HAVE_NATIVE_SOUND) || defined(HAVE_NAS_SOUND) +#define USED_IF_HAVE_NATIVE_OR_NAS(decl) decl +#else +#define USED_IF_HAVE_NATIVE_OR_NAS(decl) UNUSED (decl) +#endif + +#if defined(HAVE_NATIVE_SOUND) || defined(HAVE_NAS_SOUND) \ + || defined(HAVE_ESD_SOUND) +#define USED_IF_HAVE_ANY(decl) decl +#else +#define USED_IF_HAVE_ANY(decl) UNUSED (decl) +#endif + #ifdef HAVE_ESD_SOUND extern int esd_play_sound_file (Extbyte *file, int vol); extern int esd_play_sound_data (Binbyte *data, size_t length, int vol); ＠＠ -87,7 +106,7 ＠＠ except under Linux where WAV files are a Windows the sound file must be in WAV format. DEVICE defaults to the selected device. */ - (file, volume, device)) + (file, volume, USED_IF_HAVE_ANY (device))) { /* This function can call lisp */ int vol; ＠＠ -402,7 +421,7 ＠＠ If the sound cannot be played in any oth DEFUN ("device-sound-enabled-p", Fdevice_sound_enabled_p, 0, 1, 0, /* Return t if DEVICE is able to play sound. Defaults to selected device. */ - (device)) + (USED_IF_HAVE_NATIVE_OR_NAS (device))) { #ifdef HAVE_NAS_SOUND if (DEVICE_CONNECTED_TO_NAS_P (decode_device (device))) ＠＠ -487,12 +506,6 ＠＠ the C kernel of Emacs uses. return Qnil; } -#ifdef HAVE_NAS_SOUND -#define USED_IF_HAVE_NAS(decl) decl -#else -#define USED_IF_HAVE_NAS(decl) UNUSED (decl) -#endif - DEFUN ("wait-for-sounds", Fwait_for_sounds, 0, 1, 0, /* Wait for all sounds to finish playing on DEVICE. */ ＠＠ -608,7 +621,7 ＠＠ init_native_sound (struct device *d) #endif /* HAVE_NATIVE_SOUND */ void -init_device_sound (struct device *d) +init_device_sound (struct device * USED_IF_HAVE_NATIVE_OR_NAS (d)) { #ifdef HAVE_NAS_SOUND init_nas_sound (d);

1 participants
0 comments

CVS update by stephent xemacs/modules/canna ... 19 years, 1 month

CVS Monitor

User: stephent Date: 05/11/16 08:14:16 Modified: xemacs/modules/canna canna_api.c Log: Mule-ize Canna: <87mzk5yu35.fsf(a)tleepslib.sk.tsukuba.ac.jp> Revision Changes Path 1.51 +8 -0 XEmacs/xemacs/modules/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/modules/ChangeLog,v retrieving revision 1.50 retrieving revision 1.51 diff -u -p -r1.50 -r1.51 --- ChangeLog 2005/11/13 10:39:28 1.50 +++ ChangeLog 2005/11/16 07:14:13 1.51 ＠＠ -1,3 +1,11 ＠＠ +2005-11-16 Stephen J. Turnbull <stephen(a)xemacs.org> + + * canna/canna_api.c: Small fixes to Mule-ization patch. + +2005-11-01 Ben Wing <ben(a)xemacs.org> + + * canna/canna_api.c: Mule-ization. + 2005-11-13 Ben Wing <ben(a)xemacs.org> * common/Makefile.common: 1.3 +90 -189 XEmacs/xemacs/modules/canna/canna_api.c Index: canna_api.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/modules/canna/canna_api.c,v retrieving revision 1.2 retrieving revision 1.3 diff -u -p -r1.2 -r1.3 --- canna_api.c 2005/10/21 15:48:35 1.2 +++ canna_api.c 2005/11/16 07:14:16 1.3 ＠＠ -2,6 +2,7 ＠＠ Copyright (C) 1995 Free Software Foundation, Inc. Copyright (C) 1995 Sun Microsystems, Inc. + Copyright (C) 2005 Ben Wing. This file is part of XEmacs. ＠＠ -175,8 +176,7 ＠＠ extern int (*jrBeepFunc) (void); /* #### is this global really necessary? */ #define KEYTOSTRSIZE 2048 -static char key_buffer[KEYTOSTRSIZE]; -static char **warning; +static Extbyte key_buffer[KEYTOSTRSIZE]; static int canna_empty_info, canna_through_info; static int canna_underline; ＠＠ -200,13 +200,15 ＠＠ static int IRCP_context; static Lisp_Object storeResults (char *, int, jrKanjiStatus *); static Lisp_Object kanjiYomiList (int, int); static Lisp_Object CANNA_mode_keys (void); +static Lisp_Object Qeuc_jp; +#define make_euc_string(p, len) make_ext_string ((Extbyte *) p, len, Qeuc_jp) +#define build_euc_string(p) build_ext_string ((Extbyte *) p, Qeuc_jp) + #ifdef CANNA_MULE -static void m2c (unsigned char *, int, unsigned char *); -static Lisp_Object mule_make_string (unsigned char *, int); -static int mule_strlen (unsigned char *, int); -static void count_char (unsigned char *,int, int, int, Fixnum *, Fixnum *, Fixnum *); -#define make_string mule_make_string +static int euc_jp_num_chars (unsigned char *, int); +static void count_char (unsigned char *,int, int, int, Fixnum *, Fixnum *, + Fixnum *); #endif /* Lisp functions definition */ ＠＠ -234,12 +236,12 ＠＠ storeResults (char *buf, int len, jrKanj if (len < 0) { /* Error detected */ - val = make_string ((unsigned char*) jrKanjiError, strlen (jrKanjiError)); + val = build_euc_string (jrKanjiError); } else { /* ³ÎÄê€·€¿Êž»úÎó (the confirmed string) */ - Vcanna_kakutei_string = make_string ((unsigned char *) buf, len); + Vcanna_kakutei_string = make_euc_string (buf, len); val = make_int (len); /* ³ÎÄê€·€¿Êž»úÎó€ÎÆÉ€ß€ÎŸðÊó... (info about the reading of the confirmed string) */ ＠＠ -254,13 +256,13 ＠＠ storeResults (char *buf, int len, jrKanj int yomilen2; Vcanna_kakutei_yomi = - make_string ((unsigned char *) p, yomilen); /* ÆÉ€ß (reading) */ + make_euc_string (p, yomilen); /* ÆÉ€ß (reading) */ p += yomilen + 1; yomilen2 = strlen (p); if (len + yomilen + yomilen2 + 2 < KEYTOSTRSIZE) { Vcanna_kakutei_romaji = - make_string ((unsigned char *) p, yomilen2); + make_euc_string (p, yomilen2); /* ¥í¡Œ¥Þ»ú (romanization) */ } } ＠＠ -272,7 +274,7 ＠＠ storeResults (char *buf, int len, jrKanj Vcanna_henkan_string = Qnil; if (ks->length >= 0) { - Vcanna_henkan_string = make_string (ks->echoStr, ks->length); + Vcanna_henkan_string = make_euc_string (ks->echoStr, ks->length); #ifndef CANNA_MULE canna_henkan_length = ks->length; canna_henkan_revPos = ks->revPos; ＠＠ -280,10 +282,10 ＠＠ storeResults (char *buf, int len, jrKanj #else /* CANNA_MULE */ if (canna_underline) { - canna_henkan_length = mule_strlen (ks->echoStr,ks->length); - canna_henkan_revPos = mule_strlen (ks->echoStr,ks->revPos); - canna_henkan_revLen = mule_strlen (ks->echoStr+ks->revPos, - ks->revLen); + canna_henkan_length = euc_jp_num_chars (ks->echoStr,ks->length); + canna_henkan_revPos = euc_jp_num_chars (ks->echoStr,ks->revPos); + canna_henkan_revLen = euc_jp_num_chars (ks->echoStr+ks->revPos, + ks->revLen); } else { ＠＠ -298,8 +300,8 ＠＠ storeResults (char *buf, int len, jrKanj Vcanna_ichiran_string = Qnil; if (ks->info & KanjiGLineInfo && ks->gline.length >= 0) { - Vcanna_ichiran_string = make_string (ks->gline.line, - ks->gline.length); + Vcanna_ichiran_string = make_euc_string (ks->gline.line, + ks->gline.length); #ifndef CANNA_MULE canna_ichiran_length = ks->gline.length; canna_ichiran_revPos = ks->gline.revPos; ＠＠ -316,8 +318,7 ＠＠ storeResults (char *buf, int len, jrKanj Vcanna_mode_string = Qnil; if (ks->info & KanjiModeInfo) { - Vcanna_mode_string = - make_string (ks->mode, strlen ((const char *) ks->mode)); + Vcanna_mode_string = build_euc_string ((Extbyte *) ks->mode); } /* €œ€ÎÂŸ€ÎŸðÊó (other information) */ ＠＠ -365,7 +366,7 ＠＠ If nil is specified for each arg, the de { Lisp_Object val; int res; - unsigned char **p, **q; + char **p, **q; int kugiri; /* ÊžÀá¶èÀÚ€ê€ò€¹€ë€«¡© (display clause separator?) */ ＠＠ -388,13 +389,10 ＠＠ If nil is specified for each arg, the de } else { - char servername[256]; - CHECK_STRING (server); - strncpy (servername, (const char *) XSTRING_DATA (server), - XSTRING_LENGTH (server)); - servername[XSTRING_LENGTH (server)] = '\0'; - jrKanjiControl (0, KC_SETSERVERNAME, servername); + jrKanjiControl (0, KC_SETSERVERNAME, + /* !!#### Check encoding */ + NEW_LISP_STRING_TO_EXTERNAL (server, Qnative)); } if (NILP (rcfile)) ＠＠ -403,40 +401,37 ＠＠ If nil is specified for each arg, the de } else { - char rcname[256]; - CHECK_STRING (rcfile); - strncpy (rcname, (const char *) XSTRING_DATA (rcfile), - XSTRING_LENGTH (rcfile)); - rcname[XSTRING_LENGTH (rcfile)] = '\0'; - jrKanjiControl (0, KC_SETINITFILENAME, rcname); + jrKanjiControl (0, KC_SETINITFILENAME, + NEW_LISP_STRING_TO_EXTERNAL (rcfile, Qfile_name)); } - warning = (char **) 0; + { + char **warning = (char **) 0; #ifdef nec_ews_svr4 - stop_polling (); + stop_polling (); #endif /* nec_ews_svr4 */ - res = jrKanjiControl (0, KC_INITIALIZE, (char *)&warning); + res = jrKanjiControl (0, KC_INITIALIZE, (char *) &warning); #ifdef nec_ews_svr4 - start_polling (); + start_polling (); #endif /* nec_ews_svr4 */ - val = Qnil; - if (warning) - { - for (p = q = (unsigned char **) warning ; *q ; q++) - ; - while (p < q) - { - q--; - val = Fcons (make_string (*q, strlen ((const char *) *q)), val); - } - } - val = Fcons (val, Qnil); + val = Qnil; + if (warning) + { + for (p = q = warning ; *q ; q++) + ; + while (p < q) + { + q--; + val = Fcons (build_euc_string (*q), val); + } + } + val = Fcons (val, Qnil); + } if (res == -1) { - val = Fcons (make_string ((unsigned char *) jrKanjiError, - strlen (jrKanjiError)), val); + val = Fcons (build_euc_string (jrKanjiError), val); /* ¥€¥Ë¥·¥ã¥é¥€¥º€ÇŒºÇÔ€·€¿Ÿì¹ç¡£ (on initialization failure) */ return Fcons (Qnil, val); } ＠＠ -477,16 +472,20 ＠＠ This cause to write miscellaneous inform ()) { Lisp_Object val; - unsigned char **p; + char **p; + char **warning = (char **) 0; - jrKanjiControl (0, KC_FINALIZE, (char *)&warning); + jrKanjiControl (0, KC_FINALIZE, (char *) &warning); val = Qnil; if (warning) { - for (p = (unsigned char**) warning ; *p ; p++) + for (p = warning ; *p; p++) { - val = Fcons (make_string (*p, strlen ((const char *) *p)), val); + /* !!#### This is almost certainly wrong; `canna-initialize + starts at the end of the warnings so the resulting list is + in the correct order. We should do the same. */ + val = Fcons (build_euc_string (*p), val); } } val = Fcons (val, Qnil); ＠＠ -501,21 +500,11 ＠＠ Register Kanji words into kana-to-kanji { jrKanjiStatusWithValue ksv; jrKanjiStatus ks; -#ifdef CANNA_MULE - unsigned char cbuf[4096]; -#endif CHECK_STRING (str); ksv.buffer = (unsigned char *) key_buffer; ksv.bytes_buffer = KEYTOSTRSIZE; -#ifndef CANNA_MULE - ks.echoStr = XSTRING_DATA (str); - ks.length = XSTRING_LENGTH (str); -#else /* CANNA_MULE */ - m2c (XSTRING_DATA (str), XSTRING_LENGTH (str), cbuf); - ks.echoStr = cbuf; - ks.length = strlen ((const char *) cbuf); -#endif /* CANNA_MULE */ + LISP_STRING_TO_SIZED_EXTERNAL (str, ks.echoStr, ks.length, Qeuc_jp); ksv.ks = &ks; jrKanjiControl (0, KC_DEFINEKANJI, (char *)&ksv); return storeResults (key_buffer, ksv.val, ksv.ks); ＠＠ -577,17 +566,13 ＠＠ Store yomi characters as a YOMI of kana- { jrKanjiStatusWithValue ksv; jrKanjiStatus ks; + Extbyte *ext; CHECK_STRING (yomi); -#ifndef CANNA_MULE - strncpy (key_buffer, XSTRING_DATA (yomi), XSTRING_LENGTH (yomi)); - ks.length = XSTRING_LENGTH (yomi); - key_buffer[ks.length] = '\0'; -#else /* CANNA_MULE */ - m2c (XSTRING_DATA (yomi), XSTRING_LENGTH (yomi), - (unsigned char *) key_buffer); + LISP_STRING_TO_EXTERNAL (yomi, ext, Qeuc_jp); + strncpy (key_buffer, ext, sizeof (key_buffer)); + key_buffer[sizeof (key_buffer) - 1] = '\0'; ks.length = strlen (key_buffer); -#endif /* CANNA_MULE */ if (NILP (roma)) { ＠＠ -596,17 +581,11 ＠＠ Store yomi characters as a YOMI of kana- else { CHECK_STRING (roma); - -#ifndef CANNA_MULE - strncpy (key_buffer + XSTRING_LENGTH (yomi) + 1, XSTRING_DATA (roma), - XSTRING_LENGTH (roma)); - key_buffer[XSTRING_LENGTH (yomi) + 1 + XSTRING_LENGTH (roma)] = '\0'; - ks.mode = (unsigned char *)(key_buffer + XSTRING_LENGTH (yomi) + 1); -#else /* CANNA_MULE */ - ks.mode = (unsigned char *)(key_buffer + ks.length + 1); - m2c (XSTRING_DATA (roma), XSTRING_LENGTH (roma), - (unsigned char *) ks.mode); -#endif /* CANNA_MULE */ + LISP_STRING_TO_EXTERNAL (roma, ext, Qeuc_jp); + ks.mode = (unsigned char *) (key_buffer + ks.length + 1); + strncpy (key_buffer + ks.length + 1, ext, + sizeof (key_buffer) - ks.length - 1); + key_buffer[sizeof (key_buffer) - 1] = '\0'; } ks.echoStr = (unsigned char *) key_buffer; ＠＠ -653,24 +632,21 ＠＠ Parse customize string. (str)) { Lisp_Object val; - unsigned char **p; + Extbyte **p; int n; + Extbyte *ext; CHECK_STRING (str); - -#ifndef CANNA_MULE - strncpy (key_buffer, XSTRING_DATA (str), XSTRING_LENGTH (str)); - key_buffer[XSTRING_LENGTH (str)] = '\0'; -#else /* CANNA_MULE */ - m2c (XSTRING_DATA (str), XSTRING_LENGTH (str), (unsigned char *) key_buffer); -#endif /* CANNA_MULE */ - p = (unsigned char**) key_buffer; + LISP_STRING_TO_EXTERNAL (str, ext, Qeuc_jp); + strncpy (key_buffer, ext, sizeof (key_buffer)); + key_buffer[sizeof (key_buffer) - 1] = '\0'; + p = (Extbyte **) key_buffer; n = jrKanjiControl (0, KC_PARSE, (char *) &p); val = Qnil; while (n > 0) { n--; - val = Fcons (make_string (p[n], strlen ((const char *) p[n])), val); + val = Fcons (build_euc_string (p[n]), val); } return val; } ＠＠ -683,7 +659,7 ＠＠ Get current mode string. char buf[256]; jrKanjiControl (0, KC_QUERYMODE, buf); - return make_string ((unsigned char *) buf, strlen (buf)); + return build_euc_string (buf); } /* ＠＠ -740,23 +716,20 ＠＠ Clause separator is set. (yomi)) { int nbun; + Extbyte *ext; CHECK_STRING (yomi); if (confirmContext () == 0) { return Qnil; } -#ifndef CANNA_MULE - strncpy (yomibuf, XSTRING_DATA (yomi), XSTRING_LENGTH (yomi)); - yomibuf[XSTRING_LENGTH (yomi)] = '\0'; - nbun = RkBgnBun (IRCP_context, XSTRING_DATA (yomi), XSTRING_LENGTH (yomi), - (RK_XFER << RK_XFERBITS) | RK_KFER); -#else /* CANNA_MULE */ - m2c (XSTRING_DATA (yomi), XSTRING_LENGTH (yomi), yomibuf); - nbun = RkBgnBun (IRCP_context, (char *) yomibuf, - strlen ((const char *) yomibuf), + + LISP_STRING_TO_EXTERNAL (yomi, ext, Qeuc_jp); + strncpy ((char *) yomibuf, ext, sizeof (yomibuf)); + yomibuf[sizeof (yomibuf) - 1] = '\0'; + + nbun = RkBgnBun (IRCP_context, yomibuf, strlen ((char *) yomibuf), (RK_XFER << RK_XFERBITS) | RK_KFER); -#endif /* CANNA_MULE */ return kanjiYomiList (IRCP_context, nbun); } ＠＠ -765,7 +738,7 ＠＠ static Lisp_Object kanjiYomiList (int context, int nbun) { Lisp_Object val, res = Qnil; - unsigned char RkBuf[RKBUFSIZE]; + UExtbyte RkBuf[RKBUFSIZE]; int len, i, total; for (i = nbun ; i > 0 ; ) ＠＠ -773,9 +746,9 ＠＠ kanjiYomiList (int context, int nbun) i--; RkGoTo (context, i); len = RkGetKanji (context, RkBuf, RKBUFSIZE); - val = make_string (RkBuf, len); + val = make_euc_string (RkBuf, len); len = RkGetYomi (context, RkBuf, RKBUFSIZE); - res = Fcons (Fcons (val, make_string (RkBuf, len)), res); + res = Fcons (Fcons (val, make_euc_string (RkBuf, len)), res); if (i < RKBUFSIZE / 2) { kugiri[i] = len; ＠＠ -796,7 +769,7 ＠＠ Return the list of candidates. (bunsetsu)) { int i, slen, len; - unsigned char *p, RkBuf[RKBUFSIZE]; + UExtbyte *p, RkBuf[RKBUFSIZE]; Lisp_Object res = Qnil; CHECK_INT (bunsetsu); ＠＠ -809,14 +782,14 ＠＠ Return the list of candidates. p = RkBuf; for (i = 0 ; i < len ; i++) { - slen = strlen ((const char *) p); + slen = strlen ((char *) p); if (NILP(res)) { - res = Fcons (make_string (p, slen), Qnil); + res = Fcons (make_euc_string (p, slen), Qnil); } else { - XCDR (res) = Fcons (make_string (p, slen), Qnil); + XCDR (res) = Fcons (make_euc_string (p, slen), Qnil); } p += slen + 1; } ＠＠ -1104,6 +1077,8 ＠＠ syms_of_canna_api (void) DEFSUBR (Fcanna_henkan_kakutei); DEFSUBR (Fcanna_henkan_end); DEFSUBR (Fcanna_henkan_quit); + + DEFSYMBOL (Qeuc_jp); } void ＠＠ -1850,84 +1825,10 ＠＠ unload_canna_api (void) #endif #ifdef CANNA_MULE -/* To handle MULE internal code and EUC. - I assume CANNA can handle only Japanese EUC. */ - -/* EUC multibyte string to MULE internal string */ - -static void -c2mu (unsigned char *cp, int l, unsigned char *mp) -{ - unsigned char ch, *ep = cp+l; - - while ((cp < ep) && (ch = *cp)) - { - if ((unsigned char) ch == ISO_CODE_SS2) - { - *mp++ = LEADING_BYTE_KATAKANA_JISX0201; - cp++; - } - else if ((unsigned char) ch == ISO_CODE_SS3) - { - *mp++ = LEADING_BYTE_JAPANESE_JISX0212; - cp++; - *mp++ = *cp++; - } - else if (ch & 0x80) - { - *mp++ = LEADING_BYTE_JAPANESE_JISX0208; - *mp++ = *cp++; - } - *mp++ = *cp++; - } - *mp = 0; -} - -/* MULE internal string to EUC multibyte string */ - -static void -m2c (unsigned char *mp, int l, unsigned char *cp) -{ - unsigned char ch, *ep = mp + l; - - while ((mp < ep) && (ch = *mp++)) - { - switch (ch) - { - case LEADING_BYTE_KATAKANA_JISX0201: - *cp++ = ISO_CODE_SS2; - *cp++ = *mp++; - break; - case LEADING_BYTE_JAPANESE_JISX0212: - *cp++ = ISO_CODE_SS3; - case LEADING_BYTE_JAPANESE_JISX0208: - *cp++ = *mp++; - *cp++ = *mp++; - break; - default: - *cp++ = ch; - break; - } - } - *cp = 0; -} - -#undef make_string - -/* make_string after converting EUC string to MULE internal string */ -static Lisp_Object -mule_make_string (unsigned char *p, int l) -{ - unsigned char cbuf[4096]; - - c2mu (p,l,cbuf); - return (make_string (cbuf, strlen ((const char *) cbuf))); -} -/* return the MULE internal string length of EUC string */ -/* Modified by sb to return a character count not byte count. */ +/* Return the number of characters in an EUC-JP string. */ static int -mule_strlen (unsigned char *p, int l) +euc_jp_num_chars (unsigned char *p, int l) { unsigned char ch, *cp = p; int len = 0;

1 participants
0 comments

CVS update by viteno xemacs ... 19 years, 1 month

CVS Monitor

User: viteno Date: 05/11/15 23:50:51 Modified: xemacs version.sh Log: Update xemacs_extra_name. Revision Changes Path 1.1345 +1 -1 XEmacs/xemacs/version.sh Index: version.sh =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/version.sh,v retrieving revision 1.1344 retrieving revision 1.1345 diff -u -p -r1.1344 -r1.1345 --- version.sh 2005/11/14 22:51:20 1.1344 +++ version.sh 2005/11/15 22:50:50 1.1345 ＠＠ -8,5 +8,5 ＠＠ emacs_kit_version= infodock_major_version=4 infodock_minor_version=0 infodock_build_version=8 -xemacs_extra_name="(+CVS-20051114)" +xemacs_extra_name="(+CVS-20051115)" xemacs_release_date="2005-10-26"

1 participants
0 comments

CVS update by michaelk packages/xemacs-packages/viper, ChangeLog ... 19 years, 1 month

CVS Monitor

User: michaelk Date: 05/11/15 19:53:50 Modified: packages/xemacs-packages/viper viper.el viper-util.el ChangeLog Log: * viper-utils (viper-non-word-characters-reformed-vi): quote `-' in string. * viper.el (viper-emacs-state-mode-list): Ensure that rcirc-mode buffers come up in Emacs state. Revision Changes Path 1.35 +2 -0 XEmacs/packages/xemacs-packages/viper/viper.el Index: viper.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/viper/viper.el,v retrieving revision 1.34 retrieving revision 1.35 diff -u -p -r1.34 -r1.35 --- viper.el 2005/11/04 05:48:13 1.34 +++ viper.el 2005/11/15 18:53:49 1.35 ＠＠ -440,6 +440,8 ＠＠ widget." Buffer-menu-mode compilation-mode + rcirc-mode + view-mode vm-mode vm-summary-mode) 1.25 +5 -1 XEmacs/packages/xemacs-packages/viper/viper-util.el Index: viper-util.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/viper/viper-util.el,v retrieving revision 1.24 retrieving revision 1.25 diff -u -p -r1.24 -r1.25 --- viper-util.el 2005/09/20 17:58:30 1.24 +++ viper-util.el 2005/11/15 18:53:49 1.25 ＠＠ -1242,8 +1242,12 ＠＠ the `Local variables' section of a file. ;; Characters that should not be considered as part of the word, in reformed-vi ;; syntax mode. +;; Note: \\ (quoted \) must appear before `-' because this string is listified +;; into characters at some point and then put back to string. The result is +;; used in skip-chars-forward, which treats - specially. Here we achieve the +;; effect of quoting - and preventing it from being special. (defconst viper-non-word-characters-reformed-vi - "!＠#$%^&*()-+=|\\~`{}[];:'\",<.>/?") + "!＠#$%^&*()\\-+=|\\~`{}[];:'\",<.>/?") ;; These are characters that are not to be considered as parts of a word in ;; Viper. ;; Set each time state changes and at loading time 1.68 +8 -0 XEmacs/packages/xemacs-packages/viper/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/viper/ChangeLog,v retrieving revision 1.67 retrieving revision 1.68 diff -u -p -r1.67 -r1.68 --- ChangeLog 2005/11/07 21:44:56 1.67 +++ ChangeLog 2005/11/15 18:53:49 1.68 ＠＠ -1,3 +1,11 ＠＠ +2005-11-15 Michael Kifer <kifer(a)cs.stonybrook.edu> + + * viper-utils (viper-non-word-characters-reformed-vi): quote `-' in + string. + + * viper.el (viper-emacs-state-mode-list): Ensure that + rcirc-mode buffers come up in Emacs state. + 2005-11-07 Norbert Koch <viteno(a)xemacs.org> * Makefile (VERSION): XEmacs package 1.45 released.

1 participants
0 comments

CVS update by michaelk packages/xemacs-packages/ediff ... 19 years, 1 month

CVS Monitor

User: michaelk Date: 05/11/15 19:51:36 Modified: packages/xemacs-packages/ediff ediff-util.el ChangeLog Log: * ediff-util (ediff-make-temp-file): use proper file-name-handler operation Revision Changes Path 1.31 +1 -1 XEmacs/packages/xemacs-packages/ediff/ediff-util.el Index: ediff-util.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/ediff/ediff-util.el,v retrieving revision 1.30 retrieving revision 1.31 diff -u -p -r1.30 -r1.31 --- ediff-util.el 2005/11/04 05:43:37 1.30 +++ ediff-util.el 2005/11/15 18:51:35 1.31 ＠＠ -3173,7 +3173,7 ＠＠ Hit \\[ediff-recenter] to reset the wind (setq f (concat ediff-temp-file-prefix p) short-f (concat ediff-temp-file-prefix short-p) f (cond (given-file) - ((find-file-name-handler f 'find-file-noselect) + ((find-file-name-handler f 'insert-file-contents) ;; to thwart file handlers in write-region, e.g., if file ;; name ends with .Z or .gz ;; This is needed so that patches produced by ediff will 1.94 +5 -0 XEmacs/packages/xemacs-packages/ediff/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/ediff/ChangeLog,v retrieving revision 1.93 retrieving revision 1.94 diff -u -p -r1.93 -r1.94 --- ChangeLog 2005/11/07 21:44:27 1.93 +++ ChangeLog 2005/11/15 18:51:36 1.94 ＠＠ -1,3 +1,8 ＠＠ +2005-11-15 Michael Kifer <kifer(a)cs.stonybrook.edu> + + * ediff-util (ediff-make-temp-file): use proper file-name-handler + operation + 2005-11-07 Norbert Koch <viteno(a)xemacs.org> * Makefile (VERSION): XEmacs package 1.57 released.

1 participants
0 comments

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

xemacs-cvs November 2005