(convert-standard-filename): Require `filename'.
(cons 'progn body)
(list 'select-window 'save-selected-window-window))))
-(autoload (function filename-maybe-truncate-by-size) "filename")
-
(defun-maybe-cond convert-standard-filename (filename)
"Convert a standard file's name to something suitable for the current OS.
This function's standard definition is trivial; it just returns the argument.
`filename-limit-length' for the basic filename and each parent directory name.
\[Emacs 19.31 emulating function]"
((memq system-type '(windows-nt ms-dos))
+ (require 'filename)
(let* ((names (split-string filename "/"))
(drive-name (car names))
(filter (function (lambda (string)