     (let ((text (delete-and-extract-region start end)))
       (insert (funcall func text)))))
 
-(defun hex-region (start end)
+(defun urlencode (start end)
   "urlencode the region between START and END in current buffer."
   (interactive "r")
   (func-region start end #'url-hexify-string))
 
-(defun unhex-region (start end)
+(defun urldecode (start end)
   "de-urlencode the region between START and END in current buffer."
   (interactive "r")
   (func-region start end #'url-unhex-string))

(define-key global-map (kbd "C-+") 'text-scale-increase)
(define-key global-map (kbd "C--") 'text-scale-decrease)

;; Use regex searches by default.
(global-set-key (kbd "C-s") 'isearch-forward-regexp)
(global-set-key (kbd "\C-r") 'isearch-backward-regexp)
(global-set-key (kbd "C-M-s") 'isearch-forward)
(global-set-key (kbd "C-M-r") 'isearch-backward)

;; Show matching parens
(show-paren-mode)

;; Allow direct edting of permission flags in wdired
(setq wdired-allow-to-change-permissions t)

;; Don't ask to delete excess versions of files
(setq trim-versions-without-asking t)

(require 'ido)
(ido-mode t)

;;  (setq load-path (append load-path '("~/path/to/dir/containing/this-file")))
;;  (require 'pje-customizations)




(when (not package-archive-contents)
  (package-refresh-contents))
