Re: jit-lock doesn't honor font-lock-lines-before
I suggest the patch below, which also sets the default value to 0: except for some special modes which rely on font-lock-lines-before (and which should thus set it explicitly to an appropriate value), setting it to something more than 0 will just waste CPU. If you change the default to 0, would you please modify C mode to set it to 1? ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: [PATCH] intro.texi
Many of your suggested changes are good; I will comment on the ones that I don't plan to use. ! In Lisp, the symbol @[EMAIL PROTECTED] has three separate meanings: it is a symbol with the name @samp{nil}; it is the logical truth value We don't write @dfn around @code. @cindex documentation notation + @cindex notation, evaluation + @cindex notation, documentation Having two index entries in the same place that start with the same word is redundant; it would be better to add @cindex notation Examples in this manual indicate printed text with @[EMAIL PROTECTED], irrespective of where that text goes. The value returned by ! evaluating the form (here @code{bar}) follows on a separate line with ! @[EMAIL PROTECTED] @example @group --- 264,271 Examples in this manual indicate printed text with @[EMAIL PROTECTED], irrespective of where that text goes. The value returned by ! evaluating the form (in the example below: @code{bar}) follows on a ! separate line with @[EMAIL PROTECTED] Using here is conventional, so it is good enough. @defvar emacs-major-version The major version number of Emacs, as an integer. For Emacs version ! 20.3, the value is @code{20}. We don't write @code around values that are numbers. It looks better not to do so. ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: jit-lock doesn't honor font-lock-lines-before
Would that be bad? It would slow down editing long lines. jit-lock is supposed to make editing faster. That would be bad if the slowdown is substantial. But we need to see if it is substantial in order to see if it is bad. ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: recentf.el - digit shortcuts
Hi Karl, Here is a patch that adds shortcut keys and corresponding labels to recentf-dialog-mode (the mode that `recentf-open-files' uses). The variable `recentf-dialog-show-labels-p' controls whether labels are displayed, and could default to nil. I've been using this functionality for a long time and find it indispensable. However, defadvice is brittle and I had to rewrite it every time recentf changed. I hope this feature is suitable for installing. This is a good idea! However your implementation fails when items are grouped into sub-menus in the `recentf-open-files' dialog. Attached is a reworked patch which fixes that bug, plus some minor cleanups. Could you try it please. If it works as you expect I could commit it if there is no objection from the other developers. Thanks! David Index: lisp/recentf.el === RCS file: /cvsroot/emacs/emacs/lisp/recentf.el,v retrieving revision 1.42 diff -c -r1.42 recentf.el *** lisp/recentf.el 6 Aug 2005 22:13:43 - 1.42 --- lisp/recentf.el 2 Sep 2005 08:16:10 - *** *** 259,264 --- 259,272 :group 'recentf :type '(choice (const :tag None nil) function)) + + (defcustom recentf-show-file-shortcuts-flag t + Whether to show ``[N]'' for the Nth item up to 10. + If non-nil, `recentf-open-files' will show labels for keys that can be + used as shortcuts to open the Nth file. + :group 'recentf + :type 'boolean) + ;;; Utilities ;; *** *** 349,355 Convert filename NAME to absolute, and canonicalize it. See also the function `expand-file-name'. If defined, call the function `recentf-filename-handler' ! to postprocess the canonical name. (let* ((filename (expand-file-name name))) (or (and recentf-filename-handler (funcall recentf-filename-handler filename)) --- 357,363 Convert filename NAME to absolute, and canonicalize it. See also the function `expand-file-name'. If defined, call the function `recentf-filename-handler' ! to post process the canonical name. (let* ((filename (expand-file-name name))) (or (and recentf-filename-handler (funcall recentf-filename-handler filename)) *** *** 926,931 --- 934,942 (set-keymap-parent km widget-keymap) (define-key km q 'recentf-cancel-dialog) (define-key km [down-mouse-1] 'widget-button-click) + ;; Keys in reverse order of appearence in help. + (dolist (k '(O 9 8 7 6 5 4 3 2 1)) + (define-key km k 'recentf-open-file-with-key)) km) Keymap used in recentf dialogs.) *** *** 1063,1068 --- 1074,1084 (kill-buffer (current-buffer)) (funcall recentf-menu-action (widget-value widget))) + ;; File counter while building the `recentf-open-files' dialog. + (defvar recentf--file-count nil) + ;; List of files associated to a digit shortcut key. + (defvar recentf--files-with-key nil) + (defun recentf-open-files-item (menu-element) Return a widget to display MENU-ELEMENT in a dialog buffer. (if (consp (cdr menu-element)) *** *** 1076,1083 ,@(mapcar 'recentf-open-files-item (cdr menu-element))) ;; Represent a single file with a link widget `(link :tag ,(car menu-element) !:button-prefix :button-suffix :button-face default :format %[%t%]\n --- 1092,1108 ,@(mapcar 'recentf-open-files-item (cdr menu-element))) ;; Represent a single file with a link widget + ;; Use digit shortcuts for the first ten files. + (setq recentf--file-count (+ 1 recentf--file-count)) + (unless ( recentf--file-count 10) + (push (cdr menu-element) recentf--files-with-key)) `(link :tag ,(car menu-element) !:button-prefix ,(if recentf-show-file-shortcuts-flag !(if ( recentf--file-count 10) ! ! (format [%d] ! (% recentf--file-count 10))) ! ) :button-suffix :button-face default :format %[%t%]\n *** *** 1093,1116 use for the dialog. It defaults to \*`recentf-menu-title'*\. (interactive) (recentf-dialog (or buffer-name (format *%s* recentf-menu-title)) ! (widget-insert Click on a file to open it. Click on Cancel or type `q' to cancel.\n ) ;; Use a LF that looks like the recentf menu. (tree-widget-set-theme folder) (apply 'widget-create `(group :indent 2 :format \n%v\n ! ,@(mapcar 'recentf-open-files-item !(recentf-apply-menu-filter ! recentf-menu-filter !
(add-hook 'font-lock-mode-hook ...) keeps adding to font-lock-keywords
For a long time I've been using the simple show-tabs function below. With CVS emacs I've noticed now that the same element gets appended to global font-lock-keywords over and over again. 1. emacs -Q 2. M-x global-font-lock-mode 3. in scratch buffer evaluate the following 2 expressions: (defun show-tabs () Show tabs with a slightly changed background (setq font-lock-keywords (append font-lock-keywords '(([\t]+ (0 'tab-face t)) (add-hook 'font-lock-mode-hook 'show-tabs) 4. in scratch buffer: C-h v font-lock-keywords Local in buffer *scratch*; global value is (([]+ (0 'tab-face t))) 5. every C-h v font-lock-keywords adds one more entry to global font-lock-keywords Value: (t (([ ]+ (0 'tab-face t))) ([]+ (0 'tab-face t))) Moreover if I load e.g. a text file, then C-h v in that buffer will give me something like: Value: (t (([ ]+ (0 'tab-face t))) ([]+ (0 'tab-face t))) Local in buffer x.txt; global value is (([]+ (0 'tab-face t)) ([]+ (0 'tab-face t)) ([]+ (0 'tab-face t)) ([]+ (0 'tab-face t)) ([]+ (0 'tab-face t))) -- -- | Klaus Zeitler Lucent Technologies | | Email: [EMAIL PROTECTED] | -- --- Why bother building any more nuclear warheads until we use the ones we have? ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: jit-lock doesn't honor font-lock-lines-before
The default setting of font-lock-lines-before makes it a nop (as it should). Major modes which rely on it should set it to the appropriate value. You should modify the corresponding entry in the Elisp manual too. ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
RE: patch for woman (woman-topic-at-point)
From: Richard M. Stallman [mailto:[EMAIL PROTECTED] Sent: Sunday 28 August 2005 3:45 am To: Emilio Lopes Cc: Dr Francis J Wright; emacs-devel@gnu.org Subject: Re: patch for woman (woman-topic-at-point) It follows from the above that if you want to offer some suggestion using the argument DEF of `completing-read' the suggestion must be valid. Ok, so test it for validity and provide it as a default only if it is valid. I see that's what your latest patch does. I have not checked it line by line, but it looks like the right overall. Francis, do you agree? I haven't checked the details either, but I'm happy with the principle of this patch. Francis ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: ispell/aspell problem
Stefan Monnier [EMAIL PROTECTED] writes: I have the following backtrace when I try to change the dictionary. The error comes from the fact that Emacs runs ispell dicts rather than aspell dicts. The same kind of problem appears in ispell-get-aspell-config-value where we also run ispell-program-name which may be ispell rather than aspell. So the ispell command being run is actually aspell? Which version? The default value for ispell-program-name should find the real aspell... Magnus ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
(no subject)
Can u believe it that we will make you [EMAIL PROTECTED] ? / I @ G ® A ! ! ! $o.87 Per D0$E!!! YOu just will bring back some romantic moments that u lost in past! Refresh your B0DY! Just get our medicine and u`ll fill the difference between the life ur living now and between the life with /!AGRA # You can order V1AG®A, C`ial1s and other best [EMAIL PROTECTED] HE®E! ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: tiny patch to ange-ftp
Now I'm able to do things by setting `ange-ftp-send-hash' as nil and modifying `ange-ftp-insert-directory' slightly. However, I'm not satisfied with it. Though I'm making an effort at another work now, I'm going to tackle it again in the near future. It will be completed if the problem of which hash mark printing breaks the synchronous operation is solved. I'm currently using ange-ftp.el which corrected as follows: Your patch looks like a good first step. I would check `full' rather than (file-name-directory file) in order to determine whether to do a full dir listing or to extract a single line. Also I hoped that we would be able to use the cache so as to avoid doing the full-listing+extract-line thingy repeatedly. Using ange-ftp-get-files should do the trick here. But that can be changed later on. Given that this fixes the problem mentioned in ange-ftp-send-cmd and should be orthogonal to the problem of hash marks, I suggest we install your patch. Any objections? Stefan *** ange-ftp.el~ Thu Aug 11 21:55:21 2005 --- ange-ftp.el Thu Sep 1 23:08:06 2005 *** *** 4498,4504 (if wildcard (let ((default-directory (file-name-directory file))) (ange-ftp-ls (file-name-nondirectory file) switches nil nil t)) ! (ange-ftp-ls file switches full (ange-ftp-real-insert-directory file switches wildcard full (defun ange-ftp-dired-uncache (dir) --- 4498,4519 (if wildcard (let ((default-directory (file-name-directory file))) (ange-ftp-ls (file-name-nondirectory file) switches nil nil t)) ! ;; That `file' doesn't have directory components means we're ! ;; going to do `ls' for a single file in the current directory. ! (if (file-name-directory file) ! (ange-ftp-ls file switches full) !;; Get a full listing of the current directory and extract !;; the line corresponding to `file'. !(when (string-match d\\' switches) ! ;; Remove d which dired added to `switches'. ! (setq switches (substring switches 0 (match-beginning 0 !(setq tem (ange-ftp-ls . switches full)) !(let ((case-fold-search nil)) ! ;; Assume the file name which a single space precedes ! ;; appears at the end of a line. ! (if (string-match (concat ^.+ (regexp-quote file) $) tem) ! (concat (match-string 0 tem) \n) !)) (ange-ftp-real-insert-directory file switches wildcard full (defun ange-ftp-dired-uncache (dir) ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: ispell/aspell problem
I have the following backtrace when I try to change the dictionary. The error comes from the fact that Emacs runs ispell dicts rather than aspell dicts. The same kind of problem appears in ispell-get-aspell-config-value where we also run ispell-program-name which may be ispell rather than aspell. So the ispell command being run is actually aspell? Which version? % ispell -v @(#) International Ispell Version 3.1.20 (but really Aspell 0.50.3) % -- Stefan PS: and BTW, I can't just upgrade it to 0.60, I'll have to wait until the syadmins upgrade the system to Fedora Core 4 in some nebulous future (they upgraded it to Fedora Core 2 last summer). ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: (add-hook 'font-lock-mode-hook ...) keeps adding to font-lock-keywords
(defun show-tabs () Show tabs with a slightly changed background (setq font-lock-keywords (append font-lock-keywords '(([\t]+ (0 'tab-face t)) (add-hook 'font-lock-mode-hook 'show-tabs) font-lock-mode-hook is called both when turning the mode ON and when turning the mode OFF. font-lock-keywords should not be modified as you do. Instead you should use font-lock-add-keywords, which knows about font-lock-compile-keywords. Stefan ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: jit-lock doesn't honor font-lock-lines-before
Would that be bad? It would slow down editing long lines. jit-lock is supposed to make editing faster. That would be bad if the slowdown is substantial. But we need to see if it is substantial in order to see if it is bad. It's probably insignificant, and it's only for those modes which set font-lock-lines-before to a non-0 value. Stefan ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
did you see me
There is this free date site filled with tons of sex-addicts. No flowers, no gifts, just meet up for action :) There are also a few who want a serious relationship though So if you want a long-termer, or a one-nighter, you got it ;) Whatever floats your boat pretty much! http://www.gigglinggals.com/extra/datingstars/ getmeoff:http://www.gigglinggals.com/extra/datingstars/getmeoff.php ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
expand-file-name problem for multibyte string.
I've just found that expand-file-name returns unibyte string when name is unibyte, ignoring whether default-directory is multibyte or not. (expand-file-name file /home/horiguti/À) = /home/horiguti/\201\300/file (expand-file-name fileÀ /home/horiguti/a) = /home/horiguti/a/fileÀ (expand-file-name fileÀ /home/horiguti/À) = /home/horiguti/À/fileÀ The cause of this is that expand-file-name uses only NAME to determine the bytewidth of the return string. But DEFAULT-DIRECTORY is also needed. Attached patch fixes the bug, but I confirmed it only on GNU/Linux and MS-Windows. -- Kyotaro HORIGUCHI --- fileio.c07 8 2005 12:33:16 +1.552 +++ fileio.c02 9 2005 16:35:19 + @@ -1299,7 +1299,8 @@ { nm = sys_translate_unix (nm); return make_specified_string (nm, -1, strlen (nm), - STRING_MULTIBYTE (name)); + STRING_MULTIBYTE (name) + || STRING_MULTIBYTE (default_directory)); } #endif /* VMS */ #ifdef DOS_NT @@ -1331,7 +1332,8 @@ if (nm == SDATA (name)) return name; return make_specified_string (nm, -1, strlen (nm), - STRING_MULTIBYTE (name)); + STRING_MULTIBYTE (name) + || STRING_MULTIBYTE (default_directory)); #endif /* not DOS_NT */ } } @@ -1709,7 +1711,8 @@ #endif /* DOS_NT */ result = make_specified_string (target, -1, o - target, - STRING_MULTIBYTE (name)); + STRING_MULTIBYTE (name) + || STRING_MULTIBYTE (default_directory)); /* Again look to see if the file name has special constructs in it and perhaps call the corresponding file handler. This is needed ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: jit-lock doesn't honor font-lock-lines-before
I suggest the patch below, which also sets the default value to 0: except for some special modes which rely on font-lock-lines-before (and which should thus set it explicitly to an appropriate value), setting it to something more than 0 will just waste CPU. If you change the default to 0, would you please modify C mode to set it to 1? I don't know where it's needed and neither do I know what's the correct place to put such a thing in CC-mode. Alan or Martin? Stefan ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: Another stuff - Pharmaceutìcal
VaAmViLeXaCeMePrUlCi libiagvinalerioptral umenratraxbrexdiaeciaamis 85686999127299648599 .45.00.85.943.45.00.96.95.55.75 http://www.discusfeder.com ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Doc string for sort does not tell direction
The doc string for sort does not tell the direction of the sort (ie ascending or descending). ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: Emacs icons
Lennart Borgman [EMAIL PROTECTED] writes: Can vector graphics be scaled to such small images Well, it's vector;) What tools are used to create the SVG files? inkscape -- Esben Stien is [EMAIL PROTECTED] s a http://www. s tn m irc://irc. b - i . e/%23contact [sip|iax]: e e jid:b0ef@n n ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: make `occur' use word at point as default
Why? There is currently a good deal of redundancy in the bindings for `next-history-element' and `previous-history-element'. These minibuffer history-list commands are bound to *FOUR PAIRS* of keys: (1) arrows [up] / [down], (2) C-n / C-p, (3) M-n / M-p, and (4) [next] / [prior]. (Well, actually, [prior] is then rebound to `switch-to-completions'.) C-n and C-p do not run these commands; they do the usual cursor motion. NEXT could conceivably be used to access another default. But I think it would be more convenient to add it to the list for C-p to access. ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: literal newlines in @result{} strings
What I mean is that printed representation of the result of evaluation (which is displayed in the echo area, or inserted into the buffer) contains a literal newline instead of `\n'. So after evaluating examples from the manual users will see different results when examples of output contain `\n' in the manual, and the real displayed output contains literal newlines. That is plausible. However, I asked people NOT to have a discussion of this, because it is not important enough to be worth the time. I made a decision in my first message on the subject. Can we please stop this discussion? ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: Beginingless paragraphs
For example, I was tearing my hair out in frustration a couple of years back, trying to get the sentence/paragraph movement and filling stuff to work properly in CC Mode. If the documentation of paragraph-start and paragraph-separate is not clear enough, we can clarify it. I doubt that this would take the form of a definition of paragraphs, though. The reason is that there is no simple definition of paragraphs at the base of the current code or these two variables. The concepts that the design is based on are the concepts that you see in the manual. The four regexps documented on this page all define chunks of natural-language text: paragraphs, pages and sentences. So how about renaming this @section something like Sentences, Paragraphs and Pages, and making the focus of the @node the definition of these things in terms of the regexps, rather than the regexps themselves? I would be glad to consider a change of this sort. ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: grep-use-null-device
I think it is the wrong fix to just ignore an error which should not occur in the first place. Rather process-send-eof should be fixed not to throw an error as long as the process is not considered dead from Emacs' point of view. That there is nobody to actually look at the eof can't be considered a problem in asynchronous operations: the consuming process can close down without waiting for an explicit eof. That is a plausible argument, but I think the current way things work is ok too. This function is not used often, and catching the error (when that's what you want) is not hard. ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
Re: Beginingless paragraphs
I disagree most strongly here. Hackers need to know how to set up paragraph-s\(tart\|eparate\) so that they can make the canonical paragraph commands behave the way they want them to. This is precisely what the Emacs Manual documents now. I think precisely is an overstatement. No it isn't. The topic that the existing text documents is precisely the topic that you asked for. If you suggest making the text clearer, that may be desirable, but it is a different issue. ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
RE: make `occur' use word at point as default
There is currently a good deal of redundancy in the bindings for `next-history-element' and `previous-history-element'. These minibuffer history-list commands are bound to *FOUR PAIRS* of keys: (1) arrows [up] / [down], (2) C-n / C-p, (3) M-n / M-p, and (4) [next] / [prior]. (Well, actually, [prior] is then rebound to `switch-to-completions'.) C-n and C-p do not run these commands; they do the usual cursor motion. You're right. My bad. NEXT could conceivably be used to access another default. But I think it would be more convenient to add it to the list for C-p to access. I don't understand the last sentence. Do you mean add the [next] key to some list? What list? Do you mean C-p or M-p? Sorry, I don't follow you here. ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel
RE: make `occur' use word at point as default
C-n and C-p ... do the usual cursor motion [in the minibuffer] I replied: You're right. My bad. I should have added that I doubt that such up and down cursor motions are very useful in the minibuffer. ___ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel