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