(global-set-key (kbd "<kp-begin>") 'mark-defun)
(global-set-key (kbd "<kp-right>") 'ibuffer)
(global-set-key (kbd "<kp-prior>") 'delete-horizontal-space)
(global-set-key (kbd "<kp-begin>") 'mark-defun)
(global-set-key (kbd "<kp-right>") 'ibuffer)
(global-set-key (kbd "<kp-prior>") 'delete-horizontal-space)