diff options
| author | Christophe Raffalli | 2000-12-01 14:53:56 +0000 |
|---|---|---|
| committer | Christophe Raffalli | 2000-12-01 14:53:56 +0000 |
| commit | 8ea0bdd7794f2485db778ae500c14e676edcca1c (patch) | |
| tree | 1278dae3887bf5b4b0f385dadf2b973bdc824e39 | |
| parent | e8c9e51c13f8f340804d85ae11a535e819428b88 (diff) | |
add rewrite list
| -rw-r--r-- | af2/af2-font.el | 2 | ||||
| -rw-r--r-- | af2/af2-fun.el | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/af2/af2-font.el b/af2/af2-font.el index 11b1dd8e..0a67826d 100644 --- a/af2/af2-font.el +++ b/af2/af2-font.el @@ -27,7 +27,7 @@ "\\(ose_def\\)\\|" "\\(or\\(ollary\\)?\\)" "\\)\\)\\|") - "\\(d\\(\\(e\\(f\\|l\\)\\)\\|\\(ocuments\\)\\|\\(epend\\)\\)\\)\\|" + "\\(d\\(\\(e\\(f\\(_thlist\\)?\\|l\\)\\)\\|\\(ocuments\\)\\|\\(epend\\)\\)\\)\\|" "\\(e\\(" (concat "\\(lim_after_intro\\)\\|" diff --git a/af2/af2-fun.el b/af2/af2-fun.el index bb6edab0..d03c23ab 100644 --- a/af2/af2-fun.el +++ b/af2/af2-fun.el @@ -38,7 +38,7 @@ send a compile command to af2 for the theorem which name is under the cursor." af2-comments-regexp "\\(\\(rInfix\\|lInfix\\|Infix\\|Prefix\\|Postfix\\)[^\"]+\"\\([^\"]+\\)\\)") af2-definition-regexp (concat - "\\(Cst\\|def\\|claim\\|Sort\\)" + "\\(Cst\\|def\\(_thlist\\)?\\|claim\\|Sort\\)" af2-comments-regexp af2-ident-regexp) af2-new-elim-regexp (concat @@ -96,7 +96,7 @@ send a compile command to af2 for the theorem which name is under the cursor." ((proof-string-match af2-definition-regexp str) (setq ans (concat (format af2-forget-id-command - (match-string 5 str)) ans)))) + (match-string 6 str)) ans)))) (setq lsp (span-start span)) |