Mercurial > emacs
comparison lisp/mail/supercite.el @ 63945:eb399d132bf4
(filladapt-prefix-table): Add defvar.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 03 Jul 2005 16:29:51 +0000 |
parents | 095901aead41 |
children | 72c3c77d111e |
comparison
equal
deleted
inserted
replaced
63944:6f8d122757b4 | 63945:eb399d132bf4 |
---|---|
1315 (concat sc-citation-leader | 1315 (concat sc-citation-leader |
1316 attribution | 1316 attribution |
1317 sc-citation-delimiter | 1317 sc-citation-delimiter |
1318 sc-citation-separator)) | 1318 sc-citation-separator)) |
1319 | 1319 |
1320 (defvar filladapt-prefix-table) | |
1321 | |
1320 (defun sc-setup-filladapt () | 1322 (defun sc-setup-filladapt () |
1321 "Setup `filladapt-prefix-table' to handle Supercited paragraphs." | 1323 "Setup `filladapt-prefix-table' to handle Supercited paragraphs." |
1322 (let* ((fa-sc-elt 'filladapt-supercite-included-text) | 1324 (let* ((fa-sc-elt 'filladapt-supercite-included-text) |
1323 (elt (rassq fa-sc-elt filladapt-prefix-table))) | 1325 (elt (rassq fa-sc-elt filladapt-prefix-table))) |
1324 (if elt (setcar elt (sc-cite-regexp)) | 1326 (if elt (setcar elt (sc-cite-regexp)) |