153 |
(looking-at "\\(.+\\)$")) |
(looking-at "\\(.+\\)$")) |
154 |
(and (match-string 1) |
(and (match-string 1) |
155 |
(let ((nnheader-file-name-translation-alist |
(let ((nnheader-file-name-translation-alist |
156 |
'((?/ . ?,) (? . ?_) (?* . ?_) (?$ . ?_)))) |
'((?/ . ?,) (?\ . ?_) (?* . ?_) (?$ . ?_)))) |
157 |
(nnheader-translate-file-chars (match-string 1)))))) |
(nnheader-translate-file-chars (match-string 1)))))) |
158 |
(forward-line);; in case of failure |
(forward-line);; in case of failure |
159 |
(setq start-char-1 (point)) |
(setq start-char-1 (point)) |