comparison lisp/startup.el @ 502:7039e6323819

[xemacs-hg @ 2001-05-04 22:41:46 by ben] ----------------------- byte-comp warning fixes ----------------- New functions for cleanly eliminating byte-compiler warnings. Their definitions require no changes at all in bytecomp.el, meaning that any package that wants to use them and be compatible with older versions of XEmacs need only copy the code and rename the functions (i.e. prefix them with the package name). Eliminate byte-compiler warnings using the new functions in bytecomp-runtime.el. Move coding-system-put,get,category, since they're not Mule-specific and are used in prefer-coding-system. font.el was incredibly ugly. Clean it up. Avoid using defsubst for any exported functions, to avoid possible compatibility problems if we later change the internal interface. (It happened before, with face accessors, between 19.8 and 19.9). Fix tons of warnings. Clean up (new function gpm-is-supported-p eliminates duplicate code in gpm-create/delete-device-hook) and eliminate warnings. ---------- make byte-recompile-directory work in the --------- core `lisp' dir, even in the absence of a Mule XEmacs (i.e. make it skip the Mule files rather than trying to compile them). now you should be able to do `touch *.el' in the `lisp' dir, then M-x byte-recompile-directory, and get no warnings. Avoid trying to compile Mule files in byte-recompile-directory when we're not in a Mule XEmacs, since we're highly likely to get syntax errors. Add a coding-system cookie to all Mule files so that byte-recompile-directory ignores them. Magic cookie function moved to files.el from code-files.el (for use by bytecomp even in a non-coding-system XEmacs), and changed names and semantics for use by bytecomp. NOTE: IMO this is an internal function that we can change as we like (and there is absolutely no code anywhere else using the function). ---------------- GUI improvements: menus, help ------------------- Rearrange order of keymap declarations to be alphabetical. Improve help on help to include all bindings, and group by category. Add bindings for new Info commands. Remove warnings. Use command-hyper-apropos in place of command-apropos. Add a function to do the equivalent of command-apropos. Evals its help-text argument so you can put expressions there. Used now by help-for-help. Add binding to continue text searches. Expand index searches to work over multiple info documents. Add commands to search text/index in User and Lispref. Add new entry, "Uncomment Region" (parallels "Comment Out Region"). Redo Help menu; add bindings for new Info commands to search the index or text of the User and Lispref manuals. Add command for mark-paragraph, activate-region. Make Edit->R accelerator be rectangle, not register (more commonly used), and put rectangle first. Fix the Edit Init File entry to never load the .elc file. Simplify the default-popup-menu. Add Cmds->Tabs menu. Use kp-left not kp_left, etc. ---------------- Miscellaneous bug fixes/cleanup ------------------- byte-compiler-options: Correct doc string. easy-menu-do-define: fix extra quote. fill-paragraph-or-region:Rewrite to be more correct -- use call-interactively so that we always get exactly the same behavior as if the functions were called directly. No need to fiddle with zmacs-region-stays, now that bogus clearing of it (2001-04-28 src/ChangeLog) is removed. Put dialog titles back in -- this time correctly. Fix various other problems with leaks and such. key-sequence-list-description: Clean up fun to always correctly canonicalize. Clean up Kinsoku comments, synch comment-region with FSF 20.7. * simple.el (region-exists-p): * simple.el (region-active-p): Add comment about which one is correct to use in menu specs. * sound.el (load-sound-file): Minor code clean up. * startup.el: * startup.el (command-line-early): * startup.el (initial-scratch-message): Comment changes. Add info about sample.init.el to splash screen. Improve initial-scratch-message and clarify purpose of Scratch buffer. Fix byte-compile warning. ------------------------ Added features ------------------------- Add new variable to control whether etags checks all parent directories for tag files. (On by default.) * hash-table.el: New file, useful utility functions. * dumped-lisp.el (preloaded-file-list): Dump hash-table.el. ------------ notable bug fix: Windows event code -------------- Get critical quit working. ------------ notable bug fix and new feature: regex code -------------- Shy groups were implemented in a horrible, half-assed way that would cause them to screw up regex searching in most cases. Fixed to work correctly. Also extended back-reference syntax past 9. Only is recognized as such if there are at least that many non-shy groups; and optionally will warn about such uses, to catch old code that might be using them differently. (Added variable to control this in search.c -- `warn-about-possibly-incompatible-back- references', on by default for the moment. Declared in lisp.h. ---------------- process/SIGIO improvements ------------------- define USE_GETADDRINFO to replace more complex conditional, and use it. the code conditionalized on this in unix_open_network_stream had *serious* problems handling errors. it's now fixed, and major amounts of duplicate code between the two versions were combined. don't disable SIGIO and other interrupts unless CONNECT_NEEDS_SLOWED_INTERRUPTS is defined -- don't penalize OS's without bugs. similarly for a freebsd bug that was affecting all OS's. * s\ultrix.h: define CONNECT_NEEDS_SLOWED_INTERRUPTS, since that's the OS mentioned as having a kernel bug. * sysdep.c (request_sigio_on_device): * sysdep.c (unrequest_sigio_on_device): fix SIGIO problems on Linux. add check for O_ASYNC in case it's defined and FASYNC isn't. add comment about other ways to do SIGIO on Linux. * callproc.c (Fold_call_process_internal): * process.c (Fstart_process_internal): Deal with the possibility that `default-directory' doesn't have terminating slash. Correct comments about vfork. ---------------- Miscellaneous bug fixes/cleanup ------------------- * callint.c (Finteractive): Add lots of documentation -- exactly what the Lisp equivalents of all the interactive specs are. * console.h (struct console): change type of quit_char to Emchar. * event-msw.c (lstream_type_create_mswindows_selectable): spacing change. Eliminate events-mod.h and combine into events.h. * emacs.c: * emacs.c (make_arg_list_1): * emacs.c (main_1): A couple of char->Extbyte changes, add a comment. * glyphs-msw.c: Correct indentation of function defns to not exceed 80 cols. Try (sort of) to fix some code that sets the colors of the progress gauge. (Commented out) * keymap.c (syms_of_keymap): use DEFSYMBOL. * process.c (read_process_output): No need to fiddle with zmacs_region_stays, now that bogus clearing of it (see below) is removed. * search.c (Freplace_match): warning fix.
author ben
date Fri, 04 May 2001 22:42:35 +0000
parents 54fa1a5c2d12
children ef4d2466a29c
comparison
equal deleted inserted replaced
501:0a255b32b157 502:7039e6323819
28 28
29 ;;; Commentary: 29 ;;; Commentary:
30 30
31 ;; This file is dumped with XEmacs. 31 ;; This file is dumped with XEmacs.
32 32
33 ;; -batch, -t, and -nw are processed by main() in emacs.c and are 33 ;; It handles the all aspects of startup once the C code has finished
34 ;; never seen by lisp code. 34 ;; initializing itself. Entry from C is through the function set in
35 35 ;; the `top-level' variable, which is normally `normal-top-level'. At
36 ;; -version and -help are special-cased as well: they imply -batch, 36 ;; the point that `normal-top-level' has been invoked:
37 ;; but are left on the list for lisp code to process. 37 ;;
38 ;; (1) the dumped Elisp files are available. Either they were loaded
39 ;; during this invocation of temacs and it was then converted to
40 ;; XEmacs using the run-temacs mechanism, or (more likely) the
41 ;; loadup and dumping occurred at some point in the past and we
42 ;; just read in the dumped data.
43 ;;
44 ;; (2) All C subsystems have been initialized.
45 ;;
46 ;; (3) A "stream" device has been created, which does I/O over stdin
47 ;; and stdout. This is the only device we have available and our
48 ;; only means of communication, other than disk files.
49 ;;
50 ;; (4) The command-line arguments have been sorted according to
51 ;; priority specs (this implies that the names of all arguments
52 ;; must be hard-coded into emacs.c), and certain low-level
53 ;; arguments such as -sd, -t, -nd, -nw, -batch, etc. have been
54 ;; processed by main_1() and removed. (NOTE: main_1() is the name
55 ;; in the source code, but in the object file it has some other
56 ;; name, such as xemacs_21_2_34_mips_sgi_irix6().) Certain other
57 ;; arguments such as -version and -help are partially-processed,
58 ;; triggering some special behavior but being left on the list for
59 ;; further processing by the Lisp code.
60 ;;
61 ;; The job of the code here is to process the remaining command-line
62 ;; args, set up the various paths, locate where all the packages are
63 ;; and set things up for them (initialize the load path, read in the
64 ;; autoloads, etc.), read in the init files, display the splash
65 ;; screen, and set up any remaining environment-dependent variables.
38 66
39 ;;; Code: 67 ;;; Code:
40 68
41 (setq top-level '(normal-top-level)) 69 (setq top-level '(normal-top-level))
42 70
563 ((or (string= arg "--") (string= arg "-")) 591 ((or (string= arg "--") (string= arg "-"))
564 (while args 592 (while args
565 (push (pop args) new-args))) 593 (push (pop args) new-args)))
566 (t (push arg new-args)))) 594 (t (push arg new-args))))
567 595
568 (setq init-file-user (and load-user-init-file-p "")) 596 (with-obsolete-variable 'init-file-user
597 (setq init-file-user (and load-user-init-file-p "")))
569 598
570 (nreverse new-args))) 599 (nreverse new-args)))
571 600
572 (defconst initial-scratch-message "\ 601 (defconst initial-scratch-message "\
573 ;; This buffer is for notes you don't want to save, and for Lisp evaluation. 602 ;; This buffer is for notes you don't want to save, and for Lisp evaluation.
574 ;; If you want to create a file, first visit that file with C-x C-f, 603 ;; If you want to create a file, first visit that file with C-x C-f,
575 ;; then enter the text in that file's own buffer. 604 ;; then enter the text in that file's own buffer. (C-x is the standard
605 ;; XEmacs abbreviation for `Control+X', i.e. hold down the Control key
606 ;; while hitting the X key.)
607 ;;
608 ;; For Lisp evaluation, type an expression, move to the end and hit C-j.
576 609
577 " 610 "
578 "Initial message displayed in *scratch* buffer at startup. 611 "Initial message displayed in *scratch* buffer at startup.
579 If this is nil, no message will be displayed.") 612 If this is nil, no message will be displayed.")
580 613