.emacs error E3D3

Debugger entered--Lisp error: (error "No file on this line")                        
                                                                                   |  signal(error ("No file on this line"))                                            
                                                                                   |  error("No file on this line")                                                     
                                                                                   |  dired-move-to-filename(t)                                                         
                                                                                   |  (setq p1 (dired-move-to-filename (not no-error-if-not-filep)))                    
                                                                                   |  (if (setq p1 (dired-move-to-filename (not no-error-if-not-filep))) (progn (setq   
                                                                                   |p2 (dired-move-to-end-of-filename no-error-if-not-filep))))                         
                                                                                   |  (when (setq p1 (dired-move-to-filename (not no-error-if-not-filep))) (setq p2     
                                                                                   |(dired-move-to-end-of-filename no-error-if-not-filep)))                             
                                                                                   |  (save-excursion (when (setq p1 (dired-move-to-filename (not                       
                                                                                   |no-error-if-not-filep))) (setq p2 (dired-move-to-end-of-filename                    
                                                                                   |no-error-if-not-filep))))                                                           
                                                                                   |  (let (case-fold-search file p1 p2 already-absolute) (save-excursion (when (setq   
                                                                                   |p1 (dired-move-to-filename (not no-error-if-not-filep))) (setq p2                   
                                                                                   |(dired-move-to-end-of-filename no-error-if-not-filep)))) (when (setq file (and p1   
                                                                                   |p2 (buffer-substring p1 p2))) (set-text-properties 0 (length file) nil file) (setq  
                                                                                   |file (read (concat "\"" (or (dired-string-replace-match "\\([^\\]\\|\\`\\)\"" file  
                                                                                   |"\\1\\\\\"" nil t) file) "\""))) (when (and (fboundp (quote string-to-multibyte))   
                                                                                   |enable-multibyte-characters (n