From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Ruijie Yu via "Bug reports for GNU Emacs, the Swiss army knife of text editors" Newsgroups: gmane.emacs.bugs Subject: bug#63437: 30.0.50; [BUG] edebug-defun errs on widget-default-create Date: Thu, 11 May 2023 14:04:33 +0800 Message-ID: Reply-To: Ruijie Yu Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="26934"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: mu4e 1.11.3; emacs 30.0.50 To: 63437@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Thu May 11 08:06:24 2023 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1pwzRX-0006m8-R7 for geb-bug-gnu-emacs@m.gmane-mx.org; Thu, 11 May 2023 08:06:24 +0200 Original-Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1pwzRD-0002VB-OT; Thu, 11 May 2023 02:06:03 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1pwzRC-0002V2-Di for bug-gnu-emacs@gnu.org; Thu, 11 May 2023 02:06:02 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1pwzRC-0004W9-4B for bug-gnu-emacs@gnu.org; Thu, 11 May 2023 02:06:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1pwzRB-0001zo-VW for bug-gnu-emacs@gnu.org; Thu, 11 May 2023 02:06:01 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Ruijie Yu Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Thu, 11 May 2023 06:06:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 63437 X-GNU-PR-Package: emacs X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.16837851267598 (code B ref -1); Thu, 11 May 2023 06:06:01 +0000 Original-Received: (at submit) by debbugs.gnu.org; 11 May 2023 06:05:26 +0000 Original-Received: from localhost ([127.0.0.1]:49512 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1pwzQY-0001yQ-Eo for submit@debbugs.gnu.org; Thu, 11 May 2023 02:05:26 -0400 Original-Received: from lists.gnu.org ([209.51.188.17]:48484) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1pwzQT-0001xx-5s for submit@debbugs.gnu.org; Thu, 11 May 2023 02:05:21 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1pwzQ8-0001zN-Ob for bug-gnu-emacs@gnu.org; Thu, 11 May 2023 02:04:59 -0400 Original-Received: from netyu.xyz ([152.44.41.246] helo=mail.netyu.xyz) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1pwzQ0-00048C-Te for bug-gnu-emacs@gnu.org; Thu, 11 May 2023 02:04:53 -0400 Original-Received: from fw.net.yu.netyu.xyz ( [222.248.4.98]) by netyu.xyz (OpenSMTPD) with ESMTPSA id b683882a (TLSv1.3:TLS_AES_256_GCM_SHA384:256:NO) for ; Thu, 11 May 2023 06:04:39 +0000 (UTC) Received-SPF: pass client-ip=152.44.41.246; envelope-from=ruijie@netyu.xyz; helo=mail.netyu.xyz X-Spam_score_int: -18 X-Spam_score: -1.9 X-Spam_bar: - X-Spam_report: (-1.9 / 5.0 requ) BAYES_00=-1.9, SPF_HELO_NONE=0.001, SPF_PASS=-0.001, T_SCC_BODY_TEXT_LINE=-0.01 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane-mx.org@gnu.org Xref: news.gmane.io gmane.emacs.bugs:261543 Archived-At: --=-=-= Content-Type: text/plain Trying to `edebug-defun' on `widget-default-create' produces an error. This is reproducible in today's master (see below for config) as well as 28.2 tag (same config options). Reproducer: ;; -nw or not makes no difference $ src/emacs -Q -nw -l lisp/wid-edit.el{,} ;; line 1640 C-s defun widget-default-create RET C-u C-M-x Full backtrace as shown on the error is attached. --=-=-= Content-Type: text/plain Content-Disposition: attachment; filename=widget-backtrace.txt Content-Transfer-Encoding: quoted-printable Debugger entered--Lisp error: (void-function body) body((((let ((from (point)) button-begin button-end sample-begin sample-e= nd doc-begin doc-end value-pos) (insert (widget-get widget :format)) (goto-= char from) (while (re-search-forward "%\\(.\\)" nil t) (let ((escape ...)) = (delete-char -2) (cond (... ...) (... ... ...) (... ... ...) (... ...) (...= ...) (... ...) (... ...) (... ...) (... ...) (... ...) (t ...)))) (and but= ton-begin button-end (widget-specify-button widget button-begin button-end)= ) (and sample-begin sample-end (widget-specify-sample widget sample-begin s= ample-end)) (and doc-begin doc-end (widget-specify-doc widget doc-begin doc= -end)) (when value-pos (goto-char value-pos) (widget-apply widget :value-cr= eate))) (let ((from (point-min-marker)) (to (point-max-marker))) (set-marke= r-insertion-type from t) (set-marker-insertion-type to nil) (widget-put wid= get :from from) (widget-put widget :to to))) (61055 (61056 . 61059) (61060 = (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61= 090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140= . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 6= 1185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 612= 18) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) = (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61= 318) (61319 (61320 (61321 . 61327) (61328 ... ... . 61360) . 61361) . 61362= ) (61365 (61366 . 61377) (61378 . 61380) . 61381) (61384 (61385 . 61389) (6= 1390 (61391 ... ... ... . 61405) (61408 ... ... . 61419) . 61420) (61429 (6= 1430 ... ... ... . 61445) (61448 ... ... ... . 61475) (61478 ... ... . 6153= 0) . 61531) (61540 (61541 ... ... ... . 61556) (61559 ... ... . 61611) (616= 14 ... ... ... . 61639) . 61640) (61649 (61650 ... ... ... . 61665) (61668 = ... ... ... . 61695) . 61696) (61705 (61706 ... ... ... . 61721) (61724 ...= ... ... . 61749) . 61750) (61759 (61760 ... ... ... . 61774) (61777 ... ..= . ... ... . 61878) . 61879) (61888 (61889 ... ... ... . 61903) (61906 ... .= .. ... . 62192) . 62193) (62202 (62203 ... ... ... . 62217) (62220 ... ... = ... . 62462) . 62463) (62472 (62473 ... ... ... . 62487) (62490 ... ... . 6= 2537) . 62538) (62547 (62548 ... ... ... . 62562) (62565 ... ... ... ... . = 62676) . 62677) (62686 (62687 . 62688) (62691 ... ... ... ... . 62735) . 62= 736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 62821) (628= 22 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) (62879 .= 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (62915 . 6= 2925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972 . 62982= ) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 . 63012) = (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 63060) . 63= 061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 . 63101)= (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (63141 . 6= 3154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (63167 (6316= 8 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 . 63198) = (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 63251) (6= 3252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (63292 . 6329= 4) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) (63324 .= 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63359) (63= 360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369)) edebug-list-form((((let ((from (point)) button-begin button-end sample-be= gin sample-end doc-begin doc-end value-pos) (insert (widget-get widget :for= mat)) (goto-char from) (while (re-search-forward "%\\(.\\)" nil t) (let ((e= scape ...)) (delete-char -2) (cond (... ...) (... ... ...) (... ... ...) (.= .. ...) (... ...) (... ...) (... ...) (... ...) (... ...) (... ...) (t ...)= ))) (and button-begin button-end (widget-specify-button widget button-begin= button-end)) (and sample-begin sample-end (widget-specify-sample widget sa= mple-begin sample-end)) (and doc-begin doc-end (widget-specify-doc widget d= oc-begin doc-end)) (when value-pos (goto-char value-pos) (widget-apply widg= et :value-create))) (let ((from (point-min-marker)) (to (point-max-marker))= ) (set-marker-insertion-type from t) (set-marker-insertion-type to nil) (wi= dget-put widget :from from) (widget-put widget :to to))) (61055 (61056 . 61= 059) (61060 (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075)= (61078 . 61090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 6= 1139) (61140 . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (6117= 4 (61175 . 61185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 = (61209 . 61218) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (612= 71 . 61288) (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314= (61315 . 61318) (61319 (61320 (61321 . 61327) (61328 ... ... . 61360) . 61= 361) . 61362) (61365 (61366 . 61377) (61378 . 61380) . 61381) (61384 (61385= . 61389) (61390 (61391 ... ... ... . 61405) (61408 ... ... . 61419) . 6142= 0) (61429 (61430 ... ... ... . 61445) (61448 ... ... ... . 61475) (61478 ..= . ... . 61530) . 61531) (61540 (61541 ... ... ... . 61556) (61559 ... ... .= 61611) (61614 ... ... ... . 61639) . 61640) (61649 (61650 ... ... ... . 61= 665) (61668 ... ... ... . 61695) . 61696) (61705 (61706 ... ... ... . 61721= ) (61724 ... ... ... . 61749) . 61750) (61759 (61760 ... ... ... . 61774) (= 61777 ... ... ... ... . 61878) . 61879) (61888 (61889 ... ... ... . 61903) = (61906 ... ... ... . 62192) . 62193) (62202 (62203 ... ... ... . 62217) (62= 220 ... ... ... . 62462) . 62463) (62472 (62473 ... ... ... . 62487) (62490= ... ... . 62537) . 62538) (62547 (62548 ... ... ... . 62562) (62565 ... ..= . ... ... . 62676) . 62677) (62686 (62687 . 62688) (62691 ... ... ... ... .= 62735) . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 .= 62821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 628= 78) (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914= ) (62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (6= 2972 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (630= 05 . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 .= 63060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63= 092 . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140= ) (63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 = (63167 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (631= 96 . 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226= . 63251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (= 63292 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 633= 23) (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 = . 63359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369)) edebug-form((((widget-specify-insert (let ((from (point)) button-begin bu= tton-end sample-begin sample-end doc-begin doc-end value-pos) (insert (widg= et-get widget :format)) (goto-char from) (while (re-search-forward "%\\(.\\= )" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ... ... ...= ... ... ...))) (and button-begin button-end (widget-specify-button widget = button-begin button-end)) (and sample-begin sample-end (widget-specify-samp= le widget sample-begin sample-end)) (and doc-begin doc-end (widget-specify-= doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos) (widge= t-apply widget :value-create))) (let ((from (point-min-marker)) (to (point-= max-marker))) (set-marker-insertion-type from t) (set-marker-insertion-type= to nil) (widget-put widget :from from) (widget-put widget :to to))) (widge= t-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 (61061 = (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61090) (6= 1091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140 . 6114= 7) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 61185) (= 61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 61218) (61= 219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) (61289 = . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61318) (6= 1319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 . 61380= ) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ... ... ..= . . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (61705 ... .= .. . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 ... ... = . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... ... . 6= 2736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 62821) (62= 822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) (62879 = . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (62915 . = 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972 . 6298= 2) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 . 63012)= (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 63060) . 6= 3061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 . 63101= ) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (63141 . = 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (63167 (631= 68 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 . 63198)= (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 63251) (= 63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (63292 . 632= 94) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) (63324 = . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63359) (6= 3360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (63373 . 63= 390) . 63391) . 63392)) edebug-match-form((((widget-specify-insert (let ((from (point)) button-be= gin button-end sample-begin sample-end doc-begin doc-end value-pos) (insert= (widget-get widget :format)) (goto-char from) (while (re-search-forward "%= \\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ... .= .. ... ... ... ...))) (and button-begin button-end (widget-specify-button w= idget button-begin button-end)) (and sample-begin sample-end (widget-specif= y-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-sp= ecify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos) = (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to (= point-max-marker))) (set-marker-insertion-type from t) (set-marker-insertio= n-type to nil) (widget-put widget :from from) (widget-put widget :to to))) = (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 (= 61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 610= 90) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140 = . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 61= 185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 6121= 8) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) (= 61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 613= 18) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 .= 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ... = ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (61705= ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 ..= . ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... .= .. . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 6282= 1) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) (= 62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (62= 915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972 = . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 . = 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 6306= 0) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 .= 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (63= 141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (6316= 7 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 . = 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 63= 251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (63292= . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) (= 63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 633= 59) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (6337= 3 . 63390) . 63391) . 63392)) edebug-match-symbol((((widget-specify-insert (let ((from (point)) button-= begin button-end sample-begin sample-end doc-begin doc-end value-pos) (inse= rt (widget-get widget :format)) (goto-char from) (while (re-search-forward = "%\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ...= ... ... ... ... ...))) (and button-begin button-end (widget-specify-button= widget button-begin button-end)) (and sample-begin sample-end (widget-spec= ify-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-= specify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos= ) (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to= (point-max-marker))) (set-marker-insertion-type from t) (set-marker-insert= ion-type to nil) (widget-put widget :from from) (widget-put widget :to to))= ) (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060= (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 6= 1090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (6114= 0 . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . = 61185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 61= 218) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288)= (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 6= 1318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378= . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ..= . ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (617= 05 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 = ... ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ...= ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 62= 821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878)= (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (= 62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (6297= 2 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 = . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 63= 060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092= . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (= 63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (63= 167 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 = . 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . = 63251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (632= 92 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323)= (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 6= 3359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (63= 373 . 63390) . 63391) . 63392) form) edebug-match-one-spec((((widget-specify-insert (let ((from (point)) butto= n-begin button-end sample-begin sample-end doc-begin doc-end value-pos) (in= sert (widget-get widget :format)) (goto-char from) (while (re-search-forwar= d "%\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... .= .. ... ... ... ... ...))) (and button-begin button-end (widget-specify-butt= on widget button-begin button-end)) (and sample-begin sample-end (widget-sp= ecify-sample widget sample-begin sample-end)) (and doc-begin doc-end (widge= t-specify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-p= os) (widget-apply widget :value-create))) (let ((from (point-min-marker)) (= to (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inse= rtion-type to nil) (widget-put widget :from from) (widget-put widget :to to= ))) (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (610= 60 (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 .= 61090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61= 140 . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 = . 61185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . = 61218) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 6128= 8) (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 .= 61318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (613= 78 . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 = ... ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (6= 1705 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (6220= 2 ... ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 .= .. ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . = 62821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 6287= 8) (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914)= (62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62= 972 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (6300= 5 . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . = 63060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (630= 92 . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140)= (63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (= 63167 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (6319= 6 . 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 = . 63251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (6= 3292 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 6332= 3) (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 .= 63359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (= 63373 . 63390) . 63391) . 63392) form) edebug-match-specs((((widget-specify-insert (let ((from (point)) button-b= egin button-end sample-begin sample-end doc-begin doc-end value-pos) (inser= t (widget-get widget :format)) (goto-char from) (while (re-search-forward "= %\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ... = ... ... ... ... ...))) (and button-begin button-end (widget-specify-button = widget button-begin button-end)) (and sample-begin sample-end (widget-speci= fy-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-s= pecify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos)= (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to = (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inserti= on-type to nil) (widget-put widget :from from) (widget-put widget :to to)))= (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 = (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61= 090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140= . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 6= 1185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 612= 18) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) = (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61= 318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 = . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ...= ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (6170= 5 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 .= .. ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... = ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 628= 21) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) = (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (6= 2915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972= . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 .= 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 630= 60) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 = . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (6= 3141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (631= 67 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 .= 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 6= 3251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (6329= 2 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) = (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63= 359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (633= 73 . 63390) . 63391) . 63392) (form) #f(compiled-function (c s rh) #)) edebug-&optional-wrapper((((widget-specify-insert (let ((from (point)) bu= tton-begin button-end sample-begin sample-end doc-begin doc-end value-pos) = (insert (widget-get widget :format)) (goto-char from) (while (re-search-for= ward "%\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ..= . ... ... ... ... ... ...))) (and button-begin button-end (widget-specify-b= utton widget button-begin button-end)) (and sample-begin sample-end (widget= -specify-sample widget sample-begin sample-end)) (and doc-begin doc-end (wi= dget-specify-doc widget doc-begin doc-end)) (when value-pos (goto-char valu= e-pos) (widget-apply widget :value-create))) (let ((from (point-min-marker)= ) (to (point-max-marker))) (set-marker-insertion-type from t) (set-marker-i= nsertion-type to nil) (widget-put widget :from from) (widget-put widget :to= to))) (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (= 61060 (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (6107= 8 . 61090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) = (61140 . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (611= 75 . 61185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209= . 61218) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 6= 1288) (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (6131= 5 . 61318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (= 61378 . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (614= 29 ... ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696)= (61705 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (6= 2202 ... ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (6268= 6 ... ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809= . 62821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 6= 2878) (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 629= 14) (62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) = (62972 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (6= 3005 . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053= . 63060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (= 63092 . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 631= 40) (63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (6316= 6 (63167 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (6= 3196 . 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (632= 26 . 63251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291)= (63292 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 6= 3323) (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (6335= 3 . 63359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (6337= 2 (63373 . 63390) . 63391) . 63392) (form) #f(compiled-function (c s rh) #<= bytecode -0x1f7329c409f6e7f6>)) #f(compiled-function (_ cursor specs) #)(&res= t (((widget-specify-insert (let ((from (point)) button-begin button-end sam= ple-begin sample-end doc-begin doc-end value-pos) (insert (widget-get widge= t :format)) (goto-char from) (while (re-search-forward "%\\(.\\)" nil t) (l= et (...) (delete-char -2) (cond ... ... ... ... ... ... ... ... ... ... ...= ))) (and button-begin button-end (widget-specify-button widget button-begin= button-end)) (and sample-begin sample-end (widget-specify-sample widget sa= mple-begin sample-end)) (and doc-begin doc-end (widget-specify-doc widget d= oc-begin doc-end)) (when value-pos (goto-char value-pos) (widget-apply widg= et :value-create))) (let ((from (point-min-marker)) (to (point-max-marker))= ) (set-marker-insertion-type from t) (set-marker-insertion-type to nil) (wi= dget-put widget :from from) (widget-put widget :to to))) (widget-clear-undo= )) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 (61061 (61062 . 610= 66) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61090) (61091 . 61101= ) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140 . 61147) (61150 . = 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 61185) (61186 . 6119= 2) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 61218) (61219 . 61223)= . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) (61289 . 61299) (61= 300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61318) (61319 (61320 = ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 . 61380) . 61381) (= 61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ... ... ... . 61531) (= 61540 ... ... ... . 61640) (61649 ... ... . 61696) (61705 ... ... . 61750) = (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 ... ... . 62463) (62= 472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... ... . 62736) . 6273= 7) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 62821) (62822 . 62832)= (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) (62879 . 62889) . 6= 2890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (62915 . 62925) (6292= 9 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972 . 62982) . 62983) = . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 . 63012) (63016 (630= 17 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 63060) . 63061) . 6306= 2) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 . 63101) (63102 . 6= 3111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (63141 . 63154) . 631= 55) . 63156) . 63157) (63161 (63162 . 63165) (63166 (63167 (63168 . 63172) = (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 . 63198) (63199 (632= 00 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 63251) (63252 . 6325= 6) (63257 . 63258) . 63259) (63265 (63266 . 63291) (63292 . 63294) (63295 .= 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) (63324 . 63329) (63= 330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63359) (63360 . 63363= ) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (63373 . 63390) . 63391= ) . 63392) (form)) apply(#f(compiled-function (_ cursor specs) #= ) &rest ((((widget-specify-insert (let ((from ...) button-begin button-end = sample-begin sample-end doc-begin doc-end value-pos) (insert (widget-get wi= dget :format)) (goto-char from) (while (re-search-forward "%\\(.\\)" nil t)= (let ... ... ...)) (and button-begin button-end (widget-specify-button wid= get button-begin button-end)) (and sample-begin sample-end (widget-specify-= sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-spec= ify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos) (w= idget-apply widget :value-create))) (let ((from ...) (to ...)) (set-marker-= insertion-type from t) (set-marker-insertion-type to nil) (widget-put widge= t :from from) (widget-put widget :to to))) (widget-clear-undo)) (61029 (610= 30 . 61051) (61055 (61056 . 61059) (61060 (61061 (61062 . 61066) (61067 ...= . 61074) . 61075) (61078 . 61090) (61091 . 61101) (61104 . 61116) (61117 .= 61127) (61130 . 61139) (61140 . 61147) (61150 . 61159) . 61160) (61166 (61= 167 . 61173) (61174 (61175 . 61185) (61186 . 61192) (61193 . 61200) . 61201= ) . 61202) (61208 (61209 . 61218) (61219 . 61223) . 61224) (61263 (61264 . = 61269) (61270 (61271 . 61288) (61289 . 61299) (61300 . 61303) (61304 . 6130= 5) . 61306) (61314 (61315 . 61318) (61319 ... . 61362) (61365 ... ... . 613= 81) (61384 ... ... ... ... ... ... ... ... ... ... ... ... . 62737) . 62738= ) . 62739) (62804 (62805 . 62808) (62809 . 62821) (62822 . 62832) (62836 (6= 2837 . 62858) (62859 . 62865) (62866 . 62878) (62879 . 62889) . 62890) . 62= 891) (62897 (62898 . 62901) (62902 . 62914) (62915 . 62925) (62929 (62930 .= 62951) (62952 . 62958) (62959 . 62971) (62972 . 62982) . 62983) . 62984) (= 62990 (62991 . 62994) (62995 . 63004) (63005 . 63012) (63016 (63017 . 63035= ) (63036 . 63042) (63043 . 63052) (63053 . 63060) . 63061) . 63062) (63068 = (63069 . 63073) (63074 . 63083) (63091 (63092 . 63101) (63102 . 63111) . 63= 112) (63120 (63121 . 63133) (63134 . 63140) (63141 . 63154) . 63155) . 6315= 6) . 63157) (63161 (63162 . 63165) (63166 (63167 (63168 . 63172) (63173 ...= . 63191) . 63192) (63195 (63196 . 63198) (63199 ... . 63217) . 63218) . 63= 219) (63225 (63226 . 63251) (63252 . 63256) (63257 . 63258) . 63259) (63265= (63266 . 63291) (63292 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 6= 3316) (63317 . 63323) (63324 . 63329) (63330 . 63334) . 63335) (63341 (6334= 2 . 63352) (63353 . 63359) (63360 . 63363) (63364 . 63366) . 63367) . 63368= ) . 63369) (63372 (63373 . 63390) . 63391) . 63392) (form))) edebug--match-&-spec-op(&rest (((widget-specify-insert (let ((from (point= )) button-begin button-end sample-begin sample-end doc-begin doc-end value-= pos) (insert (widget-get widget :format)) (goto-char from) (while (re-searc= h-forward "%\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... .= .. ... ... ... ... ... ... ...))) (and button-begin button-end (widget-spec= ify-button widget button-begin button-end)) (and sample-begin sample-end (w= idget-specify-sample widget sample-begin sample-end)) (and doc-begin doc-en= d (widget-specify-doc widget doc-begin doc-end)) (when value-pos (goto-char= value-pos) (widget-apply widget :value-create))) (let ((from (point-min-ma= rker)) (to (point-max-marker))) (set-marker-insertion-type from t) (set-mar= ker-insertion-type to nil) (widget-put widget :from from) (widget-put widge= t :to to))) (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 610= 59) (61060 (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) = (61078 . 61090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61= 139) (61140 . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174= (61175 . 61185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (= 61209 . 61218) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (6127= 1 . 61288) (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 = (61315 . 61318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 613= 77) (61378 . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420)= (61429 ... ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 6= 1696) (61705 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 6219= 3) (62202 ... ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) = (62686 ... ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (= 62809 . 62821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (6286= 6 . 62878) (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 = . 62914) (62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62= 971) (62972 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 6300= 4) (63005 . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (= 63053 . 63060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63= 091 (63092 . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 = . 63140) (63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) = (63166 (63167 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (631= 95 (63196 . 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225= (63226 . 63251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 6= 3291) (63292 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (6331= 7 . 63323) (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) = (63353 . 63359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) = (63372 (63373 . 63390) . 63391) . 63392) (form)) edebug-match-specs((((widget-specify-insert (let ((from (point)) button-b= egin button-end sample-begin sample-end doc-begin doc-end value-pos) (inser= t (widget-get widget :format)) (goto-char from) (while (re-search-forward "= %\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ... = ... ... ... ... ...))) (and button-begin button-end (widget-specify-button = widget button-begin button-end)) (and sample-begin sample-end (widget-speci= fy-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-s= pecify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos)= (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to = (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inserti= on-type to nil) (widget-put widget :from from) (widget-put widget :to to)))= (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 = (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61= 090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140= . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 6= 1185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 612= 18) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) = (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61= 318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 = . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ...= ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (6170= 5 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 .= .. ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... = ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 628= 21) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) = (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (6= 2915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972= . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 .= 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 630= 60) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 = . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (6= 3141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (631= 67 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 .= 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 6= 3251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (6329= 2 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) = (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63= 359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (633= 73 . 63390) . 63391) . 63392) (&rest form) edebug-match-specs) edebug-match((((widget-specify-insert (let ((from (point)) button-begin b= utton-end sample-begin sample-end doc-begin doc-end value-pos) (insert (wid= get-get widget :format)) (goto-char from) (while (re-search-forward "%\\(.\= \)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ... ... ..= . ... ... ...))) (and button-begin button-end (widget-specify-button widget= button-begin button-end)) (and sample-begin sample-end (widget-specify-sam= ple widget sample-begin sample-end)) (and doc-begin doc-end (widget-specify= -doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos) (widg= et-apply widget :value-create))) (let ((from (point-min-marker)) (to (point= -max-marker))) (set-marker-insertion-type from t) (set-marker-insertion-typ= e to nil) (widget-put widget :from from) (widget-put widget :to to))) (widg= et-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 (61061= (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61090) (= 61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140 . 611= 47) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 61185) = (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 61218) (6= 1219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) (61289= . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61318) (= 61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 . 6138= 0) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ... ... .= .. . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (61705 ... = ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 ... ...= . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... ... . = 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 62821) (6= 2822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) (62879= . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (62915 .= 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972 . 629= 82) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 . 63012= ) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 63060) . = 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 . 6310= 1) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (63141 .= 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (63167 (63= 168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 . 63198= ) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 63251) = (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (63292 . 63= 294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) (63324= . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63359) (= 63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (63373 . 6= 3390) . 63391) . 63392) (&rest form)) edebug-match-def-body((((widget-specify-insert (let ((from (point)) butto= n-begin button-end sample-begin sample-end doc-begin doc-end value-pos) (in= sert (widget-get widget :format)) (goto-char from) (while (re-search-forwar= d "%\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... .= .. ... ... ... ... ...))) (and button-begin button-end (widget-specify-butt= on widget button-begin button-end)) (and sample-begin sample-end (widget-sp= ecify-sample widget sample-begin sample-end)) (and doc-begin doc-end (widge= t-specify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-p= os) (widget-apply widget :value-create))) (let ((from (point-min-marker)) (= to (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inse= rtion-type to nil) (widget-put widget :from from) (widget-put widget :to to= ))) (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (610= 60 (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 .= 61090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61= 140 . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 = . 61185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . = 61218) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 6128= 8) (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 .= 61318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (613= 78 . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 = ... ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (6= 1705 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (6220= 2 ... ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 .= .. ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . = 62821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 6287= 8) (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914)= (62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62= 972 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (6300= 5 . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . = 63060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (630= 92 . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140)= (63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (= 63167 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (6319= 6 . 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 = . 63251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (6= 3292 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 6332= 3) (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 .= 63359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (= 63373 . 63390) . 63391) . 63392)) edebug-match-symbol((((widget-specify-insert (let ((from (point)) button-= begin button-end sample-begin sample-end doc-begin doc-end value-pos) (inse= rt (widget-get widget :format)) (goto-char from) (while (re-search-forward = "%\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ...= ... ... ... ... ...))) (and button-begin button-end (widget-specify-button= widget button-begin button-end)) (and sample-begin sample-end (widget-spec= ify-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-= specify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos= ) (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to= (point-max-marker))) (set-marker-insertion-type from t) (set-marker-insert= ion-type to nil) (widget-put widget :from from) (widget-put widget :to to))= ) (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060= (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 6= 1090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (6114= 0 . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . = 61185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 61= 218) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288)= (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 6= 1318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378= . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ..= . ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (617= 05 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 = ... ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ...= ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 62= 821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878)= (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (= 62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (6297= 2 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 = . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 63= 060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092= . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (= 63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (63= 167 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 = . 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . = 63251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (632= 92 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323)= (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 6= 3359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (63= 373 . 63390) . 63391) . 63392) def-body) edebug-match-one-spec((((widget-specify-insert (let ((from (point)) butto= n-begin button-end sample-begin sample-end doc-begin doc-end value-pos) (in= sert (widget-get widget :format)) (goto-char from) (while (re-search-forwar= d "%\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... .= .. ... ... ... ... ...))) (and button-begin button-end (widget-specify-butt= on widget button-begin button-end)) (and sample-begin sample-end (widget-sp= ecify-sample widget sample-begin sample-end)) (and doc-begin doc-end (widge= t-specify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-p= os) (widget-apply widget :value-create))) (let ((from (point-min-marker)) (= to (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inse= rtion-type to nil) (widget-put widget :from from) (widget-put widget :to to= ))) (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (610= 60 (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 .= 61090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61= 140 . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 = . 61185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . = 61218) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 6128= 8) (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 .= 61318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (613= 78 . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 = ... ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (6= 1705 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (6220= 2 ... ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 .= .. ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . = 62821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 6287= 8) (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914)= (62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62= 972 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (6300= 5 . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . = 63060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (630= 92 . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140)= (63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (= 63167 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (6319= 6 . 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 = . 63251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (6= 3292 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 6332= 3) (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 .= 63359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (= 63373 . 63390) . 63391) . 63392) def-body) edebug-match-specs((((widget-specify-insert (let ((from (point)) button-b= egin button-end sample-begin sample-end doc-begin doc-end value-pos) (inser= t (widget-get widget :format)) (goto-char from) (while (re-search-forward "= %\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ... = ... ... ... ... ...))) (and button-begin button-end (widget-specify-button = widget button-begin button-end)) (and sample-begin sample-end (widget-speci= fy-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-s= pecify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos)= (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to = (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inserti= on-type to nil) (widget-put widget :from from) (widget-put widget :to to)))= (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 = (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61= 090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140= . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 6= 1185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 612= 18) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) = (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61= 318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 = . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ...= ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (6170= 5 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 .= .. ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... = ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 628= 21) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) = (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (6= 2915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972= . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 .= 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 630= 60) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 = . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (6= 3141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (631= 67 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 .= 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 6= 3251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (6329= 2 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) = (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63= 359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (633= 73 . 63390) . 63391) . 63392) (def-body) edebug-match-specs) edebug-match-specs((((widget-specify-insert (let ((from (point)) button-b= egin button-end sample-begin sample-end doc-begin doc-end value-pos) (inser= t (widget-get widget :format)) (goto-char from) (while (re-search-forward "= %\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ... = ... ... ... ... ...))) (and button-begin button-end (widget-specify-button = widget button-begin button-end)) (and sample-begin sample-end (widget-speci= fy-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-s= pecify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos)= (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to = (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inserti= on-type to nil) (widget-put widget :from from) (widget-put widget :to to)))= (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 = (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61= 090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140= . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 6= 1185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 612= 18) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) = (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61= 318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 = . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ...= ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (6170= 5 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 .= .. ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... = ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 628= 21) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) = (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (6= 2915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972= . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 .= 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 630= 60) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 = . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (6= 3141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (631= 67 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 .= 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 6= 3251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (6329= 2 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) = (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63= 359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (633= 73 . 63390) . 63391) . 63392) ([&optional ("interactive" &optional [&or str= ingp def-form] &rest symbolp)] def-body) edebug-match-specs) edebug-match-specs((((widget-specify-insert (let ((from (point)) button-b= egin button-end sample-begin sample-end doc-begin doc-end value-pos) (inser= t (widget-get widget :format)) (goto-char from) (while (re-search-forward "= %\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ... = ... ... ... ... ...))) (and button-begin button-end (widget-specify-button = widget button-begin button-end)) (and sample-begin sample-end (widget-speci= fy-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-s= pecify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos)= (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to = (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inserti= on-type to nil) (widget-put widget :from from) (widget-put widget :to to)))= (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 = (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61= 090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140= . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 6= 1185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 612= 18) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) = (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61= 318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 = . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ...= ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (6170= 5 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 .= .. ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... = ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 628= 21) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) = (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (6= 2915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972= . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 .= 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 630= 60) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 = . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (6= 3141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (631= 67 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 .= 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 6= 3251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (6329= 2 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) = (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63= 359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (633= 73 . 63390) . 63391) . 63392) ([&optional ("declare" def-declarations)] [&o= ptional ("interactive" &optional [&or stringp def-form] &rest symbolp)] def= -body) edebug-match-specs) edebug-match-specs((((widget-specify-insert (let ((from (point)) button-b= egin button-end sample-begin sample-end doc-begin doc-end value-pos) (inser= t (widget-get widget :format)) (goto-char from) (while (re-search-forward "= %\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ... = ... ... ... ... ...))) (and button-begin button-end (widget-specify-button = widget button-begin button-end)) (and sample-begin sample-end (widget-speci= fy-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-s= pecify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos)= (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to = (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inserti= on-type to nil) (widget-put widget :from from) (widget-put widget :to to)))= (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 = (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61= 090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140= . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 6= 1185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 612= 18) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) = (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61= 318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 = . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ...= ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (6170= 5 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 .= .. ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... = ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 628= 21) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) = (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (6= 2915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972= . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 .= 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 630= 60) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 = . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (6= 3141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (631= 67 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 .= 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 6= 3251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (6329= 2 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) = (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63= 359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (633= 73 . 63390) . 63391) . 63392) (lambda-doc [&optional ("declare" def-declara= tions)] [&optional ("interactive" &optional [&or stringp def-form] &rest sy= mbolp)] def-body) edebug-match-specs) edebug-match-specs((((widget-specify-insert (let ((from (point)) button-b= egin button-end sample-begin sample-end doc-begin doc-end value-pos) (inser= t (widget-get widget :format)) (goto-char from) (while (re-search-forward "= %\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ... = ... ... ... ... ...))) (and button-begin button-end (widget-specify-button = widget button-begin button-end)) (and sample-begin sample-end (widget-speci= fy-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-s= pecify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos)= (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to = (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inserti= on-type to nil) (widget-put widget :from from) (widget-put widget :to to)))= (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 = (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61= 090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140= . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 6= 1185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 612= 18) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) = (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61= 318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 = . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ...= ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (6170= 5 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 .= .. ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... = ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 628= 21) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) = (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (6= 2915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972= . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 .= 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 630= 60) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 = . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (6= 3141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (631= 67 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 .= 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 6= 3251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (6329= 2 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) = (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63= 359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (633= 73 . 63390) . 63391) . 63392) (lambda-list lambda-doc [&optional ("declare"= def-declarations)] [&optional ("interactive" &optional [&or stringp def-fo= rm] &rest symbolp)] def-body) edebug-match-specs) edebug-match-specs((((widget-specify-insert (let ((from (point)) button-b= egin button-end sample-begin sample-end doc-begin doc-end value-pos) (inser= t (widget-get widget :format)) (goto-char from) (while (re-search-forward "= %\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ... = ... ... ... ... ...))) (and button-begin button-end (widget-specify-button = widget button-begin button-end)) (and sample-begin sample-end (widget-speci= fy-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-s= pecify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos)= (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to = (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inserti= on-type to nil) (widget-put widget :from from) (widget-put widget :to to)))= (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 = (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61= 090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140= . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 6= 1185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 612= 18) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) = (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61= 318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 = . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ...= ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (6170= 5 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 .= .. ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... = ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 628= 21) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) = (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (6= 2915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972= . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 .= 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 630= 60) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 = . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (6= 3141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (631= 67 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 .= 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 6= 3251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (6329= 2 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) = (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63= 359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (633= 73 . 63390) . 63391) . 63392) (name lambda-list lambda-doc [&optional ("dec= lare" def-declarations)] [&optional ("interactive" &optional [&or stringp d= ef-form] &rest symbolp)] def-body) edebug-match-specs) edebug-match-specs((((widget-specify-insert (let ((from (point)) button-b= egin button-end sample-begin sample-end doc-begin doc-end value-pos) (inser= t (widget-get widget :format)) (goto-char from) (while (re-search-forward "= %\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ... = ... ... ... ... ...))) (and button-begin button-end (widget-specify-button = widget button-begin button-end)) (and sample-begin sample-end (widget-speci= fy-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget-s= pecify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-pos)= (widget-apply widget :value-create))) (let ((from (point-min-marker)) (to = (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inserti= on-type to nil) (widget-put widget :from from) (widget-put widget :to to)))= (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 = (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . 61= 090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140= . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 6= 1185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 612= 18) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) = (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61= 318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (61378 = . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 ...= ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (6170= 5 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202 .= .. ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ... = ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 628= 21) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878) = (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (6= 2915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (62972= . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 .= 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 630= 60) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092 = . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (6= 3141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (631= 67 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196 .= 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 . 6= 3251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (6329= 2 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) = (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63= 359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (633= 73 . 63390) . 63391) . 63392) ("defun" name lambda-list lambda-doc [&option= al ("declare" def-declarations)] [&optional ("interactive" &optional [&or s= tringp def-form] &rest symbolp)] def-body) edebug-match-specs) edebug-match-sublist((((widget-specify-insert (let ((from (point)) button= -begin button-end sample-begin sample-end doc-begin doc-end value-pos) (ins= ert (widget-get widget :format)) (goto-char from) (while (re-search-forward= "%\\(.\\)" nil t) (let (...) (delete-char -2) (cond ... ... ... ... ... ..= . ... ... ... ... ...))) (and button-begin button-end (widget-specify-butto= n widget button-begin button-end)) (and sample-begin sample-end (widget-spe= cify-sample widget sample-begin sample-end)) (and doc-begin doc-end (widget= -specify-doc widget doc-begin doc-end)) (when value-pos (goto-char value-po= s) (widget-apply widget :value-create))) (let ((from (point-min-marker)) (t= o (point-max-marker))) (set-marker-insertion-type from t) (set-marker-inser= tion-type to nil) (widget-put widget :from from) (widget-put widget :to to)= )) (widget-clear-undo)) (61029 (61030 . 61051) (61055 (61056 . 61059) (6106= 0 (61061 (61062 . 61066) (61067 (61068 . 61073) . 61074) . 61075) (61078 . = 61090) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (611= 40 . 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 .= 61185) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 6= 1218) (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288= ) (61289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . = 61318) (61319 (61320 ... ... . 61361) . 61362) (61365 (61366 . 61377) (6137= 8 . 61380) . 61381) (61384 (61385 . 61389) (61390 ... ... . 61420) (61429 .= .. ... ... . 61531) (61540 ... ... ... . 61640) (61649 ... ... . 61696) (61= 705 ... ... . 61750) (61759 ... ... . 61879) (61888 ... ... . 62193) (62202= ... ... . 62463) (62472 ... ... . 62538) (62547 ... ... . 62677) (62686 ..= . ... . 62736) . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 6= 2821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878= ) (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) = (62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (629= 72 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005= . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 6= 3060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (6309= 2 . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) = (63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (6= 3167 (63168 . 63172) (63173 (63174 . 63190) . 63191) . 63192) (63195 (63196= . 63198) (63199 (63200 . 63216) . 63217) . 63218) . 63219) (63225 (63226 .= 63251) (63252 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (63= 292 . 63294) (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323= ) (63324 . 63329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . = 63359) (63360 . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (6= 3373 . 63390) . 63391) . 63392) ("defun" name lambda-list lambda-doc [&opti= onal ("declare" def-declarations)] [&optional ("interactive" &optional [&or= stringp def-form] &rest symbolp)] def-body)) edebug-match-list((((defun widget-default-create (widget) "Create WIDGET = at point in the current buffer." (widget-specify-insert (let ((from ...) bu= tton-begin button-end sample-begin sample-end doc-begin doc-end value-pos) = (insert (widget-get widget :format)) (goto-char from) (while (re-search-for= ward "%\\(.\\)" nil t) (let ... ... ...)) (and button-begin button-end (wid= get-specify-button widget button-begin button-end)) (and sample-begin sampl= e-end (widget-specify-sample widget sample-begin sample-end)) (and doc-begi= n doc-end (widget-specify-doc widget doc-begin doc-end)) (when value-pos (g= oto-char value-pos) (widget-apply widget :value-create))) (let ((from ...) = (to ...)) (set-marker-insertion-type from t) (set-marker-insertion-type to = nil) (widget-put widget :from from) (widget-put widget :to to))) (widget-cl= ear-undo))) (60939 (60940 . 60945) (60946 . 60967) (60968 (60969 . 60975) .= 60976) (60979 . 61026) (61029 (61030 . 61051) (61055 (61056 . 61059) (6106= 0 (61061 (61062 . 61066) (61067 ... . 61074) . 61075) (61078 . 61090) (6109= 1 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140 . 61147) = (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 61185) (611= 86 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 61218) (61219= . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) (61289 . 6= 1299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61318) (6131= 9 ... . 61362) (61365 ... ... . 61381) (61384 ... ... ... ... ... ... ... .= .. ... ... ... ... . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809= . 62821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 6= 2878) (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 629= 14) (62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) = (62972 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (6= 3005 . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053= . 63060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (= 63092 . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 631= 40) (63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (6316= 6 (63167 (63168 . 63172) (63173 ... . 63191) . 63192) (63195 (63196 . 63198= ) (63199 ... . 63217) . 63218) . 63219) (63225 (63226 . 63251) (63252 . 632= 56) (63257 . 63258) . 63259) (63265 (63266 . 63291) (63292 . 63294) (63295 = . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) (63324 . 63329) (6= 3330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63359) (63360 . 6336= 3) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (63373 . 63390) . 6339= 1) . 63392)) ("defun" name lambda-list lambda-doc [&optional ("declare" def= -declarations)] [&optional ("interactive" &optional [&or stringp def-form] = &rest symbolp)] def-body)) edebug-match-one-spec((((defun widget-default-create (widget) "Create WID= GET at point in the current buffer." (widget-specify-insert (let ((from ...= ) button-begin button-end sample-begin sample-end doc-begin doc-end value-p= os) (insert (widget-get widget :format)) (goto-char from) (while (re-search= -forward "%\\(.\\)" nil t) (let ... ... ...)) (and button-begin button-end = (widget-specify-button widget button-begin button-end)) (and sample-begin s= ample-end (widget-specify-sample widget sample-begin sample-end)) (and doc-= begin doc-end (widget-specify-doc widget doc-begin doc-end)) (when value-po= s (goto-char value-pos) (widget-apply widget :value-create))) (let ((from .= ..) (to ...)) (set-marker-insertion-type from t) (set-marker-insertion-type= to nil) (widget-put widget :from from) (widget-put widget :to to))) (widge= t-clear-undo))) (60939 (60940 . 60945) (60946 . 60967) (60968 (60969 . 6097= 5) . 60976) (60979 . 61026) (61029 (61030 . 61051) (61055 (61056 . 61059) (= 61060 (61061 (61062 . 61066) (61067 ... . 61074) . 61075) (61078 . 61090) (= 61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140 . 611= 47) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 61185) = (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 61218) (6= 1219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) (61289= . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61318) (= 61319 ... . 61362) (61365 ... ... . 61381) (61384 ... ... ... ... ... ... .= .. ... ... ... ... ... . 62737) . 62738) . 62739) (62804 (62805 . 62808) (6= 2809 . 62821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866= . 62878) (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 .= 62914) (62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 629= 71) (62972 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004= ) (63005 . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (6= 3053 . 63060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (630= 91 (63092 . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 .= 63140) (63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (= 63166 (63167 (63168 . 63172) (63173 ... . 63191) . 63192) (63195 (63196 . 6= 3198) (63199 ... . 63217) . 63218) . 63219) (63225 (63226 . 63251) (63252 .= 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (63292 . 63294) (63= 295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) (63324 . 63329= ) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63359) (63360 . = 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (63373 . 63390) . = 63391) . 63392)) ("defun" name lambda-list lambda-doc [&optional ("declare"= def-declarations)] [&optional ("interactive" &optional [&or stringp def-fo= rm] &rest symbolp)] def-body)) edebug-match-specs((((defun widget-default-create (widget) "Create WIDGET= at point in the current buffer." (widget-specify-insert (let ((from ...) b= utton-begin button-end sample-begin sample-end doc-begin doc-end value-pos)= (insert (widget-get widget :format)) (goto-char from) (while (re-search-fo= rward "%\\(.\\)" nil t) (let ... ... ...)) (and button-begin button-end (wi= dget-specify-button widget button-begin button-end)) (and sample-begin samp= le-end (widget-specify-sample widget sample-begin sample-end)) (and doc-beg= in doc-end (widget-specify-doc widget doc-begin doc-end)) (when value-pos (= goto-char value-pos) (widget-apply widget :value-create))) (let ((from ...)= (to ...)) (set-marker-insertion-type from t) (set-marker-insertion-type to= nil) (widget-put widget :from from) (widget-put widget :to to))) (widget-c= lear-undo))) (60939 (60940 . 60945) (60946 . 60967) (60968 (60969 . 60975) = . 60976) (60979 . 61026) (61029 (61030 . 61051) (61055 (61056 . 61059) (610= 60 (61061 (61062 . 61066) (61067 ... . 61074) . 61075) (61078 . 61090) (610= 91 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140 . 61147)= (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 61185) (61= 186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 61218) (6121= 9 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) (61289 . = 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61318) (613= 19 ... . 61362) (61365 ... ... . 61381) (61384 ... ... ... ... ... ... ... = ... ... ... ... ... . 62737) . 62738) . 62739) (62804 (62805 . 62808) (6280= 9 . 62821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . = 62878) (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62= 914) (62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971)= (62972 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (= 63005 . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (6305= 3 . 63060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 = (63092 . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63= 140) (63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (631= 66 (63167 (63168 . 63172) (63173 ... . 63191) . 63192) (63195 (63196 . 6319= 8) (63199 ... . 63217) . 63218) . 63219) (63225 (63226 . 63251) (63252 . 63= 256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (63292 . 63294) (63295= . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) (63324 . 63329) (= 63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63359) (63360 . 633= 63) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (63373 . 63390) . 633= 91) . 63392)) (("defun" name lambda-list lambda-doc [&optional ("declare" d= ef-declarations)] [&optional ("interactive" &optional [&or stringp def-form= ] &rest symbolp)] def-body)) edebug-match-specs) edebug-match((((defun widget-default-create (widget) "Create WIDGET at po= int in the current buffer." (widget-specify-insert (let ((from ...) button-= begin button-end sample-begin sample-end doc-begin doc-end value-pos) (inse= rt (widget-get widget :format)) (goto-char from) (while (re-search-forward = "%\\(.\\)" nil t) (let ... ... ...)) (and button-begin button-end (widget-s= pecify-button widget button-begin button-end)) (and sample-begin sample-end= (widget-specify-sample widget sample-begin sample-end)) (and doc-begin doc= -end (widget-specify-doc widget doc-begin doc-end)) (when value-pos (goto-c= har value-pos) (widget-apply widget :value-create))) (let ((from ...) (to .= ..)) (set-marker-insertion-type from t) (set-marker-insertion-type to nil) = (widget-put widget :from from) (widget-put widget :to to))) (widget-clear-u= ndo))) (60939 (60940 . 60945) (60946 . 60967) (60968 (60969 . 60975) . 6097= 6) (60979 . 61026) (61029 (61030 . 61051) (61055 (61056 . 61059) (61060 (61= 061 (61062 . 61066) (61067 ... . 61074) . 61075) (61078 . 61090) (61091 . 6= 1101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140 . 61147) (6115= 0 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 61185) (61186 . = 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 61218) (61219 . 61= 223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) (61289 . 61299)= (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61318) (61319 ...= . 61362) (61365 ... ... . 61381) (61384 ... ... ... ... ... ... ... ... ..= . ... ... ... . 62737) . 62738) . 62739) (62804 (62805 . 62808) (62809 . 62= 821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62866 . 62878)= (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (62902 . 62914) (= 62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . 62971) (6297= 2 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63004) (63005 = . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052) (63053 . 63= 060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (63091 (63092= . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (63134 . 63140) (= 63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165) (63166 (63= 167 (63168 . 63172) (63173 ... . 63191) . 63192) (63195 (63196 . 63198) (63= 199 ... . 63217) . 63218) . 63219) (63225 (63226 . 63251) (63252 . 63256) (= 63257 . 63258) . 63259) (63265 (63266 . 63291) (63292 . 63294) (63295 . 632= 98) . 63299) (63305 (63306 . 63316) (63317 . 63323) (63324 . 63329) (63330 = . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63359) (63360 . 63363) (6= 3364 . 63366) . 63367) . 63368) . 63369) (63372 (63373 . 63390) . 63391) . = 63392)) (("defun" name lambda-list lambda-doc [&optional ("declare" def-dec= larations)] [&optional ("interactive" &optional [&or stringp def-form] &res= t symbolp)] def-body))) edebug-make-form-wrapper((((defun widget-default-create (widget) "Create = WIDGET at point in the current buffer." (widget-specify-insert (let ((from = ...) button-begin button-end sample-begin sample-end doc-begin doc-end valu= e-pos) (insert (widget-get widget :format)) (goto-char from) (while (re-sea= rch-forward "%\\(.\\)" nil t) (let ... ... ...)) (and button-begin button-e= nd (widget-specify-button widget button-begin button-end)) (and sample-begi= n sample-end (widget-specify-sample widget sample-begin sample-end)) (and d= oc-begin doc-end (widget-specify-doc widget doc-begin doc-end)) (when value= -pos (goto-char value-pos) (widget-apply widget :value-create))) (let ((fro= m ...) (to ...)) (set-marker-insertion-type from t) (set-marker-insertion-t= ype to nil) (widget-put widget :from from) (widget-put widget :to to))) (wi= dget-clear-undo))) (60939 (60940 . 60945) (60946 . 60967) (60968 (60969 . 6= 0975) . 60976) (60979 . 61026) (61029 (61030 . 61051) (61055 (61056 . 61059= ) (61060 (61061 (61062 . 61066) (61067 ... . 61074) . 61075) (61078 . 61090= ) (61091 . 61101) (61104 . 61116) (61117 . 61127) (61130 . 61139) (61140 . = 61147) (61150 . 61159) . 61160) (61166 (61167 . 61173) (61174 (61175 . 6118= 5) (61186 . 61192) (61193 . 61200) . 61201) . 61202) (61208 (61209 . 61218)= (61219 . 61223) . 61224) (61263 (61264 . 61269) (61270 (61271 . 61288) (61= 289 . 61299) (61300 . 61303) (61304 . 61305) . 61306) (61314 (61315 . 61318= ) (61319 ... . 61362) (61365 ... ... . 61381) (61384 ... ... ... ... ... ..= . ... ... ... ... ... ... . 62737) . 62738) . 62739) (62804 (62805 . 62808)= (62809 . 62821) (62822 . 62832) (62836 (62837 . 62858) (62859 . 62865) (62= 866 . 62878) (62879 . 62889) . 62890) . 62891) (62897 (62898 . 62901) (6290= 2 . 62914) (62915 . 62925) (62929 (62930 . 62951) (62952 . 62958) (62959 . = 62971) (62972 . 62982) . 62983) . 62984) (62990 (62991 . 62994) (62995 . 63= 004) (63005 . 63012) (63016 (63017 . 63035) (63036 . 63042) (63043 . 63052)= (63053 . 63060) . 63061) . 63062) (63068 (63069 . 63073) (63074 . 63083) (= 63091 (63092 . 63101) (63102 . 63111) . 63112) (63120 (63121 . 63133) (6313= 4 . 63140) (63141 . 63154) . 63155) . 63156) . 63157) (63161 (63162 . 63165= ) (63166 (63167 (63168 . 63172) (63173 ... . 63191) . 63192) (63195 (63196 = . 63198) (63199 ... . 63217) . 63218) . 63219) (63225 (63226 . 63251) (6325= 2 . 63256) (63257 . 63258) . 63259) (63265 (63266 . 63291) (63292 . 63294) = (63295 . 63298) . 63299) (63305 (63306 . 63316) (63317 . 63323) (63324 . 63= 329) (63330 . 63334) . 63335) (63341 (63342 . 63352) (63353 . 63359) (63360= . 63363) (63364 . 63366) . 63367) . 63368) . 63369) (63372 (63373 . 63390)= . 63391) . 63392)) 60939 63391 (("defun" name lambda-list lambda-doc [&opt= ional ("declare" def-declarations)] [&optional ("interactive" &optional [&o= r stringp def-form] &rest symbolp)] def-body))) edebug-read-and-maybe-wrap-form1() edebug-read-and-maybe-wrap-form() edebug--read(read #) apply(edebug--read read #) #f(advice edebug--read :around read)(#) elisp--eval-defun() #(nil) edebug--eval-defun(# t) apply(edebug--eval-defun # t) eval-defun(t) eval-defun((4)) funcall-interactively(eval-defun (4)) command-execute(eval-defun) --=-=-= Content-Type: text/plain In GNU Emacs 30.0.50 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.37, cairo version 1.17.8) of 2023-05-11 built on fw.net.yu Repository revision: e4c8ba6c0589f1ba0ba9993c4f1e9c0821d3ca6c Repository branch: master System Description: Arch Linux Configured using: 'configure --sysconfdir=/etc --prefix=/usr --localstatedir=/var --with-cairo --with-harfbuzz --with-libsystemd --with-modules --with-pgtk --with-native-compilation' Configured features: ACL CAIRO DBUS FREETYPE GIF GLIB GMP GNUTLS GPM GSETTINGS HARFBUZZ JPEG JSON LCMS2 LIBOTF LIBSYSTEMD LIBXML2 MODULES NATIVE_COMP NOTIFY INOTIFY PDUMPER PGTK PNG RSVG SECCOMP SOUND SQLITE3 THREADS TIFF TOOLKIT_SCROLL_BARS TREE_SITTER WEBP XIM GTK3 ZLIB Important settings: value of $LANG: en_US.UTF-8 value of $XMODIFIERS: @im=fcitx locale-coding-system: utf-8-unix -- Best, RY --=-=-=--