diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index b120a3b..6fbfcc9 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -35,6 +35,9 @@
 
 (setq gc-cons-threshold (* 2 1000 1000))
 
+(add-to-list 'load-path (expand-file-name "to/" user-emacs-directory))
+(require 'utils)
+
 ;; -----------------------------------------------------------------
 
 (use-package ace-window
diff --git a/.emacs.d/to/utils.el b/.emacs.d/to/utils.el
new file mode 100644
index 0000000..7504f79
--- /dev/null
+++ b/.emacs.d/to/utils.el
@@ -0,0 +1,9 @@
+(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)