       (replace-match (format " %s"
                              (downcase (match-string 0)))
                      t nil))))
-  (global-set-key (kbd "C-c l") 'ar/split-camel-region)
+(global-set-key (kbd "C-c l") 'ar/split-camel-region)
 
 ;; M-. elisp navigation.
 (use-package elisp-slime-nav

  ;; ProductName: iPhone OS
  ;; ProductVersion: 7.1
  (set (make-local-variable 'compile-command)
        "xcodebuild -sdk iphonesimulator7.1 -target MyTarget")
  (define-key objc-mode-map [f7] 'ar/xc:build)
  (define-key objc-mode-map [f8] 'ar/xc:run))
(add-hook 'objc-mode-hook 'ar/objc-mode-hook-function)

(defun ar/java-mode-hook-function ()
  "Called when entering `java-mode'."
  ;; 100-column limit for java.
  (set-fill-column 100)
  ;; 2-char indent for java.
  (setq c-basic-offset 2))
(add-hook 'java-mode-hook 'ar/java-mode-hook-function)

(defun ar/prog-mode-hook-function ()

           (file (list file)))))
    (setq doIt (if (<= (length myFileList) 5)
                   t
                 (y-or-n-p "Open more than 5 files? ")))
    (when doIt
      (mapc (ar/open-in-external-app-lambda) myFileList))))

(global-set-key (kbd "C-M-o") 'xah-open-in-external-app)

(setq ring-bell-function 'ignore)
