cpet/freebsd-ports
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix an issue of (sgml-chage-element-name) in Emacs 24.3.1.

Browse Source
This commit is contained in:
Hiroki Sato 2013-06-03 05:22:26 +00:00
parent 8b5bbb8c9d
commit e651f688a3
Notes: svn2git 2021-03-31 03:12:20 +00:00 
svn path=/head/; revision=319754
2 changed files with 18 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
editors/psgml/Makefile
View File

@ -1,13 +1,9 @@
# New ports collection makefile for: psgml for emacs
# Date created: 23 January 1999
# Whom: shige
#
# Created by: Shigeyuki Fukushima <shige@FreeBSD.org>
# $FreeBSD$
#
PORTNAME= psgml
PORTVERSION= 1.3.2
PORTREVISION= 19
PORTREVISION= 20
CATEGORIES= editors elisp
MASTER_SITES= SF/${PORTNAME}/ALPHA%20${PORTNAME}/${PORTVERSION}
PKGNAMESUFFIX= -${EMACS_PORT_NAME}
@ -16,8 +12,8 @@ PATCH_SITES= ${MASTER_SITE_LOCAL}
PATCH_SITE_SUBDIR= hrs
PATCHFILES= psgml-symbol-conflict-050503.diff.gz
MAINTAINER?= hrs@FreeBSD.org
COMMENT= A major mode for editing SGML and XML documents for ${EMACS_PORT_NAME}
MAINTAINER= hrs@FreeBSD.org
COMMENT= Major mode for editing SGML and XML documents for Emacs
SUB_FILES= ${PSGML_STARTUPEL}
SUB_LIST= PSGML_LISPDIR=${PSGML_LISPDIR}

17
editors/psgml/files/patch-psgml-edit.el
View File

@ -1,6 +1,17 @@
--- psgml-edit.el.orig 2012-08-04 11:53:07.000000000 +0900
+++ psgml-edit.el 2012-08-04 11:55:00.000000000 +0900
@@ -1870,24 +1870,28 @@
--- psgml-edit.el.orig 2013-06-03 13:44:59.000000000 +0900
+++ psgml-edit.el 2013-06-03 14:13:25.000000000 +0900
@@ -185,7 +185,9 @@
(goto-char (sgml-element-start element))
(delete-char (sgml-element-stag-len element))
(insert (sgml-delim "STAGO")
- (sgml-general-insert-case gi)
+ (if (symbolp gi)
+ (sgml-general-insert-case (symbol-name gi))
+ (sgml-general-insert-case gi))
tagc)
(let* ((newel (sgml-find-context-of (point)))
(newattlist (sgml-element-attlist newel))
@@ -1870,24 +1872,28 @@
(invert
(or (looking-at "&#\\([0-9]+\\)[;\n]?")
(error "No character reference after point"))