HTTP/2 302 server: nginx date: Thu, 17 Jul 2025 14:45:13 GMT content-type: text/plain; charset=utf-8 content-length: 0 x-archive-redirect-reason: found capture at 20071016161026 location: https://web.archive.org/web/20071016161026/https://examples.oreilly.com/upt2/split/.emacs_ml server-timing: captures_list;dur=0.691923, exclusion.robots;dur=0.020170, exclusion.robots.policy;dur=0.007763, esindex;dur=0.010523, cdx.remote;dur=372.456021, LoadShardBlock;dur=185.764219, PetaboxLoader3.datanode;dur=185.144340 x-app-server: wwwb-app239 x-ts: 302 x-tr: 643 server-timing: TR;dur=0,Tw;dur=0,Tc;dur=1 set-cookie: SERVER=wwwb-app239; path=/ x-location: All x-rl: 0 x-na: 0 x-page-cache: MISS server-timing: MISS x-nid: DigitalOcean referrer-policy: no-referrer-when-downgrade permissions-policy: interest-cohort=() HTTP/2 200 server: nginx date: Thu, 17 Jul 2025 14:45:14 GMT content-type: text/plain x-archive-orig-date: Tue, 16 Oct 2007 16:10:26 GMT x-archive-orig-server: Apache x-archive-orig-last-modified: Thu, 28 Jun 2001 21:52:10 GMT x-archive-orig-etag: "316a28-4fd-3b3ba70a" x-archive-orig-accept-ranges: bytes x-archive-orig-content-length: 1277 x-archive-orig-connection: close cache-control: max-age=1800 x-archive-guessed-content-type: text/plain x-archive-guessed-charset: utf-8 x-archive-orig-content-encoding: 8bit memento-datetime: Tue, 16 Oct 2007 16:10:26 GMT link: ; rel="original", ; rel="timemap"; type="application/link-format", ; rel="timegate", ; rel="first memento"; datetime="Fri, 26 Apr 2002 16:05:16 GMT", ; rel="prev memento"; datetime="Wed, 18 Oct 2006 00:13:23 GMT", ; rel="memento"; datetime="Tue, 16 Oct 2007 16:10:26 GMT", ; rel="next memento"; datetime="Tue, 10 Feb 2009 08:53:53 GMT", ; rel="last memento"; datetime="Fri, 25 Mar 2016 03:05:27 GMT" content-security-policy: default-src 'self' 'unsafe-eval' 'unsafe-inline' data: blob: archive.org web.archive.org web-static.archive.org wayback-api.archive.org athena.archive.org analytics.archive.org pragma.archivelab.org wwwb-events.archive.org x-archive-src: 52_0_20071016155919_crawl105-c/52_0_20071016160814_crawl100.arc.gz server-timing: captures_list;dur=0.671568, exclusion.robots;dur=0.020683, exclusion.robots.policy;dur=0.007630, esindex;dur=0.010619, cdx.remote;dur=78.611094, LoadShardBlock;dur=304.109227, PetaboxLoader3.datanode;dur=147.616366, PetaboxLoader3.resolve;dur=273.016148, load_resource;dur=219.597959 x-app-server: wwwb-app239 x-ts: 200 x-tr: 654 server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0 x-location: All x-rl: 0 x-na: 0 x-page-cache: MISS server-timing: MISS x-nid: DigitalOcean referrer-policy: no-referrer-when-downgrade permissions-policy: interest-cohort=() ;; Make CTRL-h delete the previous character. Normally, this gets ;; you into the "help" system. (define-key global-map "\C-h" 'backward-delete-char) ;; make sure CTRL-h works in searches, too (setq search-delete-char (string-to-char "\C-h")) ;; bind the "help" facility somewhere else (CTRL-underscore). ;; NOTE: CTRL-underscore is not defined on some terminals. (define-key global-map "\C-_" 'help-command) ;; replacement (setq help-char (string-to-char "\C-_")) ;; Make ESC-h delete the previous word. (define-key global-map "\M-h" 'backward-kill-word) ;; Make CTRL-x CTRL-u the "undo" command; this is better than "CTRL-x u" ;; because you don't have to release the CTRL key. (define-key global-map "\C-x\C-u" 'undo) ;; scroll the screen "up" or "down" one line with CTRL-z and ESC z (defun scroll-up-one () "Scroll up 1 line." (interactive) (scroll-up (prefix-numeric-value current-prefix-arg))) (defun scroll-down-one () "Scroll down 1 line." (interactive) (scroll-down (prefix-numeric-value current-prefix-arg))) (define-key global-map "\C-z" 'scroll-up-one) (define-key global-map "\M-z" 'scroll-down-one) ;; Use CTRL-x CTRL-v to "visit" a new file, keeping the current file ;; on the screen (define-key global-map "\C-x\C-v" 'find-file-other-window)