(< 32 (setq this-char (aref args end)))
(> 127 this-char))
(setq end (1+ end)))
- (setq command-line-args (append
+ (setq command-line-args (append
command-line-args
(list (substring args beg end))))
(setq beg (1+ end)))
All other Emacs commands are still available."
t)
+;;; arch-tag: c178494e-2c37-4d02-99b7-e47e615656cf
;;; vms-patch.el ends here