(defun stolfi-bindings-Sun ()
  "Stolfi's special key bindings for Emacs-20 on Sun keyboards."
  (interactive)
  (define-key global-map [f2]      'set-fill-column)                 ;; F2
  (define-key global-map [SunF37]  'stolfi-time-stamp-insert-new)    ;; F12
  (define-key global-map [f29]     'scroll-down)                     ;; PgUp
  (define-key global-map [f35]     'scroll-up)                       ;; PgDn
  (define-key global-map [f27]     'stolfi-scroll-to-top)            ;; Home
  (define-key global-map [f33]     'stolfi-scroll-to-bottom)         ;; End
  (define-key global-map [f31]     'recenter)                        ;; K-5
  (define-key global-map [f12]     'call-last-kbd-macro)             ;; Again
  (define-key global-map [f11]     'revert-buffer-and-stay-put)      ;; Stop
  (define-key global-map [f22]     'revert-buffer-and-goto-end)      ;; PrintScreen
  nil
)