Re: Delayed redisplay problem

2006-06-15 Thread Kim F. Storm
Jorgen Schaefer [EMAIL PROTECTED] writes:

 Hi there!
 Since 2006-06-13, my Emacs behaved weirdly using Circe (an IRC
 client). Text inserted due to network activity causes other text
 to be moved, but the new text is not shown. Hitting any key will
 show the text.

Does
 M-: (setq redisplay-preemption-period nil) RET
help?


 This behavior got less frequent with the patch of 2006-06-14, but
 it still occurs.

That sounds a bit strange...


In any case, it would help if you could try to reproduce the
problem starting from emacs -Q, i.e. without loading anything
but Circe, and see if the problem persists.

-- 
Kim F. Storm [EMAIL PROTECTED] http://www.cua.dk



___
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug


Re: pyhon mode indentation problem

2006-06-15 Thread joakim
[EMAIL PROTECTED] writes:

I tried this on an emacs from 20060407, and the problem doesnt exist
there, it seems.

I also tried using the new python.el file in the older emacs, and the
problem didnt appear, so I would then assume the problem stems from
some change in some other part of emacs, and not python.el.



 Please write in English if possible, because the Emacs maintainers
 usually do not have translators to read other languages for them.

 Your bug report will be posted to the emacs-pretest-bug@gnu.org mailing list.

 Please describe exactly what actions triggered the bug
 and the precise symptoms of the bug:

 python mode auto indentation has been broken for me for some time.
 I tried again today and it works better, but not much.

 I tried using emacs -nw -q and the little python program below.

 the problem is  especially obvious on the line marked #1, or #2
 Try moving the indentation to column 0. Emacs will say sole
 indentation. 

 I'm expecting indentation to go 4 spaces in under the for or the
 if statement.



 #!/usr/bin/python
 import os

 loop=0
 missingfiles=0
 for filenum in range(1,471):
 filename=%03d.pgm%filenum #1
 #print(filename)
 if not os.access(filename,os.F_OK):
 missingfiles=missingfiles+1
 print %s %filename ,
 loop=loop+1
 if loop==20:
