tramp-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Invalid format character: ?m


From: Tim Connors
Subject: Invalid format character: ?m
Date: Thu, 1 Jan 2004 17:42:48 +1100 (EST)

Related to why I wanted to go back to a previous tramp versiuon yesterday
was this problem:

However, now that I have upgraded xemacs to Debian's Sid version, I get
the error on the both CVS HEAD and a version from around Nov 29 (2.0.36)

A google search shows this has affected some other Xemacs user before,
more than a year ago, but a fix had made it into CVS. I notice that things
like (format-spec x `((?u . ,user)))) are still there in slightly differnt
forms, so I see no why this is happening again.

BTW, (locate-library format-spec) is returning the version from tramp CVS.

So the trace from CVS HEAD is shown below:

Signaling: (error "Invalid format character: ?m")
  signal(error ("Invalid format character: ?m"))
  cerror("Invalid format character: %s" ?m)
  apply(cerror "Invalid format character: %s" ?m)
  error("Invalid format character: %s" ?m)
  (if val nil (error "Invalid format character: %s" spec))
  (unless val (error "Invalid format character: %s" spec))
  (let* ((num ...) (spec ...) (val ...)) (delete-region (1- ...) (match-end 0)) 
(unless val (error "Invalid format character: %s" spec)) (insert (format ... 
val)))
  (cond ((eq ... ?%) (delete-char 1)) ((looking-at 
"\\([-0-9.]*\\)\\([a-zA-Z]\\)") (let* ... ... ... ...)) (t (error "Invalid 
format string")))
  (while (search-forward "%" nil t) (cond (... ...) (... ...) (t ...)))
  (save-current-buffer (set-buffer temp-buffer) (insert format) (goto-char 
(point-min)) (while (search-forward "%" nil t) (cond ... ... ...)) 
(buffer-string))
  (with-current-buffer temp-buffer (insert format) (goto-char (point-min)) 
(while (search-forward "%" nil t) (cond ... ... ...)) (buffer-string))
  (unwind-protect (with-current-buffer temp-buffer (insert format) (goto-char 
...) (while ... ...) (buffer-string)) (and (buffer-name temp-buffer) 
(kill-buffer temp-buffer)))
  (let ((temp-buffer ...)) (unwind-protect (with-current-buffer temp-buffer ... 
... ... ...) (and ... ...)))
  (with-temp-buffer (insert format) (goto-char (point-min)) (while 
(search-forward "%" nil t) (cond ... ... ...)) (buffer-string))
  format-spec("/[%m/address@hidden" ((109 . "rsync") (117 . "tconnors") (104 . 
"hexane") (112 . "/home/office/tconnors/magellanic/work/flag")))
  tramp-make-tramp-file-name(nil "rsync" "tconnors" "hexane" 
"/home/office/tconnors/magellanic/work/flag")
  
tramp-handle-expand-file-name("/[rsync/address@hidden/home/office/tconnors/magellanic/work/flag"
 nil)
  apply(tramp-handle-expand-file-name 
("/[rsync/address@hidden/home/office/tconnors/magellanic/work/flag" nil))
  tramp-sh-file-name-handler(expand-file-name 
"/[rsync/address@hidden/home/office/tconnors/magellanic/work/flag" nil)
  apply(tramp-sh-file-name-handler expand-file-name 
("/[rsync/address@hidden/home/office/tconnors/magellanic/work/flag" nil))
  tramp-file-name-handler(expand-file-name 
"/[rsync/address@hidden/home/office/tconnors/magellanic/work/flag" nil)
  
expand-file-name("/[rsync/address@hidden/home/office/tconnors/magellanic/work/flag")
  
find-file-noselect("/[rsync/address@hidden/home/office/tconnors/magellanic/work/flag")
  find-file("/[rsync/address@hidden/home/office/tconnors/magellanic/work/flag" 
nil)
  call-interactively(find-file)


-- 
TimC -- http://astronomy.swin.edu.au/staff/tconnors/
'It's amazing I won. I was running against peace, prosperity and incumbency.'
  -- George W. Bush. June 14, 2001, to Swedish PM Goran Perrson,
     unaware that a live television camera was still rolling.




reply via email to

[Prev in Thread] Current Thread [Next in Thread]