HTTP/2 302 server: nginx date: Wed, 16 Jul 2025 23:02:41 GMT content-type: text/plain; charset=utf-8 content-length: 0 x-archive-redirect-reason: found capture at 20090210083357 location: https://web.archive.org/web/20090210083357/https://examples.oreilly.com/upt2/split/search.el server-timing: captures_list;dur=0.769483, exclusion.robots;dur=0.036071, exclusion.robots.policy;dur=0.018694, esindex;dur=0.013972, cdx.remote;dur=29.676019, LoadShardBlock;dur=388.144104, PetaboxLoader3.datanode;dur=88.251099, PetaboxLoader3.resolve;dur=278.359772 x-app-server: wwwb-app200 x-ts: 302 x-tr: 440 server-timing: TR;dur=0,Tw;dur=0,Tc;dur=1 set-cookie: SERVER=wwwb-app200; 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: Wed, 16 Jul 2025 23:02:42 GMT content-type: text/plain content-length: 1348 x-archive-orig-date: Tue, 10 Feb 2009 08:33:57 GMT x-archive-orig-server: Apache x-archive-orig-last-modified: Mon, 31 Mar 2008 18:10:12 GMT x-archive-orig-etag: "12457bf-544-90194900" x-archive-orig-accept-ranges: bytes x-archive-orig-content-length: 1348 x-archive-orig-connection: close x-archive-orig-content-language: el x-archive-orig-x-pad: avoid browser bug cache-control: max-age=1800 x-archive-guessed-content-type: text/plain x-archive-guessed-charset: utf-8 memento-datetime: Tue, 10 Feb 2009 08:33:57 GMT link: ; rel="original", ; rel="timemap"; type="application/link-format", ; rel="timegate", ; rel="first memento"; datetime="Wed, 19 Jun 2002 02:05:34 GMT", ; rel="prev memento"; datetime="Wed, 18 Oct 2006 00:08:38 GMT", ; rel="memento"; datetime="Tue, 10 Feb 2009 08:33:57 GMT", ; rel="next memento"; datetime="Wed, 30 Sep 2015 16:46:47 GMT", ; rel="last memento"; datetime="Fri, 25 Mar 2016 03:07:40 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_8_20090210075601_crawl103-c/52_8_20090210083354_crawl100.arc.gz server-timing: captures_list;dur=0.891505, exclusion.robots;dur=0.039961, exclusion.robots.policy;dur=0.023228, esindex;dur=0.016573, cdx.remote;dur=27.272810, LoadShardBlock;dur=142.675954, PetaboxLoader3.datanode;dur=115.135081, PetaboxLoader3.resolve;dur=102.175561, load_resource;dur=101.089921 x-app-server: wwwb-app200 x-ts: 200 x-tr: 296 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=() accept-ranges: bytes ; ; Repeatable non-incremental search. ; ; ^S - Search forward. You will be prompted for the string to search for. ; ^R - Search backward. You will be pormpted for the string to search for. ; ^S^S - Search forward for last requested string. ; ^R^R - Search backward for last requested string. ; ; Written for Mike loukides. ; ; ; Author: Chris Hind Genly 10/3/88 ; (define-key global-map "\C-r" 'msearch-backward) (define-key global-map "\C-s" 'msearch-forward) (defun msearch-forward () (interactive) (msearch t) ) (defun msearch-backward () (interactive) (msearch nil) ) (setq msearch-string "") (defun msearch (forward) (interactive) (if forward (message (concat "M-Search [" msearch-string "]: ")) (message (concat "M-Search-backward [" msearch-string "]: ")) ) (setq c (read-char)) (cond ((eq c ?\C-s) (search-forward msearch-string)) ((eq c ?\C-r) (search-backward msearch-string)) (t (progn (setq msearch-string (read-string (if forward "M-Search: " "M-Search-backward: ") (char-to-string c))) (if forward (search-forward msearch-string) (search-backward msearch-string) ) ) ) ))