loop=0 #2
print 
 print
 print missing files:%d%missingfiles


 I had a look at python.el, and at line 510 there is code like:
 (or (cond ((python-open-block-statement-p t)
python-indent)

 I would expect (python-open-block-statement-p t) to return t, and the
 indentation to occur, but it returns nil. However, I have no idea how
 this code is supposed to work, so take this with a grain of salt.



 If emacs crashed, and you have the emacs process in the gdb debugger,
 please include the output from the following gdb commands:
 `bt full' and `xbacktrace'.
 If you would like to further debug the crash, please read the file
 /usr/local/share/emacs/22.0.51/etc/DEBUG for instructions.


 In GNU Emacs 22.0.51.1 (x86_64-unknown-linux-gnu, X toolkit, Xaw3d scroll 
 bars, multi-tty)
  of 2006-04-11 on kurono.home
 configured using `configure '--with-x-toolkit=lucid' '--with-xpm' 
 '--with-jpeg' '--with-tiff' '--with-gif' '--with-png''

 Important settings:
   value of $LC_ALL: nil
   value of $LC_COLLATE: nil
   value of $LC_CTYPE: nil
   value of $LC_MESSAGES: nil
   value of $LC_MONETARY: nil
   value of $LC_NUMERIC: nil
   value of $LC_TIME: nil
   value of $LANG: en_US.UTF-8
   locale-coding-system: utf-8
   default-enable-multibyte-characters: t

 Major mode: Python

 Minor modes in effect:
   display-time-mode: t
   show-paren-mode: t
   erc-truncate-mode: t
   erc-spelling-mode: t
   erc-log-mode: t
   erc-bbdb-mode: t
   erc-autoaway-mode: t
   erc-autojoin-mode: t
   erc-button-mode: t
   erc-ring-mode: t
   erc-pcomplete-mode: t
   erc-track-mode: t
   erc-match-mode: t
   erc-fill-mode: t
   erc-stamp-mode: t
   erc-netsplit-mode: t
   erc-smiley-mode: t
   erc-irccontrols-mode: t
   senator-minor-mode: t
   which-function-mode: t
   semantic-idle-summary-mode: t
   semantic-idle-scheduler-mode: t
   auto-compression-mode: t
   file-name-shadow-mode: t
   global-font-lock-mode: t
   font-lock-mode: t
   unify-8859-on-encoding-mode: t
   utf-translate-cjk-mode: t
   line-number-mode: t
   transient-mark-mode: t
   abbrev-mode: t

 Recent input:
 C-s ESC O A ESC O A ESC O A ESC O A ESC O A ESC O A 
 ESC O A ESC O A ESC O A ESC O A ESC O A ESC O A ESC 
 O A ESC O A ESC O B ESC O B ESC O B TAB TAB TAB TAB 
 TAB TAB TAB TAB TAB TAB TAB C-x C-s C-x C-g ESC x e 
 m a c s SPC b SPC u SPC DEL DEL r e SPC DEL C-a C-k 
 r e p o r t SPC e m SPC b SPC RET

 Recent messages:
 Wrote /home/joakim/bin/missing
 No buffer matching `2', create one? (y or n) 
 Quit
 Preparing diary... [2 times]
 Closes for filenum in range(1,471):
 Sole indentation [6 times]
 Wrote /home/joakim/bin/missing
 incremental parser error: Wrong type argument: consp, nil [3 times]
 Wrote /home/joakim/bin/missing [2 times]
 Loading emacsbug...done

 -- 
 Joakim Verona
 http://www.verona.se

-- 
Joakim Verona
http://www.verona.se



___
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug


Re: pyhon mode indentation problem (note: its a more general problem)

2006-06-15 Thread joakim
[EMAIL PROTECTED] writes:


Interestingly, if I change this definition like this, indentation
starts working!

(defun python-skip-comments/blanks (optional backward)
  Skip comments and blank lines.
BACKWARD non-nil means go backwards, otherwise go forwards.  Backslash is
treated as whitespace so that continued blank lines are skipped.
Doesn't move out of comments -- should be outside or at end of line.
  (with-syntax-table python-space-backslash-table
(forward-comment (if backward
 -1000
   most-positive-fixnum


That is, I changed most-negative-fixnum to -1000.

I havent tested for which negative number the skip function stops
working, but this should be good info for those able to fix the
underlying problem..


 [EMAIL PROTECTED] writes:

 I tried this on an emacs from 20060407, and the problem doesnt exist
 there, it seems.

 I also tried using the new python.el file in the older emacs, and the
 problem didnt appear, so I would then assume the problem stems from
 some change in some other part of emacs, and not python.el.



 Please write in English if possible, because the Emacs maintainers
 usually do not have translators to read other languages for them.

 Your bug report will be posted to the emacs-pretest-bug@gnu.org mailing list.

 Please describe exactly what actions triggered the bug
 and the precise symptoms of the bug:

 python mode auto indentation has been broken for me for some time.
 I tried again today and it works better, but not much.

 I tried using emacs -nw -q and the little python program below.

 the problem is  especially obvious on the line marked #1, or #2
 Try moving the indentation to column 0. Emacs will say sole
 indentation. 

 I'm expecting indentation to go 4 spaces in under the for or the
 if statement.



 #!/usr/bin/python
 import os

 loop=0
 missingfiles=0
 for filenum in range(1,471):
 filename=%03d.pgm%filenum #1
 #print(filename)
 if not os.access(filename,os.F_OK):
 missingfiles=missingfiles+1
 print %s %filename ,
 loop=loop+1
 if loop==20:
loop=0 #2
print 
 print
 print missing files:%d%missingfiles


 I had a look at python.el, and at line 510 there is code like:
(or (cond ((python-open-block-statement-p t)
   python-indent)

 I would expect (python-open-block-statement-p t) to return t, and the
 indentation to occur, but it returns nil. However, I have no idea how
 this code is supposed to work, so take this with a grain of salt.



 If emacs crashed, and you have the emacs process in the gdb debugger,
 please include the output from the following gdb commands:
 `bt full' and `xbacktrace'.
 If you would like to further debug the crash, please read the file
 /usr/local/share/emacs/22.0.51/etc/DEBUG for instructions.


 In GNU Emacs 22.0.51.1 (x86_64-unknown-linux-gnu, X toolkit, Xaw3d scroll 
 bars, multi-tty)
  of 2006-04-11 on kurono.home
 configured using `configure '--with-x-toolkit=lucid' '--with-xpm' 
 '--with-jpeg' '--with-tiff' '--with-gif' '--with-png''

 Important settings:
   value of $LC_ALL: nil
   value of $LC_COLLATE: nil
   value of $LC_CTYPE: nil
   value of $LC_MESSAGES: nil
   value of $LC_MONETARY: nil
   value of $LC_NUMERIC: nil
   value of $LC_TIME: nil
   value of $LANG: en_US.UTF-8
   locale-coding-system: utf-8
   default-enable-multibyte-characters: t

 Major mode: Python

 Minor modes in effect:
   display-time-mode: t
   show-paren-mode: t
   erc-truncate-mode: t
   erc-spelling-mode: t
   erc-log-mode: t
   erc-bbdb-mode: t
   erc-autoaway-mode: t
   erc-autojoin-mode: t
   erc-button-mode: t
   erc-ring-mode: t
   erc-pcomplete-mode: t
   erc-track-mode: t
   erc-match-mode: t
   erc-fill-mode: t
   erc-stamp-mode: t
   erc-netsplit-mode: t
   erc-smiley-mode: t
   erc-irccontrols-mode: t
   senator-minor-mode: t
   which-function-mode: t
   semantic-idle-summary-mode: t
   semantic-idle-scheduler-mode: t
   auto-compression-mode: t
   file-name-shadow-mode: t
   global-font-lock-mode: t
   font-lock-mode: t
   unify-8859-on-encoding-mode: t
   utf-translate-cjk-mode: t
   line-number-mode: t
   transient-mark-mode: t
   abbrev-mode: t

 Recent input:
 C-s ESC O A ESC O A ESC O A ESC O A ESC O A ESC O A 
 ESC O A ESC O A ESC O A ESC O A ESC O A ESC O A ESC 
 O A ESC O A ESC O B ESC O B ESC O B TAB TAB TAB TAB 
 TAB TAB TAB TAB TAB TAB TAB C-x C-s C-x C-g ESC x e 
 m a c s SPC b SPC u SPC DEL DEL r e SPC DEL C-a C-k 
 r e p o r t SPC e m SPC b SPC RET

 Recent messages:
 Wrote /home/joakim/bin/missing
 No buffer matching `2', create one? (y or n) 
 Quit
 Preparing diary... [2 times]
 Closes for filenum in range(1,471):
 Sole indentation [6 times]
 Wrote /home/joakim/bin/missing
 incremental parser error: Wrong type argument: consp, nil [3 times]
 Wrote /home/joakim/bin/missing [2 times]
 Loading emacsbug...done

 -- 
 Joakim Verona
 http://www.verona.se

 -- 
 Joakim Verona
 

Re: [EMAIL PROTECTED]: Overlay string not displayed on text with `display' property]

2006-06-15 Thread Kim F. Storm
YAMAMOTO Mitsuharu [EMAIL PROTECTED] writes:

 On Tue, 13 Jun 2006 13:38:14 +0200, [EMAIL PROTECTED] (Kim F. Storm) 
 said:

 Please try the new patch below.

 Thanks.  I tried the installed one, and found another assertion
 violation with the following case.

 ; emacs -Q -D
 (setq overlay (make-overlay 1 3))
 (overlay-put overlay 'before-string (propertize BE 'face 'bold))
 (overlay-put overlay 'after-string (propertize AF 'display 
(propertize XY 'face 'underline)))
 (compose-region 1 3)

Please try the patch below.

It is a bit long, as it also fixes problems related to positioning
the cursor on a compisition glyph surrounded by overlay strings.



 And how is the `invisible' case supposed to work now?  If the final
 expression in the above test case is replaced with (put-text-property
 1 3 'invisible t), the before-string remains visible but the
 after-string becomes invisible.

I don't know what TRT is.  Anybody??


*** dispextern.h13 Jun 2006 12:42:07 +0200  1.219
--- dispextern.h14 Jun 2006 16:40:00 +0200  
***
*** 1932,1938 
  int stop_charpos;
  int face_id;
  Lisp_Object string;
! int image_id;
  struct display_pos pos;
  int end_charpos;
  int string_nchars;
--- 1932,1948 
  int stop_charpos;
  int face_id;
  Lisp_Object string;
! union {
!   struct {
!   Lisp_Object object;
!   struct it_slice slice;
!   int image_id;
!   } image;
!   struct {
!   int c, len;
!   int cmp_id, cmp_len;
!   } comp;
! } u;
  struct display_pos pos;
  int end_charpos;
  int string_nchars;
***
*** 1941,1947 
  unsigned multibyte_p : 1;
  unsigned string_from_display_prop_p : 1;
  unsigned display_ellipsis_p : 1;
- struct it_slice slice;
  Lisp_Object space_width;
  short voffset;
  Lisp_Object font_height;
--- 1951,1956 


Index: xdisp.c
===
RCS file: /cvsroot/emacs/emacs/src/xdisp.c,v
retrieving revision 1.1104
diff -c -r1.1104 xdisp.c
*** xdisp.c 14 Jun 2006 14:29:47 -  1.1104
--- xdisp.c 15 Jun 2006 14:46:09 -
***
*** 4556,4561 
--- 4556,4562 
  
pop_it (it);
xassert (it-sp  0
+  || it-method == GET_FROM_COMPOSITION
   || (NILP (it-string)
it-method == GET_FROM_BUFFER
it-stop_charpos = BEGV
***
*** 4903,4920 
p-stop_charpos = it-stop_charpos;
xassert (it-face_id = 0);
p-face_id = it-face_id;
!   p-image_id = it-image_id;
p-method = it-method;
!   if (it-method == GET_FROM_IMAGE)
! p-string = it-object;
!   else
! p-string = it-string;
p-pos = it-current;
p-end_charpos = it-end_charpos;
p-string_nchars = it-string_nchars;
p-area = it-area;
p-multibyte_p = it-multibyte_p;
-   p-slice = it-slice;
p-space_width = it-space_width;
p-font_height = it-font_height;
p-voffset = it-voffset;
--- 4904,4930 
p-stop_charpos = it-stop_charpos;
xassert (it-face_id = 0);
p-face_id = it-face_id;
!   p-string = it-string;
p-method = it-method;
!   switch (p-method)
! {
! case GET_FROM_IMAGE:
!   p-u.image.object = it-object;
!   p-u.image.image_id = it-image_id;
!   p-u.image.slice = it-slice;
!   break;
! case GET_FROM_COMPOSITION:
!   p-u.comp.c = it-c;
!   p-u.comp.len = it-len;
!   p-u.comp.cmp_id = it-cmp_id;
!   p-u.comp.cmp_len = it-cmp_len;
!   break;
! }
p-pos = it-current;
p-end_charpos = it-end_charpos;
p-string_nchars = it-string_nchars;
p-area = it-area;
p-multibyte_p = it-multibyte_p;
p-space_width = it-space_width;
p-font_height = it-font_height;
p-voffset = it-voffset;
***
*** 4941,4963 
p = it-stack + it-sp;
it-stop_charpos = p-stop_charpos;
it-face_id = p-face_id;
-   it-method = p-method;
-   it-image_id = p-image_id;
it-current = p-pos;
!   if (it-method == GET_FROM_IMAGE)
! {
!   it-object = it-string;
!   it-string = Qnil;
! }
!   else
! it-string = p-string;
if (NILP (it-string))
  SET_TEXT_POS (it-current.string_pos, -1, -1);
it-end_charpos = p-end_charpos;
it-string_nchars = p-string_nchars;
it-area = p-area;
it-multibyte_p = p-multibyte_p;
-   it-slice = p-slice;
it-space_width = p-space_width;
it-font_height = p-font_height;
it-voffset = p-voffset;
--- 4951,4983 
p = it-stack + it-sp;
it-stop_charpos = p-stop_charpos;
it-face_id = p-face_id;
it-current = p-pos;
!   it-string = p-string;
if (NILP (it-string))
  SET_TEXT_POS (it-current.string_pos, -1, -1);
+   it-method = p-method;
+   switch (it-method)
+ {
+ case GET_FROM_IMAGE:
+   it-image_id = p-u.image.image_id;
+   it-object = p-u.image.object;
+   

Re: Setting file-precious-flag fails to honour umask on new files

2006-06-15 Thread Richard Stallman
Does this fix it?

*** files.el12 Jun 2006 14:12:27 -0400  1.844
--- files.el15 Jun 2006 09:23:00 -0400  
***
*** 3630,3637 
(set-visited-file-modtime old-modtime)))
;; Since we have created an entirely new file,
;; make sure it gets the right permission bits set.
!   (setq setmodes (or setmodes (cons (file-modes buffer-file-name)
! buffer-file-name)))
;; We succeeded in writing the temp file,
;; so rename it.
(rename-file tempname buffer-file-name t))
--- 3630,3638 
(set-visited-file-modtime old-modtime)))
;; Since we have created an entirely new file,
;; make sure it gets the right permission bits set.
!   (setq setmodes (or setmodes
!  (cons (or (file-modes buffer-file-name) umask)
!buffer-file-name)))
;; We succeeded in writing the temp file,
;; so rename it.
(rename-file tempname buffer-file-name t))


___
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug


Re: [PATCH] Unicode Lisp reader escapes.

2006-06-15 Thread Aidan Kehoe

   if (EQ(Qnil, lisp_char))
 {
   /* This is ugly and horrible and trashes the user's data. */
   XSETFASTINT (i, MAKE_CHAR (charset_katakana_jisx0201, 
  34 + 128, 46 + 128));
  return i;
 }
  
  What is this special Katakana character, and why are we producing it?

Firstly, thank you for posing the question; the character intended was not a
member of JISX0201 at all, rather of JISX0208. I yanked the wrong charset
identifier from charset.h when porting the code from XEmacs. The patch below
addresses this. 

(make-char 'japanese-jisx0208 34 46) gives U+3013 GETA MARK, a character in
JISX 0208 that is used to represent unknown or corrupted data. The
Unicode-specific equivalent is U+FFFD REPLACEMENT CHARACTER. I used the GETA
MARK because I was certain it would be available in Mule and it is
equivalent. It turns out that (make-char 'mule-unicode-e000- 117 61)
gives U+FFFD, so it might be worthwhile to replace that. 

  Is it to trigger an Invalid character message, or is something else
  going on here?

It doesn’t actually trigger a message, it displays a character to be
interpreted as “the character couldn’t be interpreted.”

My feeling is that the syntax should be close in its behaviour to what the
coding systems do, and when the coding systems see a code point that is
valid but that they can’t interpret, they trash the user’s data. (Or do
something totally mad like transform invalid UTF-16 to invalid UTF-8!?)

src/ChangeLog addition:

2006-06-14  Aidan Kehoe  [EMAIL PROTECTED]

* lread.c (read_escape):
Change charset_katakana_jisx0201 to charset_jisx0208 as it should
have been in the first place, since we intended U+3013 GETA MARK. 


GNU Emacs Trunk source patch:
Diff command:   cvs -q diff -u
Files affected: src/lread.c

Index: src/lread.c
===
RCS file: /sources/emacs/emacs/src/lread.c,v
retrieving revision 1.353
diff -u -u -r1.353 lread.c
--- src/lread.c 9 Jun 2006 18:22:30 -   1.353
+++ src/lread.c 14 Jun 2006 06:57:49 -
@@ -1967,7 +1967,7 @@
if (EQ(Qnil, lisp_char))
  {
/* This is ugly and horrible and trashes the user's data.  */
-   XSETFASTINT (i, MAKE_CHAR (charset_katakana_jisx0201,
+   XSETFASTINT (i, MAKE_CHAR (charset_jisx0208,
   34 + 128, 46 + 128));
 return i;
  }


-- 
Aidan Kehoe, http://www.parhasard.net/


___
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug


Re: tramp-touch doesn't mind timezone

2006-06-15 Thread Michael Albinus
Katsumi Yamaoka [EMAIL PROTECTED] writes:

 Hi,

Hi,


 When I copy a file from Japan to US using Tramp+ssh, the modtime
 of the remote file gains 14 hours.  It is because `tramp-touch'
 sets the modtime expressed in Japan time to the remote file.
 You will be able to reproduce it even with the local hosts by
 changing the value of TZ in the shell-rc file in either host.
 Here is a tiny patch to solve the problem:

Thank you for the patch. I've committed it to both Emacs CVS and Tramp CVS.

Best regards, Michael.


___
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug


Re: [EMAIL PROTECTED]: Overlay string not displayed on text with `display' property]

2006-06-15 Thread YAMAMOTO Mitsuharu
 On Thu, 15 Jun 2006 16:45:01 +0200, [EMAIL PROTECTED] (Kim F. Storm) said:

 Please try the patch below.

I tried it, and found a problem with cursor placement and another
assertion violation.

; emacs -q -D  ;; not `-Q' in order to show a message in *scratch*
(setq overlay (make-overlay 1 3))
(overlay-put overlay 'before-string (propertize BE 'face 'bold))
(overlay-put overlay 'after-string (propertize AF 'display 
 (propertize XY 'face 'underline)))
(put-text-property 1 3 'display DISP)
;; make sure that the first line is wrapped
M-

Then the cursor is displayed at a wrong position.

Another assertion violation can be observed by replacing the last
expression with (put-text-property 1 3 'display '(space :width 2))

 YAMAMOTO Mitsuharu
[EMAIL PROTECTED]


___
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug