7 lines
267 B
EmacsLisp
7 lines
267 B
EmacsLisp
(defun to/xcode-info ()
|
|
(interactive)
|
|
(let ((buffer "*Xcode info*"))
|
|
(shell-command "system_profiler SPDeveloperToolsDataType" buffer buffer)
|
|
(with-current-buffer buffer
|
|
(view-mode +1)
|
|
(select-window (get-buffer-window buffer)))))
|