tramp-devel
[Top][All Lists]
Advanced
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Tramp and Zope.

From: Artur Maciąg
Subject: Re: Tramp and Zope.
Date: 31 Jul 2002 19:04:15 +0200
User-agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.3.50 
address@hidden (Kai Großjohann) writes:
> [time passes]
> 
> Oh.  I could reproduce the problem.  Aha!  Thanks for the report.
> Please try the current CVS or the following patch.  Does it work?

 Almost :)

 When I tryin' to load file Emacs says:
 ange-ftp-ftp-name: Lisp nesting exceeds max-lisp-eval-depth

 but when I try again works ok. 


 There's (long) Backtrace:


Debugger entered--Lisp error: (error "Lisp nesting exceeds max-lisp-eval-depth")
  (eq system-type (quote windows-nt))
  (not (eq system-type (quote windows-nt)))
  (if (not (eq system-type ...)) (setq name (ange-ftp-real-expand-file-name 
name)) (if (string-match "^//" default-directory) (setq name ...) (setq name 
...)) (if (string-match "^[a-zA-Z]:" name) (setq name ...)))
  (progn (if (not ...) (setq name ...) (if ... ... ...) (if ... ...)) (if 
(string-match "^//" name) (setq name ...)))
  (if (not (string-match "^//" name)) (progn (if ... ... ... ...) (if ... ...)))
  (let ((host ...) (user ...) (name ...)) (cond (... name) (... ...) (t ...)) 
(if (not ...) (progn ... ...)) (ange-ftp-replace-name-component n name))
  (if parsed (let (... ... ...) (cond ... ... ...) (if ... ...) 
(ange-ftp-replace-name-component n name)) (if (eq ... 47) 
(ange-ftp-real-expand-file-name n) (ange-ftp-real-expand-file-name ... ...)))
  (let ((parsed ...)) (if parsed (let ... ... ... ...) (if ... ... ...)))
  
ange-ftp-canonize-filename("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (cond ((eq ... 126) (ange-ftp-real-expand-file-name name)) ((eq ... 47) 
(ange-ftp-canonize-filename name)) ((and ... ...) (ange-ftp-canonize-filename 
name)) ((and ... ...) (ange-ftp-real-expand-file-name name default)) ((zerop 
...) (ange-ftp-canonize-filename default)) ((ange-ftp-canonize-filename ...)))
  (progn (setq default (or default default-directory)) (cond (... ...) (... 
...) (... ...) (... ...) (... ...) (...)))
  (unwind-protect (progn (setq default ...) (cond ... ... ... ... ... ...)) 
(set-match-data save-match-data-internal))
  (let ((save-match-data-internal ...)) (unwind-protect (progn ... ...) 
(set-match-data save-match-data-internal)))
  (save-match-data (setq default (or default default-directory)) (cond (... 
...) (... ...) (... ...) (... ...) (... ...) (...)))
  
ange-ftp-expand-file-name("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"
 nil)
  apply(ange-ftp-expand-file-name 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio" nil))
  (progn (apply fn args))
  (unwind-protect (progn (apply fn args)) (set-match-data 
save-match-data-internal))
  (let ((save-match-data-internal ...)) (unwind-protect (progn ...) 
(set-match-data save-match-data-internal)))
  (save-match-data (apply fn args))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(expand-file-name 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio" nil)
  apply(ange-ftp-hook-function expand-file-name 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio" nil))
  tramp-invoke-ange-ftp(expand-file-name 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio" nil)
  
tramp-handle-expand-file-name("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"
 "/ftp:address@hidden:/artgabi/portal_skins/wanilia/")
  apply(tramp-handle-expand-file-name 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio" 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/"))
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(expand-file-name 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio" 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  (let ((inhibit-file-name-handlers ...) (inhibit-file-name-operation 
operation)) (apply operation args))
  ange-ftp-run-real-handler(file-modes 
("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"))
  (if fn (save-match-data (apply fn args)) (ange-ftp-run-real-handler operation 
args))
  (let ((fn ...)) (if fn (save-match-data ...) (ange-ftp-run-real-handler 
operation args)))
  ange-ftp-hook-function(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(ange-ftp-hook-function file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  tramp-invoke-ange-ftp(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  
tramp-handle-file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  apply(tramp-handle-file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  byte-code("Ă ĎŠ    A\n\"*‡" [save-match-data-internal fn args match-data 
((set-match-data save-match-data-internal)) apply] 3)
  tramp-file-name-handler(file-modes 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  file-modes("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  after-find-file(nil t)
  find-file-noselect-1(#<buffer portfolio<2>> 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio" nil nil 
"/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio" (8 -1))
  
find-file-noselect("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio"
 nil nil nil)
  find-file("/ftp:address@hidden:/artgabi/portal_skins/wanilia/portfolio")
  ad-Orig-dired-advertised-find-file()
  (setq ad-return-value (ad-Orig-dired-advertised-find-file))
  (let (ad-return-value) (thumbs-kill-preview-buffer-and-window) (setq 
ad-return-value (ad-Orig-dired-advertised-find-file)) ad-return-value)
  dired-advertised-find-file()
  call-interactively(dired-advertised-find-file)

--- cut ---

        Artur.

-- 
   Artur Maciąg                          http://www.artgabi.com.pl
----------------------------------------------------------------------
 Everything should be made as simple as possible, but not simpler.
                                        -- Albert Einstein
reply via email to
[Prev in Thread] Current Thread [Next in Thread]